src/Tools/8bit/isa-patches/HOLCF/Cfun1.p
author paulson
Tue, 16 Jul 1996 15:49:46 +0200
changeset 1868 836950047d85
parent 1826 2a2c0dbeb4ac
permissions -rw-r--r--
Put in minimal simpset to avoid excessive simplification, just as in revision 1.9 of HOL/indrule.ML
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
1826
2a2c0dbeb4ac Initial revision
oheimb
parents:
diff changeset
     1
types
2a2c0dbeb4ac Initial revision
oheimb
parents:
diff changeset
     2
2a2c0dbeb4ac Initial revision
oheimb
parents:
diff changeset
     3
('a, 'b) "è"          (infixr 5)
2a2c0dbeb4ac Initial revision
oheimb
parents:
diff changeset
     4
2a2c0dbeb4ac Initial revision
oheimb
parents:
diff changeset
     5
syntax
2a2c0dbeb4ac Initial revision
oheimb
parents:
diff changeset
     6
	Gfabs	:: "('a => 'b)=>('a -> 'b)"	(binder "¤" 10)
2a2c0dbeb4ac Initial revision
oheimb
parents:
diff changeset
     7
2a2c0dbeb4ac Initial revision
oheimb
parents:
diff changeset
     8
translations
2a2c0dbeb4ac Initial revision
oheimb
parents:
diff changeset
     9
2a2c0dbeb4ac Initial revision
oheimb
parents:
diff changeset
    10
(type)  "x è y"	== (type) "x -> y" 
2a2c0dbeb4ac Initial revision
oheimb
parents:
diff changeset
    11