let
option_as_list =
function
|
Some
(v)
->
[v]
|
_
->
[]