src/FOLP/folp.thy
author lcp
Tue, 16 Aug 1994 19:09:43 +0200
changeset 536 5fbfa997f1b0
parent 0 a5a9c433f639
permissions -rw-r--r--
ZF/domrange/domain_of_prod, domain_empty, etc: moved to equalities.ML where they can be proved trivially using eq_cs ZF/domrange/XXX_empty: renamed XXX_0
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