X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fground%2Frelocation%2Fpr_ist_ist.ma;h=de3ecfe4ee36593fe71d4fff1f8c7e281968c724;hb=873fb39bdd21aa14877bf5d50db26e3a050c6d43;hp=cfb786adcdc7e9880381f69e224489ed2ef8633e;hpb=503500ff9a6d9cca363a42b5fe7f3f5de69239f9;p=helm.git diff --git a/matita/matita/contribs/lambdadelta/ground/relocation/pr_ist_ist.ma b/matita/matita/contribs/lambdadelta/ground/relocation/pr_ist_ist.ma index cfb786adc..de3ecfe4e 100644 --- a/matita/matita/contribs/lambdadelta/ground/relocation/pr_ist_ist.ma +++ b/matita/matita/contribs/lambdadelta/ground/relocation/pr_ist_ist.ma @@ -47,7 +47,7 @@ qed-. (*** at_ext *) corec theorem pr_eq_ext_pat (f1) (f2): 𝐓❨f1❩ → 𝐓❨f2❩ → (∀i,i1,i2. @❨i,f1❩ ≘ i1 → @❨i,f2❩ ≘ i2 → i1 = i2) → - f1 ≡ f2. + f1 ≐ f2. cases (pr_map_split_tl f1) #H1 cases (pr_map_split_tl f2) #H2 #Hf1 #Hf2 #Hi