module Inter: sig .. end
sig
end
type value
type env = (string * value) list
(string * value) list
val print_value : Pervasives.out_channel -> value -> unit
Pervasives.out_channel -> value -> unit
val interv : env -> S.Ast.t -> value
env -> S.Ast.t -> value