src/HOL/Library/Nat_Bijection.thy
changeset 74965 9469d9223689
parent 71848 3c7852327787
--- a/src/HOL/Library/Nat_Bijection.thy	Tue Dec 21 22:11:10 2021 +0100
+++ b/src/HOL/Library/Nat_Bijection.thy	Sun Dec 26 11:01:27 2021 +0000
@@ -87,10 +87,10 @@
 lemma bij_prod_decode: "bij prod_decode"
   by (rule bijI [OF inj_prod_decode surj_prod_decode])
 
-lemma prod_encode_eq: "prod_encode x = prod_encode y \<longleftrightarrow> x = y"
+lemma prod_encode_eq [simp]: "prod_encode x = prod_encode y \<longleftrightarrow> x = y"
   by (rule inj_prod_encode [THEN inj_eq])
 
-lemma prod_decode_eq: "prod_decode x = prod_decode y \<longleftrightarrow> x = y"
+lemma prod_decode_eq [simp]: "prod_decode x = prod_decode y \<longleftrightarrow> x = y"
   by (rule inj_prod_decode [THEN inj_eq])