(* legacy ML bindings *)
val antisym_less_fun = thm "antisym_less_fun";
val app_strict = thm "app_strict";
val ch2ch_fun = thm "ch2ch_fun";
val ch2ch_fun_rev = thm "ch2ch_fun_rev";
val cpo_fun = thm "cpo_fun";
val inst_fun_pcpo = thm "inst_fun_pcpo";
val least_fun = thm "least_fun";
val less_fun_def = thm "less_fun_def";
val less_fun_ext = thm "less_fun_ext";
val less_fun = thm "less_fun";
val lub_fun = thm "lub_fun";
val minimal_fun = thm "minimal_fun";
val refl_less_fun = thm "refl_less_fun";
val thelub_fun = thm "thelub_fun";
val trans_less_fun = thm "trans_less_fun";
val ub2ub_fun = thm "ub2ub_fun";