src/FOLP/ex/If.thy
author wenzelm
Thu, 30 Oct 1997 11:19:57 +0100
changeset 4039 0db9f1098fd6
parent 0 a5a9c433f639
child 17480 fd19f77dcf60
permissions -rw-r--r--
fixed try_dest_adm; tuned;
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
0
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
     1
If = FOLP +
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
     2
consts  if     :: "[o,o,o]=>o"
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
     3
rules
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
     4
        if_def "if(P,Q,R) == P&Q | ~P&R"
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
     5
end