src/Tools/8bit/doc/Set2_a.thy
author wenzelm
Thu, 30 Nov 2000 20:04:16 +0100
changeset 10548 e8c774c12105
parent 1826 2a2c0dbeb4ac
permissions -rw-r--r--
'consumes' att;
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