アクティブパターン パターンとして使用できる関数を定義する機能。あくまで関数。 let (|Even|Odd|) n = if n % 2 = 0 then Even else Odd let evenOrOdd n = match n with | Even -> printfn "%d is Even" n | Odd -> printfn "%d is Odd" n > evenOrOdd 2…