doc-src/Intro/arith.thy
author urbanc
Wed, 11 Jan 2006 18:39:19 +0100
changeset 18660 9968dc816cda
parent 105 216d6ed87399
permissions -rw-r--r--
cahges to use the new induction-principle (now proved in full glory)
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
105
216d6ed87399 Initial revision
lcp
parents:
diff changeset
     1
Arith = FOL +
216d6ed87399 Initial revision
lcp
parents:
diff changeset
     2
classes arith < term
216d6ed87399 Initial revision
lcp
parents:
diff changeset
     3
consts  "0"     :: "'a::arith"                  ("0")
216d6ed87399 Initial revision
lcp
parents:
diff changeset
     4
        "1"     :: "'a::arith"                  ("1")
216d6ed87399 Initial revision
lcp
parents:
diff changeset
     5
        "+"     :: "['a::arith,'a] => 'a"       (infixl 60)
216d6ed87399 Initial revision
lcp
parents:
diff changeset
     6
end