src/HOL/ex/svc_test.thy
author nipkow
Fri, 24 Nov 2000 16:49:27 +0100
changeset 10519 ade64af4c57c
parent 7180 35676093459d
child 12873 d7f8dfaad46d
permissions -rw-r--r--
hide many names from Datatype_Universe.
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
7180
35676093459d new theory ex/svc_test.thy
paulson
parents:
diff changeset
     1
svc_test = Main +
35676093459d new theory ex/svc_test.thy
paulson
parents:
diff changeset
     2
35676093459d new theory ex/svc_test.thy
paulson
parents:
diff changeset
     3
syntax
35676093459d new theory ex/svc_test.thy
paulson
parents:
diff changeset
     4
    "<->"         :: [bool, bool] => bool                  (infixr 25)
35676093459d new theory ex/svc_test.thy
paulson
parents:
diff changeset
     5
35676093459d new theory ex/svc_test.thy
paulson
parents:
diff changeset
     6
translations
35676093459d new theory ex/svc_test.thy
paulson
parents:
diff changeset
     7
  "x <-> y" => "x = y"
35676093459d new theory ex/svc_test.thy
paulson
parents:
diff changeset
     8
35676093459d new theory ex/svc_test.thy
paulson
parents:
diff changeset
     9
end