Cumprod and formatting

packages/squiggle-lang/src/rescript/FunctionRegistry/FunctionRegistry_Library.res

@@ -223,6 +223,14 @@ let registry = [
       ),
     ],
   ),
+  Function.make(
+    ~name="Cumulative Prod",
+    ~definitions=[
+      ArrayNumberDist.make("cumprod", r =>
+        r->E.A.Floats.cumsum->E.A2.fmap(Wrappers.evNumber)->Wrappers.evArray->Ok
+      ),
+    ],
+  ),
   Function.make(
     ~name="Diff",
     ~definitions=[

packages/squiggle-lang/src/rescript/ReducerInterface/ReducerInterface_Date.res

@@ -24,4 +24,4 @@ let dispatch = (call: EV.functionCall, _: DistributionOperation.env): option<
     EV.EvDate(DateTime.Date.addDuration(d1, d2))->Ok->Some
   | _ => None
   }
-}
+}

packages/squiggle-lang/src/rescript/ReducerInterface/ReducerInterface_Duration.res

@@ -29,4 +29,4 @@ let dispatch = (call: EV.functionCall, _: DistributionOperation.env): option<
     EV.EvTimeDuration(DateTime.Duration.divide(d1, d2))->Ok->Some
   | _ => None
   }
-}
+}