let
get_some =
function
|
Some
s
->
s
|
None
->
raise
Not_found