fromFromSingleCase
Expression<Func<'U, 'T>>
fromOption
Expression<Func<'T option, 'T>>
toOption
Expression<Func<'T, 'T option>>
toSingleCaseUnion
Expression<Func<'T, 'U>>