Programmering med exists - fun eq x y = x=y; > val a eq = fn : a -> a -> bool - fun member elm lst = exists (eq elm) lst; > val a member = fn : a -> a list -> bool - member 3 [1,2,3,4]; > val it = true : bool - member 3 [1,2,4,5]; > val it = false : bool
{}