src/FOLP/FOLP.thy
author lcp
Thu, 12 Jan 1995 03:01:20 +0100
changeset 851 f9172c4625f1
parent 0 a5a9c433f639
child 1142 eb0e2ff8f032
permissions -rw-r--r--
Moved theorems Ord_cases_lemma and Ord_cases here from Univ, strengthening the succ(j) case to include Ord(j). Proved trans_induct3, le_implies_UN_le_UN, Ord_1, lt_Ord2, le_Ord2.
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
0
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
     1
FOLP = IFOLP +
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
     2
consts
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
     3
  cla :: "[p=>p]=>p"
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
     4
rules
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
     5
  classical "(!!x.x:~P ==> f(x):P) ==> cla(f):P"
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
     6
end