Skip to content

Instantly share code, notes, and snippets.

@viebel

viebel/sigma.ml

Created October 5, 2017 19:32
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save viebel/7dcac7f4c488741ecfbbadec27212d4f to your computer and use it in GitHub Desktop.
Save viebel/7dcac7f4c488741ecfbbadec27212d4f to your computer and use it in GitHub Desktop.
Download ZIP
Sigma in Ocaml
Raw
sigma.ml
let rec sigma f = function
| [] -> 0
| x :: l -> f x + sigma f l;;
Js.log (sigma (fun x -> x * x) [1; 2; 3]);;
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment