X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fmatita%2Fnlibrary%2Fsets%2Fsetoids1.ma;h=49d259d5dd46ddb0d7efff2f0bf532794d8589df;hb=221472ea1597505d12677f5742e388125a15e2b9;hp=115d1f6438a94da500eb447aa3d715b3e74353d8;hpb=a580ff5c627c4148cdd3649ead20f4fac0f78be8;p=helm.git diff --git a/helm/software/matita/nlibrary/sets/setoids1.ma b/helm/software/matita/nlibrary/sets/setoids1.ma index 115d1f643..49d259d5d 100644 --- a/helm/software/matita/nlibrary/sets/setoids1.ma +++ b/helm/software/matita/nlibrary/sets/setoids1.ma @@ -69,7 +69,7 @@ ndefinition unary_morphism1_setoid1: setoid1 → setoid1 → setoid1. #s; #s1; @ (unary_morphism1 s s1); @ [ #f; #g; napply (∀a:s. f a = g a) | #x; #a; napply refl1 - | #x; #y; #H; #a; napply sym1; nauto + | #x; #y; #H; #a; napply sym1; // | #x; #y; #z; #H1; #H2; #a; napply trans1; ##[##2: napply H1 | ##skip | napply H2]##] nqed.