simplified coercDb implementation with additional info about the position of

[helm.git] / helm / software / matita / contribs / dama / dama / models / nat_dedekind_sigma_complete.ma

diff --git a/helm/software/matita/contribs/dama/dama/models/nat_dedekind_sigma_complete.ma b/helm/software/matita/contribs/dama/dama/models/nat_dedekind_sigma_complete.ma
index cb73c2d5f42aa617f167d4954ba63da2d3297496..2206017452995e0bc2d815dd0244da9838a1ddae 100644 (file)
--- a/helm/software/matita/contribs/dama/dama/models/nat_dedekind_sigma_complete.ma
+++ b/helm/software/matita/contribs/dama/dama/models/nat_dedekind_sigma_complete.ma
@@ -57,7 +57,7 @@ letin m ≝ (hide ? (
         apply le_plus_n_r;] 
 |2,3: clear H6;
     cases (aux n1) in H5 ⊢ %; intros;
-    change in match (a â\8c©w,H5â\8cª) in H6 ⊢ % with (a w);
+    change in match (a â\89ªw,H5â\89«) in H6 ⊢ % with (a w);
     cases H5; clear H5; cases H7; clear H7;
     [1: left; split; [ apply (le_S ?? H5); | assumption]
     |3: cases (?:False); rewrite < H8 in H6; apply (not_le_Sn_n ? H6);