X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fmatita%2Fcontribs%2Fng_TPTP%2FRNG029-7.ma;fp=helm%2Fsoftware%2Fmatita%2Fcontribs%2Fng_TPTP%2FRNG029-7.ma;h=7d1816ac6a7d6e64bdbaebd1d1711cfe324908b6;hb=0639dda9142d1cf047b07e61fb557e8877aba4d8;hp=5be18d2cce26c8af2b006da92ff6914b30d8224c;hpb=c40f28fe5bfa74fc1fcef986c03fc960793902a5;p=helm.git diff --git a/helm/software/matita/contribs/ng_TPTP/RNG029-7.ma b/helm/software/matita/contribs/ng_TPTP/RNG029-7.ma index 5be18d2cc..7d1816ac6 100644 --- a/helm/software/matita/contribs/ng_TPTP/RNG029-7.ma +++ b/helm/software/matita/contribs/ng_TPTP/RNG029-7.ma @@ -114,7 +114,7 @@ include "logic/equality.ma". (* ----The next 7 clause are extra lemmas which Stevens found useful *) ntheorem prove_middle_moufang: - ∀Univ:Type.∀X:Univ.∀Y:Univ.∀Z:Univ. + (∀Univ:Type.∀X:Univ.∀Y:Univ.∀Z:Univ. ∀add:∀_:Univ.∀_:Univ.Univ. ∀additive_identity:Univ. ∀additive_inverse:∀_:Univ.Univ. @@ -145,44 +145,44 @@ ntheorem prove_middle_moufang: ∀H18:∀X:Univ.eq Univ (multiply X additive_identity) additive_identity. ∀H19:∀X:Univ.eq Univ (multiply additive_identity X) additive_identity. ∀H20:∀X:Univ.eq Univ (add X additive_identity) X. -∀H21:∀X:Univ.eq Univ (add additive_identity X) X.eq Univ (multiply (multiply x y) (multiply z x)) (multiply (multiply x (multiply y z)) x) +∀H21:∀X:Univ.eq Univ (add additive_identity X) X.eq Univ (multiply (multiply x y) (multiply z x)) (multiply (multiply x (multiply y z)) x)) . -#Univ. -#X. -#Y. -#Z. -#add. -#additive_identity. -#additive_inverse. -#associator. -#commutator. -#multiply. -#x. -#y. -#z. -#H0. -#H1. -#H2. -#H3. -#H4. -#H5. -#H6. -#H7. -#H8. -#H9. -#H10. -#H11. -#H12. -#H13. -#H14. -#H15. -#H16. -#H17. -#H18. -#H19. -#H20. -#H21. -nauto by H0,H1,H2,H3,H4,H5,H6,H7,H8,H9,H10,H11,H12,H13,H14,H15,H16,H17,H18,H19,H20,H21; +#Univ ##. +#X ##. +#Y ##. +#Z ##. +#add ##. +#additive_identity ##. +#additive_inverse ##. +#associator ##. +#commutator ##. +#multiply ##. +#x ##. +#y ##. +#z ##. +#H0 ##. +#H1 ##. +#H2 ##. +#H3 ##. +#H4 ##. +#H5 ##. +#H6 ##. +#H7 ##. +#H8 ##. +#H9 ##. +#H10 ##. +#H11 ##. +#H12 ##. +#H13 ##. +#H14 ##. +#H15 ##. +#H16 ##. +#H17 ##. +#H18 ##. +#H19 ##. +#H20 ##. +#H21 ##. +nauto by H0,H1,H2,H3,H4,H5,H6,H7,H8,H9,H10,H11,H12,H13,H14,H15,H16,H17,H18,H19,H20,H21 ##; nqed. (* -------------------------------------------------------------------------- *)