Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- let min = fun x -> fun y -> if x < y then x else y in
- let max = fun x -> fun y -> if x > y then x else y in
- fold_left
- (fun (a, b) x -> (min a x, max b x))
- ((100, -100))
- (Cons(5, Cons(3, Nil())))
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement