let
solver =
StdOpt
.str_option ()