src/Tools/8bit/doc/Set2_g.thy
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
consts
2a2c0dbeb4ac Initial revision
oheimb
parents:
diff changeset
     2
	Ball	:: "'a set ë ('a ë bool) ë bool"
2a2c0dbeb4ac Initial revision
oheimb
parents:
diff changeset
     3
syntax
2a2c0dbeb4ac Initial revision
oheimb
parents:
diff changeset
     4
	"®Ball"	:: "pttrn ë 'a set ë bool ë bool"	("(3Â_Î_./ _)" 10)
2a2c0dbeb4ac Initial revision
oheimb
parents:
diff changeset
     5
translations
2a2c0dbeb4ac Initial revision
oheimb
parents:
diff changeset
     6
		"ÂxÎA. P" == "Ball A (³x. P)"
2a2c0dbeb4ac Initial revision
oheimb
parents:
diff changeset
     7
defs
2a2c0dbeb4ac Initial revision
oheimb
parents:
diff changeset
     8
     Ball_def	"Ball A P Ú Âx. xÎA çè P x"
2a2c0dbeb4ac Initial revision
oheimb
parents:
diff changeset
     9