Skip to content

Instantly share code, notes, and snippets.

@viebel
Created November 15, 2017 10:36
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/c91ebea3f81bc41d3f7ab0d95e7c8ba1 to your computer and use it in GitHub Desktop.
Save viebel/c91ebea3f81bc41d3f7ab0d95e7c8ba1 to your computer and use it in GitHub Desktop.
Sigma in reason 3
let rec sigma (f, s) =
switch (s) {
| [] => 0
| [x, ...l] => f (x) + sigma (f, l)
};
let () = 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