Skip to content

Instantly share code, notes, and snippets.

@dgfitch

dgfitch/active_pattern_comparison.fs

Created August 23, 2010 18:27
Show Gist options
  • Save dgfitch/546019 to your computer and use it in GitHub Desktop.
Save dgfitch/546019 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
active_pattern_comparison.fs
(* Sample F# active pattern for comparison *)
let (|LessThan|_|) x y = if y <= x then Some() else None
match 4 with
| LessThan 2 -> "uhh something is wrong"
| _ -> "yay math"
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment