sig
val
next : unit
->
int
val
get : unit
->
int
end