type option = Some (int) | None

let none : option = None<>

let some42 : option = Some<> (42)