axioms : (string -> (string # thm) list)
- axioms"bool";
val it =
[("INFINITY_AX",|- ?f. ONE_ONE f /\ ~(ONTO f)),
("SELECT_AX",|- !P x. P x ==> P ($@ P)),
("ETA_AX",|- !t. (\x. t x) = t),
("IMP_ANTISYM_AX",|- !t1 t2. (t1 ==> t2) ==> (t2 ==> t1) ==> (t1 = t2)),
("BOOL_CASES_AX",|- !t. (t = T) \/ (t = F))] : (string * thm) list