src/FOLP/folp.thy
author paulson
Mon Apr 26 13:25:49 1999 +0200 (1999-04-26)
changeset 6509 9f7f4fd05b1f
parent 0 a5a9c433f639
permissions -rw-r--r--
fixed a bug many years old in rule plusEC
clasohm@0
     1
FOLP = IFOLP +
clasohm@0
     2
consts
clasohm@0
     3
  cla :: "[p=>p]=>p"
clasohm@0
     4
rules
clasohm@0
     5
  classical "(!!x.x:~P ==> f(x):P) ==> cla(f):P"
clasohm@0
     6
end