type option<`a> = None | Some (`a) let x : int = match (Some(42)) { Some((_ : int)) | None -> 0 }