module Float_arg_helper:sig..end
type 
val parse : string -> string -> parsed ref -> unit
type | | | Ok | 
| | | Parse_failed of  | 
val parse_no_error : string ->
       parsed ref ->
       parse_result
val get : key:int -> parsed -> float