mk_thy_const : {Thy:string, Name:string, Ty:hol_type} -> term
(A type ty1 is an ’instance’ of a type ty2 when match_type ty2 ty1 does not fail.)
- mk_thy_const {Name="T", Thy="bool", Ty=bool}; > val it = `T` : term - try mk_thy_const {Name = "bar", Thy="foo", Ty=bool}; Exception raised at Term.mk_thy_const: "foo$bar" not found