equal
deleted
inserted
replaced
37 "_reflcl" :: "('a \<times> 'a) set => ('a \<times> 'a) set" ("(_^=)" [1000] 999) |
37 "_reflcl" :: "('a \<times> 'a) set => ('a \<times> 'a) set" ("(_^=)" [1000] 999) |
38 translations |
38 translations |
39 "r^=" == "r \<union> Id" |
39 "r^=" == "r \<union> Id" |
40 |
40 |
41 syntax (xsymbols) |
41 syntax (xsymbols) |
42 rtrancl :: "('a \<times> 'a) set => ('a \<times> 'a) set" ("(_\\<^sup>*)" [1000] 999) |
42 rtrancl :: "('a \<times> 'a) set => ('a \<times> 'a) set" ("(_\<^sup>*)" [1000] 999) |
43 trancl :: "('a \<times> 'a) set => ('a \<times> 'a) set" ("(_\\<^sup>+)" [1000] 999) |
43 trancl :: "('a \<times> 'a) set => ('a \<times> 'a) set" ("(_\<^sup>+)" [1000] 999) |
44 "_reflcl" :: "('a \<times> 'a) set => ('a \<times> 'a) set" ("(_\\<^sup>=)" [1000] 999) |
44 "_reflcl" :: "('a \<times> 'a) set => ('a \<times> 'a) set" ("(_\<^sup>=)" [1000] 999) |
45 |
45 |
46 |
46 |
47 subsection {* Reflexive-transitive closure *} |
47 subsection {* Reflexive-transitive closure *} |
48 |
48 |
49 lemma r_into_rtrancl [intro]: "!!p. p \<in> r ==> p \<in> r^*" |
49 lemma r_into_rtrancl [intro]: "!!p. p \<in> r ==> p \<in> r^*" |