diff -r f10b141078e7 -r 09be06943252 src/HOL/Relation.thy --- a/src/HOL/Relation.thy Tue May 16 21:32:56 2006 +0200 +++ b/src/HOL/Relation.thy Tue May 16 21:33:01 2006 +0200 @@ -12,13 +12,14 @@ subsection {* Definitions *} -constdefs +definition converse :: "('a * 'b) set => ('b * 'a) set" ("(_^-1)" [1000] 999) "r^-1 == {(y, x). (x, y) : r}" -syntax (xsymbols) - converse :: "('a * 'b) set => ('b * 'a) set" ("(_\)" [1000] 999) -constdefs +const_syntax (xsymbols) + converse ("(_\)" [1000] 999) + +definition rel_comp :: "[('b * 'c) set, ('a * 'b) set] => ('a * 'c) set" (infixr "O" 60) "r O s == {(x,z). EX y. (x, y) : s & (y, z) : r}"