Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- #require "core";;
- open Core;;
- let sum a = List.sum (module Int) a ~f:ident in List.range 0 100 |> List.map ~f:(fun x -> x*x) |> sum;;
- - : int = 328350
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
