1
signature Thms_sig =
2
sig
3
type Thm
4
val WF_INDUCTION_THM:Thm
5
val WFREC_COROLLARY :Thm
6
val CUT_DEF :Thm
7
val CUT_LEMMA :Thm
8
val SELECT_AX :Thm
9
10
val COND_CONG :Thm
11
val LET_CONG :Thm
12
13
val eqT :Thm
14
val rev_eq_mp :Thm
15
val simp_thm :Thm
16
end;