fact: Fixpoint make_cumulants' {T} (add : T -> T -> T) (acc : T) (ls : list T) : list T := match ls with | [] => [] | x :: xs => let acc := add acc x in acc :: make_cumulants' add acc xs end.
imports: Coq.Strings.String Coq.Structures.Orders Coq.micromega.Lia Coq.Bool.Bool Coq.Sorting.Mergesort Coq.QArith.QArith Coq.QArith.Qround Coq.QArith.Qabs Coq.QArith.Qminmax Coq.NArith.NArith Coq.ZArith.ZArith Coq.Arith.Arith Coq.Lists.List PerformanceExperiments.LetIn