X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fmatita%2Fcontribs%2Fng_TPTP%2FLAT034-1.ma;h=d2f3dae396e54a3e4e30ca8b13ef945731883738;hb=e880d6eab5e1700f4a625ddcd7d0fa8f0cce2dcc;hp=ce4e272918f3f6e85c2c0189c0828050028cd84f;hpb=11e495dda047bcdfa4267c06cad2d074fcffe3e3;p=helm.git diff --git a/helm/software/matita/contribs/ng_TPTP/LAT034-1.ma b/helm/software/matita/contribs/ng_TPTP/LAT034-1.ma index ce4e27291..d2f3dae39 100644 --- a/helm/software/matita/contribs/ng_TPTP/LAT034-1.ma +++ b/helm/software/matita/contribs/ng_TPTP/LAT034-1.ma @@ -4,7 +4,7 @@ include "logic/equality.ma". (* -------------------------------------------------------------------------- *) -(* File : LAT034-1 : TPTP v3.2.0. Bugfixed v2.5.0. *) +(* File : LAT034-1 : TPTP v3.7.0. Bugfixed v2.5.0. *) (* Domain : Lattice Theory *) @@ -52,7 +52,7 @@ include "logic/equality.ma". (* -------------------------------------------------------------------------- *) ntheorem idempotence_of_meet: - ∀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_meet: ∀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 (meet xx xx) xx +∀H5:∀X:Univ.∀Y:Univ.eq Univ (meet X (join X Y)) X.eq Univ (meet 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. (* -------------------------------------------------------------------------- *)