Skip to content

Instantly share code, notes, and snippets.

@cohalz
Created January 26, 2014 09:23
Show Gist options
  • Save cohalz/8630508 to your computer and use it in GitHub Desktop.
Save cohalz/8630508 to your computer and use it in GitHub Desktop.
let rec mem a s =
match (a,s) with
| (_,[]) -> false
| (b,x::xs) -> if b = x then true else mem b xs
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment