sig
val
to_float :
Q
.t
->
float
end