val program : Resolve.program -> Typed.program
val of_tyexpr : string list -> Syntax.tyexpr -> Types.t