changeset 80914 | d97fdabd9e2b |
parent 67613 | ce654b0e6d69 |
--- a/src/HOL/MicroJava/DFA/Product.thy Fri Sep 20 19:07:10 2024 +0200 +++ b/src/HOL/MicroJava/DFA/Product.thy Fri Sep 20 19:51:08 2024 +0200 @@ -20,7 +20,7 @@ abbreviation lesubprod_sntax :: "'a * 'b \<Rightarrow> 'a ord \<Rightarrow> 'b ord \<Rightarrow> 'a * 'b \<Rightarrow> bool" - ("(_ /<='(_,_') _)" [50, 0, 0, 51] 50) + (\<open>(_ /<='(_,_') _)\<close> [50, 0, 0, 51] 50) where "p <=(rA,rB) q == p <=_(le rA rB) q" lemma unfold_lesub_prod: