F# でEither型のテストを書く

F#でEither型を利用することはよくあることでしょう。特に例外処理関連で。 type Either<'T, 'U> = | Left of 'T | Right of 'U さて、このEitherは色々な状況で使用できるのですが、F#でもっとも利用頻度が高い場面は例外処理のとき。 let divide x = function | y when y = 0 -> Left (ArgumentException "ばーん!") | …