sig
val
set_speed : int
->
unit
val
get_speed : unit
->
int
end