X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fmatita%2Fcontribs%2Fng_TPTP%2FLAT033-1.ma;h=e04886e0d4b9c972acb91510a07cd2fd6c5b97b2;hb=601baed778a190b580982b588ebe49ba3f762b30;hp=c4318d931bf3ff7c3f11ba0f5d122dbf46d098bb;hpb=11e495dda047bcdfa4267c06cad2d074fcffe3e3;p=helm.git diff --git a/helm/software/matita/contribs/ng_TPTP/LAT033-1.ma b/helm/software/matita/contribs/ng_TPTP/LAT033-1.ma index c4318d931..e04886e0d 100644 --- a/helm/software/matita/contribs/ng_TPTP/LAT033-1.ma +++ b/helm/software/matita/contribs/ng_TPTP/LAT033-1.ma @@ -4,7 +4,7 @@ include "logic/equality.ma". (* -------------------------------------------------------------------------- *) -(* File : LAT033-1 : TPTP v3.2.0. Bugfixed v2.5.0. *) +(* File : LAT033-1 : TPTP v3.7.0. Bugfixed v2.5.0. *) (* Domain : Lattice Theory *) @@ -52,7 +52,7 @@ include "logic/equality.ma". (* -------------------------------------------------------------------------- *) ntheorem idempotence_of_join: - ∀Univ:Type.∀X:Univ.∀Y:Univ.∀Z:Univ. + (∀Univ:Type.∀X:Univ.∀Y:Univ.∀Z:Univ. ∀join:∀_:Univ.∀_:Univ.Univ. ∀meet:∀_:Univ.∀_:Univ.Univ. ∀xx:Univ. @@ -61,22 +61,23 @@ ntheorem idempotence_of_join: ∀H2:∀X:Univ.∀Y:Univ.eq Univ (join X Y) (join Y X). ∀H3:∀X:Univ.∀Y:Univ.eq Univ (meet X Y) (meet Y X). ∀H4:∀X:Univ.∀Y:Univ.eq Univ (join X (meet X Y)) X. -∀H5:∀X:Univ.∀Y:Univ.eq Univ (meet X (join X Y)) X.eq Univ (join xx xx) xx +∀H5:∀X:Univ.∀Y:Univ.eq Univ (meet X (join X Y)) X.eq Univ (join xx xx) xx) . -#Univ. -#X. -#Y. -#Z. -#join. -#meet. -#xx. -#H0. -#H1. -#H2. -#H3. -#H4. -#H5. -nauto by H0,H1,H2,H3,H4,H5; +#Univ ##. +#X ##. +#Y ##. +#Z ##. +#join ##. +#meet ##. +#xx ##. +#H0 ##. +#H1 ##. +#H2 ##. +#H3 ##. +#H4 ##. +#H5 ##. +nauto by H0,H1,H2,H3,H4,H5 ##; +ntry (nassumption) ##; nqed. (* -------------------------------------------------------------------------- *)