%------------------------------------------------------------------------------ % File : Zenon---0.7.1 % Problem : ALG087+1 : TPTP v8.1.0. Released v2.7.0. % Transfm : none % Format : tptp:raw % Command : run_zenon %s %d % Computer : n017.cluster.edu % Model : x86_64 x86_64 % CPU : Intel(R) Xeon(R) CPU E5-2620 v4 2.10GHz % Memory : 8042.1875MB % OS : Linux 3.10.0-693.el7.x86_64 % CPULimit : 300s % WCLimit : 600s % DateTime : Thu Jul 14 18:29:11 EDT 2022 % Result : Theorem 217.93s 218.15s % Output : Proof 217.93s % Verified : % SZS Type : - % Comments : %------------------------------------------------------------------------------ %----WARNING: Could not form TPTP format derivation %------------------------------------------------------------------------------ %----ORIGINAL SYSTEM OUTPUT % 0.00/0.12 % Problem : ALG087+1 : TPTP v8.1.0. Released v2.7.0. % 0.12/0.12 % Command : run_zenon %s %d % 0.12/0.33 % Computer : n017.cluster.edu % 0.12/0.33 % Model : x86_64 x86_64 % 0.12/0.33 % CPU : Intel(R) Xeon(R) CPU E5-2620 v4 @ 2.10GHz % 0.12/0.33 % Memory : 8042.1875MB % 0.12/0.33 % OS : Linux 3.10.0-693.el7.x86_64 % 0.12/0.33 % CPULimit : 300 % 0.12/0.33 % WCLimit : 600 % 0.12/0.33 % DateTime : Wed Jun 8 02:54:33 EDT 2022 % 0.12/0.34 % CPUTime : % 217.93/218.15 (* PROOF-FOUND *) % 217.93/218.15 % SZS status Theorem % 217.93/218.15 (* BEGIN-PROOF *) % 217.93/218.15 % SZS output start Proof % 217.93/218.15 Theorem co1 : (((((h (e10)) = (e20))\/(((h (e10)) = (e21))\/(((h (e10)) = (e22))\/(((h (e10)) = (e23))\/((h (e10)) = (e24))))))/\((((h (e11)) = (e20))\/(((h (e11)) = (e21))\/(((h (e11)) = (e22))\/(((h (e11)) = (e23))\/((h (e11)) = (e24))))))/\((((h (e12)) = (e20))\/(((h (e12)) = (e21))\/(((h (e12)) = (e22))\/(((h (e12)) = (e23))\/((h (e12)) = (e24))))))/\((((h (e13)) = (e20))\/(((h (e13)) = (e21))\/(((h (e13)) = (e22))\/(((h (e13)) = (e23))\/((h (e13)) = (e24))))))/\((((h (e14)) = (e20))\/(((h (e14)) = (e21))\/(((h (e14)) = (e22))\/(((h (e14)) = (e23))\/((h (e14)) = (e24))))))/\((((j (e20)) = (e10))\/(((j (e20)) = (e11))\/(((j (e20)) = (e12))\/(((j (e20)) = (e13))\/((j (e20)) = (e14))))))/\((((j (e21)) = (e10))\/(((j (e21)) = (e11))\/(((j (e21)) = (e12))\/(((j (e21)) = (e13))\/((j (e21)) = (e14))))))/\((((j (e22)) = (e10))\/(((j (e22)) = (e11))\/(((j (e22)) = (e12))\/(((j (e22)) = (e13))\/((j (e22)) = (e14))))))/\((((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14))))))/\(((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))))))))))))->(~(((h (op1 (e10) (e10))) = (op2 (h (e10)) (h (e10))))/\(((h (op1 (e10) (e11))) = (op2 (h (e10)) (h (e11))))/\(((h (op1 (e10) (e12))) = (op2 (h (e10)) (h (e12))))/\(((h (op1 (e10) (e13))) = (op2 (h (e10)) (h (e13))))/\(((h (op1 (e10) (e14))) = (op2 (h (e10)) (h (e14))))/\(((h (op1 (e11) (e10))) = (op2 (h (e11)) (h (e10))))/\(((h (op1 (e11) (e11))) = (op2 (h (e11)) (h (e11))))/\(((h (op1 (e11) (e12))) = (op2 (h (e11)) (h (e12))))/\(((h (op1 (e11) (e13))) = (op2 (h (e11)) (h (e13))))/\(((h (op1 (e11) (e14))) = (op2 (h (e11)) (h (e14))))/\(((h (op1 (e12) (e10))) = (op2 (h (e12)) (h (e10))))/\(((h (op1 (e12) (e11))) = (op2 (h (e12)) (h (e11))))/\(((h (op1 (e12) (e12))) = (op2 (h (e12)) (h (e12))))/\(((h (op1 (e12) (e13))) = (op2 (h (e12)) (h (e13))))/\(((h (op1 (e12) (e14))) = (op2 (h (e12)) (h (e14))))/\(((h (op1 (e13) (e10))) = (op2 (h (e13)) (h (e10))))/\(((h (op1 (e13) (e11))) = (op2 (h (e13)) (h (e11))))/\(((h (op1 (e13) (e12))) = (op2 (h (e13)) (h (e12))))/\(((h (op1 (e13) (e13))) = (op2 (h (e13)) (h (e13))))/\(((h (op1 (e13) (e14))) = (op2 (h (e13)) (h (e14))))/\(((h (op1 (e14) (e10))) = (op2 (h (e14)) (h (e10))))/\(((h (op1 (e14) (e11))) = (op2 (h (e14)) (h (e11))))/\(((h (op1 (e14) (e12))) = (op2 (h (e14)) (h (e12))))/\(((h (op1 (e14) (e13))) = (op2 (h (e14)) (h (e13))))/\(((h (op1 (e14) (e14))) = (op2 (h (e14)) (h (e14))))/\(((j (op2 (e20) (e20))) = (op1 (j (e20)) (j (e20))))/\(((j (op2 (e20) (e21))) = (op1 (j (e20)) (j (e21))))/\(((j (op2 (e20) (e22))) = (op1 (j (e20)) (j (e22))))/\(((j (op2 (e20) (e23))) = (op1 (j (e20)) (j (e23))))/\(((j (op2 (e20) (e24))) = (op1 (j (e20)) (j (e24))))/\(((j (op2 (e21) (e20))) = (op1 (j (e21)) (j (e20))))/\(((j (op2 (e21) (e21))) = (op1 (j (e21)) (j (e21))))/\(((j (op2 (e21) (e22))) = (op1 (j (e21)) (j (e22))))/\(((j (op2 (e21) (e23))) = (op1 (j (e21)) (j (e23))))/\(((j (op2 (e21) (e24))) = (op1 (j (e21)) (j (e24))))/\(((j (op2 (e22) (e20))) = (op1 (j (e22)) (j (e20))))/\(((j (op2 (e22) (e21))) = (op1 (j (e22)) (j (e21))))/\(((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22))))/\(((j (op2 (e22) (e23))) = (op1 (j (e22)) (j (e23))))/\(((j (op2 (e22) (e24))) = (op1 (j (e22)) (j (e24))))/\(((j (op2 (e23) (e20))) = (op1 (j (e23)) (j (e20))))/\(((j (op2 (e23) (e21))) = (op1 (j (e23)) (j (e21))))/\(((j (op2 (e23) (e22))) = (op1 (j (e23)) (j (e22))))/\(((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23))))/\(((j (op2 (e23) (e24))) = (op1 (j (e23)) (j (e24))))/\(((j (op2 (e24) (e20))) = (op1 (j (e24)) (j (e20))))/\(((j (op2 (e24) (e21))) = (op1 (j (e24)) (j (e21))))/\(((j (op2 (e24) (e22))) = (op1 (j (e24)) (j (e22))))/\(((j (op2 (e24) (e23))) = (op1 (j (e24)) (j (e23))))/\(((j (op2 (e24) (e24))) = (op1 (j (e24)) (j (e24))))/\(((h (j (e20))) = (e20))/\(((h (j (e21))) = (e21))/\(((h (j (e22))) = (e22))/\(((h (j (e23))) = (e23))/\(((h (j (e24))) = (e24))/\(((j (h (e10))) = (e10))/\(((j (h (e11))) = (e11))/\(((j (h (e12))) = (e12))/\(((j (h (e13))) = (e13))/\((j (h (e14))) = (e14))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))). % 217.93/218.15 Proof. % 217.93/218.15 assert (zenon_L1_ : (~((j (h (e12))) = (j (e20)))) -> ((h (e12)) = (e20)) -> False). % 217.93/218.15 do 0 intro. intros zenon_H6 zenon_H7. % 217.93/218.15 cut (((h (e12)) = (e20))); [idtac | apply NNPP; zenon_intro zenon_H8]. % 217.93/218.15 congruence. % 217.93/218.15 exact (zenon_H8 zenon_H7). % 217.93/218.15 (* end of lemma zenon_L1_ *) % 217.93/218.15 assert (zenon_L2_ : (~((e10) = (e10))) -> False). % 217.93/218.15 do 0 intro. intros zenon_H9. % 217.93/218.15 apply zenon_H9. apply refl_equal. % 217.93/218.15 (* end of lemma zenon_L2_ *) % 217.93/218.15 assert (zenon_L3_ : (~((e12) = (e12))) -> False). % 217.93/218.15 do 0 intro. intros zenon_Ha. % 217.93/218.15 apply zenon_Ha. apply refl_equal. % 217.93/218.15 (* end of lemma zenon_L3_ *) % 217.93/218.15 assert (zenon_L4_ : (~((e10) = (e12))) -> ((j (h (e12))) = (e12)) -> ((h (e12)) = (e20)) -> ((j (e20)) = (e10)) -> False). % 217.93/218.15 do 0 intro. intros zenon_Hb zenon_Hc zenon_H7 zenon_Hd. % 217.93/218.15 cut (((j (h (e12))) = (e12)) = ((e10) = (e12))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_Hb. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_Hc. % 217.93/218.15 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.15 cut (((j (h (e12))) = (e10))); [idtac | apply NNPP; zenon_intro zenon_He]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((e10) = (e10))); [ zenon_intro zenon_Hf | zenon_intro zenon_H9 ]. % 217.93/218.15 cut (((e10) = (e10)) = ((j (h (e12))) = (e10))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_He. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_Hf. % 217.93/218.15 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.15 cut (((e10) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H10]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((j (h (e12))) = (j (h (e12))))); [ zenon_intro zenon_H11 | zenon_intro zenon_H12 ]. % 217.93/218.15 cut (((j (h (e12))) = (j (h (e12)))) = ((e10) = (j (h (e12))))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H10. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H11. % 217.93/218.15 cut (((j (h (e12))) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H12]. % 217.93/218.15 cut (((j (h (e12))) = (e10))); [idtac | apply NNPP; zenon_intro zenon_He]. % 217.93/218.15 congruence. % 217.93/218.15 cut (((j (e20)) = (e10)) = ((j (h (e12))) = (e10))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_He. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_Hd. % 217.93/218.15 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.15 cut (((j (e20)) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H13]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((j (h (e12))) = (j (h (e12))))); [ zenon_intro zenon_H11 | zenon_intro zenon_H12 ]. % 217.93/218.15 cut (((j (h (e12))) = (j (h (e12)))) = ((j (e20)) = (j (h (e12))))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H13. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H11. % 217.93/218.15 cut (((j (h (e12))) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H12]. % 217.93/218.15 cut (((j (h (e12))) = (j (e20)))); [idtac | apply NNPP; zenon_intro zenon_H6]. % 217.93/218.15 congruence. % 217.93/218.15 apply (zenon_L1_); trivial. % 217.93/218.15 apply zenon_H12. apply refl_equal. % 217.93/218.15 apply zenon_H12. apply refl_equal. % 217.93/218.15 apply zenon_H9. apply refl_equal. % 217.93/218.15 apply zenon_H12. apply refl_equal. % 217.93/218.15 apply zenon_H12. apply refl_equal. % 217.93/218.15 apply zenon_H9. apply refl_equal. % 217.93/218.15 apply zenon_H9. apply refl_equal. % 217.93/218.15 apply zenon_Ha. apply refl_equal. % 217.93/218.15 (* end of lemma zenon_L4_ *) % 217.93/218.15 assert (zenon_L5_ : (~((e11) = (e11))) -> False). % 217.93/218.15 do 0 intro. intros zenon_H14. % 217.93/218.15 apply zenon_H14. apply refl_equal. % 217.93/218.15 (* end of lemma zenon_L5_ *) % 217.93/218.15 assert (zenon_L6_ : (~((e11) = (e12))) -> ((j (h (e12))) = (e12)) -> ((h (e12)) = (e20)) -> ((j (e20)) = (e11)) -> False). % 217.93/218.15 do 0 intro. intros zenon_H15 zenon_Hc zenon_H7 zenon_H16. % 217.93/218.15 cut (((j (h (e12))) = (e12)) = ((e11) = (e12))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H15. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_Hc. % 217.93/218.15 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.15 cut (((j (h (e12))) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H17]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((e11) = (e11))); [ zenon_intro zenon_H18 | zenon_intro zenon_H14 ]. % 217.93/218.15 cut (((e11) = (e11)) = ((j (h (e12))) = (e11))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H17. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H18. % 217.93/218.15 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.15 cut (((e11) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H19]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((j (h (e12))) = (j (h (e12))))); [ zenon_intro zenon_H11 | zenon_intro zenon_H12 ]. % 217.93/218.15 cut (((j (h (e12))) = (j (h (e12)))) = ((e11) = (j (h (e12))))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H19. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H11. % 217.93/218.15 cut (((j (h (e12))) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H12]. % 217.93/218.15 cut (((j (h (e12))) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H17]. % 217.93/218.15 congruence. % 217.93/218.15 cut (((j (e20)) = (e11)) = ((j (h (e12))) = (e11))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H17. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H16. % 217.93/218.15 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.15 cut (((j (e20)) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H13]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((j (h (e12))) = (j (h (e12))))); [ zenon_intro zenon_H11 | zenon_intro zenon_H12 ]. % 217.93/218.15 cut (((j (h (e12))) = (j (h (e12)))) = ((j (e20)) = (j (h (e12))))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H13. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H11. % 217.93/218.15 cut (((j (h (e12))) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H12]. % 217.93/218.15 cut (((j (h (e12))) = (j (e20)))); [idtac | apply NNPP; zenon_intro zenon_H6]. % 217.93/218.15 congruence. % 217.93/218.15 apply (zenon_L1_); trivial. % 217.93/218.15 apply zenon_H12. apply refl_equal. % 217.93/218.15 apply zenon_H12. apply refl_equal. % 217.93/218.15 apply zenon_H14. apply refl_equal. % 217.93/218.15 apply zenon_H12. apply refl_equal. % 217.93/218.15 apply zenon_H12. apply refl_equal. % 217.93/218.15 apply zenon_H14. apply refl_equal. % 217.93/218.15 apply zenon_H14. apply refl_equal. % 217.93/218.15 apply zenon_Ha. apply refl_equal. % 217.93/218.15 (* end of lemma zenon_L6_ *) % 217.93/218.15 assert (zenon_L7_ : (~((j (h (e10))) = (j (e20)))) -> ((h (e10)) = (e20)) -> False). % 217.93/218.15 do 0 intro. intros zenon_H1a zenon_H1b. % 217.93/218.15 cut (((h (e10)) = (e20))); [idtac | apply NNPP; zenon_intro zenon_H1c]. % 217.93/218.15 congruence. % 217.93/218.15 exact (zenon_H1c zenon_H1b). % 217.93/218.15 (* end of lemma zenon_L7_ *) % 217.93/218.15 assert (zenon_L8_ : (~((e13) = (e13))) -> False). % 217.93/218.15 do 0 intro. intros zenon_H1d. % 217.93/218.15 apply zenon_H1d. apply refl_equal. % 217.93/218.15 (* end of lemma zenon_L8_ *) % 217.93/218.15 assert (zenon_L9_ : ((j (h (e12))) = (e12)) -> ((h (e12)) = (e20)) -> ((j (e20)) = (e13)) -> (~((e12) = (e13))) -> False). % 217.93/218.15 do 0 intro. intros zenon_Hc zenon_H7 zenon_H1e zenon_H1f. % 217.93/218.15 elim (classic ((e13) = (e13))); [ zenon_intro zenon_H20 | zenon_intro zenon_H1d ]. % 217.93/218.15 cut (((e13) = (e13)) = ((e12) = (e13))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H1f. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H20. % 217.93/218.15 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.15 cut (((e13) = (e12))); [idtac | apply NNPP; zenon_intro zenon_H21]. % 217.93/218.15 congruence. % 217.93/218.15 cut (((j (h (e12))) = (e12)) = ((e13) = (e12))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H21. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_Hc. % 217.93/218.15 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.15 cut (((j (h (e12))) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H22]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((e13) = (e13))); [ zenon_intro zenon_H20 | zenon_intro zenon_H1d ]. % 217.93/218.15 cut (((e13) = (e13)) = ((j (h (e12))) = (e13))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H22. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H20. % 217.93/218.15 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.15 cut (((e13) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H23]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((j (h (e12))) = (j (h (e12))))); [ zenon_intro zenon_H11 | zenon_intro zenon_H12 ]. % 217.93/218.15 cut (((j (h (e12))) = (j (h (e12)))) = ((e13) = (j (h (e12))))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H23. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H11. % 217.93/218.15 cut (((j (h (e12))) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H12]. % 217.93/218.15 cut (((j (h (e12))) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H22]. % 217.93/218.15 congruence. % 217.93/218.15 cut (((j (e20)) = (e13)) = ((j (h (e12))) = (e13))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H22. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H1e. % 217.93/218.15 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.15 cut (((j (e20)) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H13]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((j (h (e12))) = (j (h (e12))))); [ zenon_intro zenon_H11 | zenon_intro zenon_H12 ]. % 217.93/218.15 cut (((j (h (e12))) = (j (h (e12)))) = ((j (e20)) = (j (h (e12))))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H13. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H11. % 217.93/218.15 cut (((j (h (e12))) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H12]. % 217.93/218.15 cut (((j (h (e12))) = (j (e20)))); [idtac | apply NNPP; zenon_intro zenon_H6]. % 217.93/218.15 congruence. % 217.93/218.15 apply (zenon_L1_); trivial. % 217.93/218.15 apply zenon_H12. apply refl_equal. % 217.93/218.15 apply zenon_H12. apply refl_equal. % 217.93/218.15 apply zenon_H1d. apply refl_equal. % 217.93/218.15 apply zenon_H12. apply refl_equal. % 217.93/218.15 apply zenon_H12. apply refl_equal. % 217.93/218.15 apply zenon_H1d. apply refl_equal. % 217.93/218.15 apply zenon_H1d. apply refl_equal. % 217.93/218.15 apply zenon_Ha. apply refl_equal. % 217.93/218.15 apply zenon_H1d. apply refl_equal. % 217.93/218.15 apply zenon_H1d. apply refl_equal. % 217.93/218.15 (* end of lemma zenon_L9_ *) % 217.93/218.15 assert (zenon_L10_ : (~((e14) = (e14))) -> False). % 217.93/218.15 do 0 intro. intros zenon_H24. % 217.93/218.15 apply zenon_H24. apply refl_equal. % 217.93/218.15 (* end of lemma zenon_L10_ *) % 217.93/218.15 assert (zenon_L11_ : ((j (h (e12))) = (e12)) -> ((h (e12)) = (e20)) -> ((j (e20)) = (e14)) -> (~((e12) = (e14))) -> False). % 217.93/218.15 do 0 intro. intros zenon_Hc zenon_H7 zenon_H25 zenon_H26. % 217.93/218.15 elim (classic ((e14) = (e14))); [ zenon_intro zenon_H27 | zenon_intro zenon_H24 ]. % 217.93/218.15 cut (((e14) = (e14)) = ((e12) = (e14))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H26. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H27. % 217.93/218.15 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.15 cut (((e14) = (e12))); [idtac | apply NNPP; zenon_intro zenon_H28]. % 217.93/218.15 congruence. % 217.93/218.15 cut (((j (h (e12))) = (e12)) = ((e14) = (e12))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H28. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_Hc. % 217.93/218.15 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.15 cut (((j (h (e12))) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H29]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((e14) = (e14))); [ zenon_intro zenon_H27 | zenon_intro zenon_H24 ]. % 217.93/218.15 cut (((e14) = (e14)) = ((j (h (e12))) = (e14))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H29. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H27. % 217.93/218.15 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.15 cut (((e14) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H2a]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((j (h (e12))) = (j (h (e12))))); [ zenon_intro zenon_H11 | zenon_intro zenon_H12 ]. % 217.93/218.15 cut (((j (h (e12))) = (j (h (e12)))) = ((e14) = (j (h (e12))))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H2a. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H11. % 217.93/218.15 cut (((j (h (e12))) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H12]. % 217.93/218.15 cut (((j (h (e12))) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H29]. % 217.93/218.15 congruence. % 217.93/218.15 cut (((j (e20)) = (e14)) = ((j (h (e12))) = (e14))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H29. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H25. % 217.93/218.15 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.15 cut (((j (e20)) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H13]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((j (h (e12))) = (j (h (e12))))); [ zenon_intro zenon_H11 | zenon_intro zenon_H12 ]. % 217.93/218.15 cut (((j (h (e12))) = (j (h (e12)))) = ((j (e20)) = (j (h (e12))))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H13. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H11. % 217.93/218.15 cut (((j (h (e12))) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H12]. % 217.93/218.15 cut (((j (h (e12))) = (j (e20)))); [idtac | apply NNPP; zenon_intro zenon_H6]. % 217.93/218.15 congruence. % 217.93/218.15 apply (zenon_L1_); trivial. % 217.93/218.15 apply zenon_H12. apply refl_equal. % 217.93/218.15 apply zenon_H12. apply refl_equal. % 217.93/218.15 apply zenon_H24. apply refl_equal. % 217.93/218.15 apply zenon_H12. apply refl_equal. % 217.93/218.15 apply zenon_H12. apply refl_equal. % 217.93/218.15 apply zenon_H24. apply refl_equal. % 217.93/218.15 apply zenon_H24. apply refl_equal. % 217.93/218.15 apply zenon_Ha. apply refl_equal. % 217.93/218.15 apply zenon_H24. apply refl_equal. % 217.93/218.15 apply zenon_H24. apply refl_equal. % 217.93/218.15 (* end of lemma zenon_L11_ *) % 217.93/218.15 assert (zenon_L12_ : (((j (e20)) = (e10))\/(((j (e20)) = (e11))\/(((j (e20)) = (e12))\/(((j (e20)) = (e13))\/((j (e20)) = (e14)))))) -> (~((e11) = (e12))) -> (~((e10) = (e12))) -> ((h (e10)) = (e20)) -> ((j (h (e10))) = (e10)) -> (~((e12) = (e13))) -> ((j (h (e12))) = (e12)) -> ((h (e12)) = (e20)) -> (~((e12) = (e14))) -> False). % 217.93/218.15 do 0 intro. intros zenon_H2b zenon_H15 zenon_Hb zenon_H1b zenon_H2c zenon_H1f zenon_Hc zenon_H7 zenon_H26. % 217.93/218.15 apply (zenon_or_s _ _ zenon_H2b); [ zenon_intro zenon_Hd | zenon_intro zenon_H2d ]. % 217.93/218.15 apply (zenon_L4_); trivial. % 217.93/218.15 apply (zenon_or_s _ _ zenon_H2d); [ zenon_intro zenon_H16 | zenon_intro zenon_H2e ]. % 217.93/218.15 apply (zenon_L6_); trivial. % 217.93/218.15 apply (zenon_or_s _ _ zenon_H2e); [ zenon_intro zenon_H30 | zenon_intro zenon_H2f ]. % 217.93/218.15 elim (classic ((e12) = (e12))); [ zenon_intro zenon_H31 | zenon_intro zenon_Ha ]. % 217.93/218.15 cut (((e12) = (e12)) = ((e10) = (e12))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_Hb. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H31. % 217.93/218.15 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.15 cut (((e12) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H32]. % 217.93/218.15 congruence. % 217.93/218.15 cut (((j (h (e10))) = (e10)) = ((e12) = (e10))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H32. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H2c. % 217.93/218.15 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.15 cut (((j (h (e10))) = (e12))); [idtac | apply NNPP; zenon_intro zenon_H33]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((e12) = (e12))); [ zenon_intro zenon_H31 | zenon_intro zenon_Ha ]. % 217.93/218.15 cut (((e12) = (e12)) = ((j (h (e10))) = (e12))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H33. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H31. % 217.93/218.15 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.15 cut (((e12) = (j (h (e10))))); [idtac | apply NNPP; zenon_intro zenon_H34]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((j (h (e10))) = (j (h (e10))))); [ zenon_intro zenon_H35 | zenon_intro zenon_H36 ]. % 217.93/218.15 cut (((j (h (e10))) = (j (h (e10)))) = ((e12) = (j (h (e10))))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H34. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H35. % 217.93/218.15 cut (((j (h (e10))) = (j (h (e10))))); [idtac | apply NNPP; zenon_intro zenon_H36]. % 217.93/218.15 cut (((j (h (e10))) = (e12))); [idtac | apply NNPP; zenon_intro zenon_H33]. % 217.93/218.15 congruence. % 217.93/218.15 cut (((j (e20)) = (e12)) = ((j (h (e10))) = (e12))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H33. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H30. % 217.93/218.15 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.15 cut (((j (e20)) = (j (h (e10))))); [idtac | apply NNPP; zenon_intro zenon_H37]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((j (h (e10))) = (j (h (e10))))); [ zenon_intro zenon_H35 | zenon_intro zenon_H36 ]. % 217.93/218.15 cut (((j (h (e10))) = (j (h (e10)))) = ((j (e20)) = (j (h (e10))))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H37. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H35. % 217.93/218.15 cut (((j (h (e10))) = (j (h (e10))))); [idtac | apply NNPP; zenon_intro zenon_H36]. % 217.93/218.15 cut (((j (h (e10))) = (j (e20)))); [idtac | apply NNPP; zenon_intro zenon_H1a]. % 217.93/218.15 congruence. % 217.93/218.15 apply (zenon_L7_); trivial. % 217.93/218.15 apply zenon_H36. apply refl_equal. % 217.93/218.15 apply zenon_H36. apply refl_equal. % 217.93/218.15 apply zenon_Ha. apply refl_equal. % 217.93/218.15 apply zenon_H36. apply refl_equal. % 217.93/218.15 apply zenon_H36. apply refl_equal. % 217.93/218.15 apply zenon_Ha. apply refl_equal. % 217.93/218.15 apply zenon_Ha. apply refl_equal. % 217.93/218.15 apply zenon_H9. apply refl_equal. % 217.93/218.15 apply zenon_Ha. apply refl_equal. % 217.93/218.15 apply zenon_Ha. apply refl_equal. % 217.93/218.15 apply (zenon_or_s _ _ zenon_H2f); [ zenon_intro zenon_H1e | zenon_intro zenon_H25 ]. % 217.93/218.15 apply (zenon_L9_); trivial. % 217.93/218.15 apply (zenon_L11_); trivial. % 217.93/218.15 (* end of lemma zenon_L12_ *) % 217.93/218.15 assert (zenon_L13_ : (~((j (h (e13))) = (j (e20)))) -> ((h (e13)) = (e20)) -> False). % 217.93/218.15 do 0 intro. intros zenon_H38 zenon_H39. % 217.93/218.15 cut (((h (e13)) = (e20))); [idtac | apply NNPP; zenon_intro zenon_H3a]. % 217.93/218.15 congruence. % 217.93/218.15 exact (zenon_H3a zenon_H39). % 217.93/218.15 (* end of lemma zenon_L13_ *) % 217.93/218.15 assert (zenon_L14_ : (~((e10) = (e13))) -> ((j (h (e13))) = (e13)) -> ((h (e13)) = (e20)) -> ((j (e20)) = (e10)) -> False). % 217.93/218.15 do 0 intro. intros zenon_H3b zenon_H3c zenon_H39 zenon_Hd. % 217.93/218.15 cut (((j (h (e13))) = (e13)) = ((e10) = (e13))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H3b. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H3c. % 217.93/218.15 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.15 cut (((j (h (e13))) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H3d]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((e10) = (e10))); [ zenon_intro zenon_Hf | zenon_intro zenon_H9 ]. % 217.93/218.15 cut (((e10) = (e10)) = ((j (h (e13))) = (e10))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H3d. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_Hf. % 217.93/218.15 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.15 cut (((e10) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H3e]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((j (h (e13))) = (j (h (e13))))); [ zenon_intro zenon_H3f | zenon_intro zenon_H40 ]. % 217.93/218.15 cut (((j (h (e13))) = (j (h (e13)))) = ((e10) = (j (h (e13))))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H3e. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H3f. % 217.93/218.15 cut (((j (h (e13))) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H40]. % 217.93/218.15 cut (((j (h (e13))) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H3d]. % 217.93/218.15 congruence. % 217.93/218.15 cut (((j (e20)) = (e10)) = ((j (h (e13))) = (e10))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H3d. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_Hd. % 217.93/218.15 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.15 cut (((j (e20)) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H41]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((j (h (e13))) = (j (h (e13))))); [ zenon_intro zenon_H3f | zenon_intro zenon_H40 ]. % 217.93/218.15 cut (((j (h (e13))) = (j (h (e13)))) = ((j (e20)) = (j (h (e13))))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H41. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H3f. % 217.93/218.15 cut (((j (h (e13))) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H40]. % 217.93/218.15 cut (((j (h (e13))) = (j (e20)))); [idtac | apply NNPP; zenon_intro zenon_H38]. % 217.93/218.15 congruence. % 217.93/218.15 apply (zenon_L13_); trivial. % 217.93/218.15 apply zenon_H40. apply refl_equal. % 217.93/218.15 apply zenon_H40. apply refl_equal. % 217.93/218.15 apply zenon_H9. apply refl_equal. % 217.93/218.15 apply zenon_H40. apply refl_equal. % 217.93/218.15 apply zenon_H40. apply refl_equal. % 217.93/218.15 apply zenon_H9. apply refl_equal. % 217.93/218.15 apply zenon_H9. apply refl_equal. % 217.93/218.15 apply zenon_H1d. apply refl_equal. % 217.93/218.15 (* end of lemma zenon_L14_ *) % 217.93/218.15 assert (zenon_L15_ : (~((e11) = (e13))) -> ((j (h (e13))) = (e13)) -> ((h (e13)) = (e20)) -> ((j (e20)) = (e11)) -> False). % 217.93/218.15 do 0 intro. intros zenon_H42 zenon_H3c zenon_H39 zenon_H16. % 217.93/218.15 cut (((j (h (e13))) = (e13)) = ((e11) = (e13))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H42. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H3c. % 217.93/218.15 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.15 cut (((j (h (e13))) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H43]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((e11) = (e11))); [ zenon_intro zenon_H18 | zenon_intro zenon_H14 ]. % 217.93/218.15 cut (((e11) = (e11)) = ((j (h (e13))) = (e11))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H43. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H18. % 217.93/218.15 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.15 cut (((e11) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H44]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((j (h (e13))) = (j (h (e13))))); [ zenon_intro zenon_H3f | zenon_intro zenon_H40 ]. % 217.93/218.15 cut (((j (h (e13))) = (j (h (e13)))) = ((e11) = (j (h (e13))))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H44. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H3f. % 217.93/218.15 cut (((j (h (e13))) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H40]. % 217.93/218.15 cut (((j (h (e13))) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H43]. % 217.93/218.15 congruence. % 217.93/218.15 cut (((j (e20)) = (e11)) = ((j (h (e13))) = (e11))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H43. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H16. % 217.93/218.15 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.15 cut (((j (e20)) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H41]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((j (h (e13))) = (j (h (e13))))); [ zenon_intro zenon_H3f | zenon_intro zenon_H40 ]. % 217.93/218.15 cut (((j (h (e13))) = (j (h (e13)))) = ((j (e20)) = (j (h (e13))))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H41. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H3f. % 217.93/218.15 cut (((j (h (e13))) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H40]. % 217.93/218.15 cut (((j (h (e13))) = (j (e20)))); [idtac | apply NNPP; zenon_intro zenon_H38]. % 217.93/218.15 congruence. % 217.93/218.15 apply (zenon_L13_); trivial. % 217.93/218.15 apply zenon_H40. apply refl_equal. % 217.93/218.15 apply zenon_H40. apply refl_equal. % 217.93/218.15 apply zenon_H14. apply refl_equal. % 217.93/218.15 apply zenon_H40. apply refl_equal. % 217.93/218.15 apply zenon_H40. apply refl_equal. % 217.93/218.15 apply zenon_H14. apply refl_equal. % 217.93/218.15 apply zenon_H14. apply refl_equal. % 217.93/218.15 apply zenon_H1d. apply refl_equal. % 217.93/218.15 (* end of lemma zenon_L15_ *) % 217.93/218.15 assert (zenon_L16_ : (~((e12) = (e13))) -> ((j (h (e13))) = (e13)) -> ((h (e13)) = (e20)) -> ((j (e20)) = (e12)) -> False). % 217.93/218.15 do 0 intro. intros zenon_H1f zenon_H3c zenon_H39 zenon_H30. % 217.93/218.15 cut (((j (h (e13))) = (e13)) = ((e12) = (e13))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H1f. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H3c. % 217.93/218.15 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.15 cut (((j (h (e13))) = (e12))); [idtac | apply NNPP; zenon_intro zenon_H45]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((e12) = (e12))); [ zenon_intro zenon_H31 | zenon_intro zenon_Ha ]. % 217.93/218.15 cut (((e12) = (e12)) = ((j (h (e13))) = (e12))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H45. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H31. % 217.93/218.15 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.15 cut (((e12) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H46]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((j (h (e13))) = (j (h (e13))))); [ zenon_intro zenon_H3f | zenon_intro zenon_H40 ]. % 217.93/218.15 cut (((j (h (e13))) = (j (h (e13)))) = ((e12) = (j (h (e13))))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H46. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H3f. % 217.93/218.15 cut (((j (h (e13))) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H40]. % 217.93/218.15 cut (((j (h (e13))) = (e12))); [idtac | apply NNPP; zenon_intro zenon_H45]. % 217.93/218.15 congruence. % 217.93/218.15 cut (((j (e20)) = (e12)) = ((j (h (e13))) = (e12))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H45. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H30. % 217.93/218.15 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.15 cut (((j (e20)) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H41]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((j (h (e13))) = (j (h (e13))))); [ zenon_intro zenon_H3f | zenon_intro zenon_H40 ]. % 217.93/218.15 cut (((j (h (e13))) = (j (h (e13)))) = ((j (e20)) = (j (h (e13))))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H41. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H3f. % 217.93/218.15 cut (((j (h (e13))) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H40]. % 217.93/218.15 cut (((j (h (e13))) = (j (e20)))); [idtac | apply NNPP; zenon_intro zenon_H38]. % 217.93/218.15 congruence. % 217.93/218.15 apply (zenon_L13_); trivial. % 217.93/218.15 apply zenon_H40. apply refl_equal. % 217.93/218.15 apply zenon_H40. apply refl_equal. % 217.93/218.15 apply zenon_Ha. apply refl_equal. % 217.93/218.15 apply zenon_H40. apply refl_equal. % 217.93/218.15 apply zenon_H40. apply refl_equal. % 217.93/218.15 apply zenon_Ha. apply refl_equal. % 217.93/218.15 apply zenon_Ha. apply refl_equal. % 217.93/218.15 apply zenon_H1d. apply refl_equal. % 217.93/218.15 (* end of lemma zenon_L16_ *) % 217.93/218.15 assert (zenon_L17_ : ((j (h (e10))) = (e10)) -> ((h (e10)) = (e20)) -> ((j (e20)) = (e14)) -> (~((e10) = (e14))) -> False). % 217.93/218.15 do 0 intro. intros zenon_H2c zenon_H1b zenon_H25 zenon_H47. % 217.93/218.15 elim (classic ((e14) = (e14))); [ zenon_intro zenon_H27 | zenon_intro zenon_H24 ]. % 217.93/218.15 cut (((e14) = (e14)) = ((e10) = (e14))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H47. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H27. % 217.93/218.15 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.15 cut (((e14) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H48]. % 217.93/218.15 congruence. % 217.93/218.15 cut (((j (h (e10))) = (e10)) = ((e14) = (e10))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H48. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H2c. % 217.93/218.15 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.15 cut (((j (h (e10))) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H49]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((e14) = (e14))); [ zenon_intro zenon_H27 | zenon_intro zenon_H24 ]. % 217.93/218.15 cut (((e14) = (e14)) = ((j (h (e10))) = (e14))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H49. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H27. % 217.93/218.15 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.15 cut (((e14) = (j (h (e10))))); [idtac | apply NNPP; zenon_intro zenon_H4a]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((j (h (e10))) = (j (h (e10))))); [ zenon_intro zenon_H35 | zenon_intro zenon_H36 ]. % 217.93/218.15 cut (((j (h (e10))) = (j (h (e10)))) = ((e14) = (j (h (e10))))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H4a. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H35. % 217.93/218.15 cut (((j (h (e10))) = (j (h (e10))))); [idtac | apply NNPP; zenon_intro zenon_H36]. % 217.93/218.15 cut (((j (h (e10))) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H49]. % 217.93/218.15 congruence. % 217.93/218.15 cut (((j (e20)) = (e14)) = ((j (h (e10))) = (e14))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H49. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H25. % 217.93/218.15 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.15 cut (((j (e20)) = (j (h (e10))))); [idtac | apply NNPP; zenon_intro zenon_H37]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((j (h (e10))) = (j (h (e10))))); [ zenon_intro zenon_H35 | zenon_intro zenon_H36 ]. % 217.93/218.15 cut (((j (h (e10))) = (j (h (e10)))) = ((j (e20)) = (j (h (e10))))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H37. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H35. % 217.93/218.15 cut (((j (h (e10))) = (j (h (e10))))); [idtac | apply NNPP; zenon_intro zenon_H36]. % 217.93/218.15 cut (((j (h (e10))) = (j (e20)))); [idtac | apply NNPP; zenon_intro zenon_H1a]. % 217.93/218.15 congruence. % 217.93/218.15 apply (zenon_L7_); trivial. % 217.93/218.15 apply zenon_H36. apply refl_equal. % 217.93/218.15 apply zenon_H36. apply refl_equal. % 217.93/218.15 apply zenon_H24. apply refl_equal. % 217.93/218.15 apply zenon_H36. apply refl_equal. % 217.93/218.15 apply zenon_H36. apply refl_equal. % 217.93/218.15 apply zenon_H24. apply refl_equal. % 217.93/218.15 apply zenon_H24. apply refl_equal. % 217.93/218.15 apply zenon_H9. apply refl_equal. % 217.93/218.15 apply zenon_H24. apply refl_equal. % 217.93/218.15 apply zenon_H24. apply refl_equal. % 217.93/218.15 (* end of lemma zenon_L17_ *) % 217.93/218.15 assert (zenon_L18_ : (((j (e20)) = (e10))\/(((j (e20)) = (e11))\/(((j (e20)) = (e12))\/(((j (e20)) = (e13))\/((j (e20)) = (e14)))))) -> (~((e11) = (e13))) -> ((h (e13)) = (e20)) -> ((j (h (e13))) = (e13)) -> (~((e12) = (e13))) -> (~((e10) = (e13))) -> ((j (h (e10))) = (e10)) -> ((h (e10)) = (e20)) -> (~((e10) = (e14))) -> False). % 217.93/218.15 do 0 intro. intros zenon_H2b zenon_H42 zenon_H39 zenon_H3c zenon_H1f zenon_H3b zenon_H2c zenon_H1b zenon_H47. % 217.93/218.15 apply (zenon_or_s _ _ zenon_H2b); [ zenon_intro zenon_Hd | zenon_intro zenon_H2d ]. % 217.93/218.15 apply (zenon_L14_); trivial. % 217.93/218.15 apply (zenon_or_s _ _ zenon_H2d); [ zenon_intro zenon_H16 | zenon_intro zenon_H2e ]. % 217.93/218.15 apply (zenon_L15_); trivial. % 217.93/218.15 apply (zenon_or_s _ _ zenon_H2e); [ zenon_intro zenon_H30 | zenon_intro zenon_H2f ]. % 217.93/218.15 apply (zenon_L16_); trivial. % 217.93/218.15 apply (zenon_or_s _ _ zenon_H2f); [ zenon_intro zenon_H1e | zenon_intro zenon_H25 ]. % 217.93/218.15 elim (classic ((e13) = (e13))); [ zenon_intro zenon_H20 | zenon_intro zenon_H1d ]. % 217.93/218.15 cut (((e13) = (e13)) = ((e10) = (e13))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H3b. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H20. % 217.93/218.15 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.15 cut (((e13) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H4b]. % 217.93/218.15 congruence. % 217.93/218.15 cut (((j (h (e10))) = (e10)) = ((e13) = (e10))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H4b. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H2c. % 217.93/218.15 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.15 cut (((j (h (e10))) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H4c]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((e13) = (e13))); [ zenon_intro zenon_H20 | zenon_intro zenon_H1d ]. % 217.93/218.15 cut (((e13) = (e13)) = ((j (h (e10))) = (e13))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H4c. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H20. % 217.93/218.15 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.15 cut (((e13) = (j (h (e10))))); [idtac | apply NNPP; zenon_intro zenon_H4d]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((j (h (e10))) = (j (h (e10))))); [ zenon_intro zenon_H35 | zenon_intro zenon_H36 ]. % 217.93/218.15 cut (((j (h (e10))) = (j (h (e10)))) = ((e13) = (j (h (e10))))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H4d. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H35. % 217.93/218.15 cut (((j (h (e10))) = (j (h (e10))))); [idtac | apply NNPP; zenon_intro zenon_H36]. % 217.93/218.15 cut (((j (h (e10))) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H4c]. % 217.93/218.15 congruence. % 217.93/218.15 cut (((j (e20)) = (e13)) = ((j (h (e10))) = (e13))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H4c. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H1e. % 217.93/218.15 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.15 cut (((j (e20)) = (j (h (e10))))); [idtac | apply NNPP; zenon_intro zenon_H37]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((j (h (e10))) = (j (h (e10))))); [ zenon_intro zenon_H35 | zenon_intro zenon_H36 ]. % 217.93/218.15 cut (((j (h (e10))) = (j (h (e10)))) = ((j (e20)) = (j (h (e10))))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H37. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H35. % 217.93/218.15 cut (((j (h (e10))) = (j (h (e10))))); [idtac | apply NNPP; zenon_intro zenon_H36]. % 217.93/218.15 cut (((j (h (e10))) = (j (e20)))); [idtac | apply NNPP; zenon_intro zenon_H1a]. % 217.93/218.15 congruence. % 217.93/218.15 apply (zenon_L7_); trivial. % 217.93/218.15 apply zenon_H36. apply refl_equal. % 217.93/218.15 apply zenon_H36. apply refl_equal. % 217.93/218.15 apply zenon_H1d. apply refl_equal. % 217.93/218.15 apply zenon_H36. apply refl_equal. % 217.93/218.15 apply zenon_H36. apply refl_equal. % 217.93/218.15 apply zenon_H1d. apply refl_equal. % 217.93/218.15 apply zenon_H1d. apply refl_equal. % 217.93/218.15 apply zenon_H9. apply refl_equal. % 217.93/218.15 apply zenon_H1d. apply refl_equal. % 217.93/218.15 apply zenon_H1d. apply refl_equal. % 217.93/218.15 apply (zenon_L17_); trivial. % 217.93/218.15 (* end of lemma zenon_L18_ *) % 217.93/218.15 assert (zenon_L19_ : (~((j (h (e13))) = (j (e21)))) -> ((h (e13)) = (e21)) -> False). % 217.93/218.15 do 0 intro. intros zenon_H4e zenon_H4f. % 217.93/218.15 cut (((h (e13)) = (e21))); [idtac | apply NNPP; zenon_intro zenon_H50]. % 217.93/218.15 congruence. % 217.93/218.15 exact (zenon_H50 zenon_H4f). % 217.93/218.15 (* end of lemma zenon_L19_ *) % 217.93/218.15 assert (zenon_L20_ : (~((e10) = (e13))) -> ((j (h (e13))) = (e13)) -> ((h (e13)) = (e21)) -> ((j (e21)) = (e10)) -> False). % 217.93/218.15 do 0 intro. intros zenon_H3b zenon_H3c zenon_H4f zenon_H51. % 217.93/218.15 cut (((j (h (e13))) = (e13)) = ((e10) = (e13))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H3b. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H3c. % 217.93/218.15 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.15 cut (((j (h (e13))) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H3d]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((e10) = (e10))); [ zenon_intro zenon_Hf | zenon_intro zenon_H9 ]. % 217.93/218.15 cut (((e10) = (e10)) = ((j (h (e13))) = (e10))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H3d. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_Hf. % 217.93/218.15 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.15 cut (((e10) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H3e]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((j (h (e13))) = (j (h (e13))))); [ zenon_intro zenon_H3f | zenon_intro zenon_H40 ]. % 217.93/218.15 cut (((j (h (e13))) = (j (h (e13)))) = ((e10) = (j (h (e13))))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H3e. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H3f. % 217.93/218.15 cut (((j (h (e13))) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H40]. % 217.93/218.15 cut (((j (h (e13))) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H3d]. % 217.93/218.15 congruence. % 217.93/218.15 cut (((j (e21)) = (e10)) = ((j (h (e13))) = (e10))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H3d. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H51. % 217.93/218.15 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.15 cut (((j (e21)) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H52]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((j (h (e13))) = (j (h (e13))))); [ zenon_intro zenon_H3f | zenon_intro zenon_H40 ]. % 217.93/218.15 cut (((j (h (e13))) = (j (h (e13)))) = ((j (e21)) = (j (h (e13))))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H52. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H3f. % 217.93/218.15 cut (((j (h (e13))) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H40]. % 217.93/218.15 cut (((j (h (e13))) = (j (e21)))); [idtac | apply NNPP; zenon_intro zenon_H4e]. % 217.93/218.15 congruence. % 217.93/218.15 apply (zenon_L19_); trivial. % 217.93/218.15 apply zenon_H40. apply refl_equal. % 217.93/218.15 apply zenon_H40. apply refl_equal. % 217.93/218.15 apply zenon_H9. apply refl_equal. % 217.93/218.15 apply zenon_H40. apply refl_equal. % 217.93/218.15 apply zenon_H40. apply refl_equal. % 217.93/218.15 apply zenon_H9. apply refl_equal. % 217.93/218.15 apply zenon_H9. apply refl_equal. % 217.93/218.15 apply zenon_H1d. apply refl_equal. % 217.93/218.15 (* end of lemma zenon_L20_ *) % 217.93/218.15 assert (zenon_L21_ : (~((e11) = (e13))) -> ((j (h (e13))) = (e13)) -> ((h (e13)) = (e21)) -> ((j (e21)) = (e11)) -> False). % 217.93/218.15 do 0 intro. intros zenon_H42 zenon_H3c zenon_H4f zenon_H53. % 217.93/218.15 cut (((j (h (e13))) = (e13)) = ((e11) = (e13))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H42. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H3c. % 217.93/218.15 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.15 cut (((j (h (e13))) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H43]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((e11) = (e11))); [ zenon_intro zenon_H18 | zenon_intro zenon_H14 ]. % 217.93/218.15 cut (((e11) = (e11)) = ((j (h (e13))) = (e11))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H43. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H18. % 217.93/218.15 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.15 cut (((e11) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H44]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((j (h (e13))) = (j (h (e13))))); [ zenon_intro zenon_H3f | zenon_intro zenon_H40 ]. % 217.93/218.15 cut (((j (h (e13))) = (j (h (e13)))) = ((e11) = (j (h (e13))))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H44. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H3f. % 217.93/218.15 cut (((j (h (e13))) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H40]. % 217.93/218.15 cut (((j (h (e13))) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H43]. % 217.93/218.15 congruence. % 217.93/218.15 cut (((j (e21)) = (e11)) = ((j (h (e13))) = (e11))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H43. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H53. % 217.93/218.15 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.15 cut (((j (e21)) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H52]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((j (h (e13))) = (j (h (e13))))); [ zenon_intro zenon_H3f | zenon_intro zenon_H40 ]. % 217.93/218.15 cut (((j (h (e13))) = (j (h (e13)))) = ((j (e21)) = (j (h (e13))))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H52. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H3f. % 217.93/218.15 cut (((j (h (e13))) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H40]. % 217.93/218.15 cut (((j (h (e13))) = (j (e21)))); [idtac | apply NNPP; zenon_intro zenon_H4e]. % 217.93/218.15 congruence. % 217.93/218.15 apply (zenon_L19_); trivial. % 217.93/218.15 apply zenon_H40. apply refl_equal. % 217.93/218.15 apply zenon_H40. apply refl_equal. % 217.93/218.15 apply zenon_H14. apply refl_equal. % 217.93/218.15 apply zenon_H40. apply refl_equal. % 217.93/218.15 apply zenon_H40. apply refl_equal. % 217.93/218.15 apply zenon_H14. apply refl_equal. % 217.93/218.15 apply zenon_H14. apply refl_equal. % 217.93/218.15 apply zenon_H1d. apply refl_equal. % 217.93/218.15 (* end of lemma zenon_L21_ *) % 217.93/218.15 assert (zenon_L22_ : (~((e12) = (e13))) -> ((j (h (e13))) = (e13)) -> ((h (e13)) = (e21)) -> ((j (e21)) = (e12)) -> False). % 217.93/218.15 do 0 intro. intros zenon_H1f zenon_H3c zenon_H4f zenon_H54. % 217.93/218.15 cut (((j (h (e13))) = (e13)) = ((e12) = (e13))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H1f. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H3c. % 217.93/218.15 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.15 cut (((j (h (e13))) = (e12))); [idtac | apply NNPP; zenon_intro zenon_H45]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((e12) = (e12))); [ zenon_intro zenon_H31 | zenon_intro zenon_Ha ]. % 217.93/218.15 cut (((e12) = (e12)) = ((j (h (e13))) = (e12))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H45. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H31. % 217.93/218.15 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.15 cut (((e12) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H46]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((j (h (e13))) = (j (h (e13))))); [ zenon_intro zenon_H3f | zenon_intro zenon_H40 ]. % 217.93/218.15 cut (((j (h (e13))) = (j (h (e13)))) = ((e12) = (j (h (e13))))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H46. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H3f. % 217.93/218.15 cut (((j (h (e13))) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H40]. % 217.93/218.15 cut (((j (h (e13))) = (e12))); [idtac | apply NNPP; zenon_intro zenon_H45]. % 217.93/218.15 congruence. % 217.93/218.15 cut (((j (e21)) = (e12)) = ((j (h (e13))) = (e12))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H45. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H54. % 217.93/218.15 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.15 cut (((j (e21)) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H52]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((j (h (e13))) = (j (h (e13))))); [ zenon_intro zenon_H3f | zenon_intro zenon_H40 ]. % 217.93/218.15 cut (((j (h (e13))) = (j (h (e13)))) = ((j (e21)) = (j (h (e13))))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H52. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H3f. % 217.93/218.15 cut (((j (h (e13))) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H40]. % 217.93/218.15 cut (((j (h (e13))) = (j (e21)))); [idtac | apply NNPP; zenon_intro zenon_H4e]. % 217.93/218.15 congruence. % 217.93/218.15 apply (zenon_L19_); trivial. % 217.93/218.15 apply zenon_H40. apply refl_equal. % 217.93/218.15 apply zenon_H40. apply refl_equal. % 217.93/218.15 apply zenon_Ha. apply refl_equal. % 217.93/218.15 apply zenon_H40. apply refl_equal. % 217.93/218.15 apply zenon_H40. apply refl_equal. % 217.93/218.15 apply zenon_Ha. apply refl_equal. % 217.93/218.15 apply zenon_Ha. apply refl_equal. % 217.93/218.15 apply zenon_H1d. apply refl_equal. % 217.93/218.15 (* end of lemma zenon_L22_ *) % 217.93/218.15 assert (zenon_L23_ : (~((j (h (e12))) = (j (e21)))) -> ((h (e12)) = (e21)) -> False). % 217.93/218.15 do 0 intro. intros zenon_H55 zenon_H56. % 217.93/218.15 cut (((h (e12)) = (e21))); [idtac | apply NNPP; zenon_intro zenon_H57]. % 217.93/218.15 congruence. % 217.93/218.15 exact (zenon_H57 zenon_H56). % 217.93/218.15 (* end of lemma zenon_L23_ *) % 217.93/218.15 assert (zenon_L24_ : ((j (h (e12))) = (e12)) -> ((h (e12)) = (e21)) -> ((j (e21)) = (e13)) -> (~((e12) = (e13))) -> False). % 217.93/218.15 do 0 intro. intros zenon_Hc zenon_H56 zenon_H58 zenon_H1f. % 217.93/218.15 elim (classic ((e13) = (e13))); [ zenon_intro zenon_H20 | zenon_intro zenon_H1d ]. % 217.93/218.15 cut (((e13) = (e13)) = ((e12) = (e13))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H1f. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H20. % 217.93/218.15 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.15 cut (((e13) = (e12))); [idtac | apply NNPP; zenon_intro zenon_H21]. % 217.93/218.15 congruence. % 217.93/218.15 cut (((j (h (e12))) = (e12)) = ((e13) = (e12))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H21. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_Hc. % 217.93/218.15 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.15 cut (((j (h (e12))) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H22]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((e13) = (e13))); [ zenon_intro zenon_H20 | zenon_intro zenon_H1d ]. % 217.93/218.15 cut (((e13) = (e13)) = ((j (h (e12))) = (e13))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H22. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H20. % 217.93/218.15 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.15 cut (((e13) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H23]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((j (h (e12))) = (j (h (e12))))); [ zenon_intro zenon_H11 | zenon_intro zenon_H12 ]. % 217.93/218.15 cut (((j (h (e12))) = (j (h (e12)))) = ((e13) = (j (h (e12))))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H23. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H11. % 217.93/218.15 cut (((j (h (e12))) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H12]. % 217.93/218.15 cut (((j (h (e12))) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H22]. % 217.93/218.15 congruence. % 217.93/218.15 cut (((j (e21)) = (e13)) = ((j (h (e12))) = (e13))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H22. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H58. % 217.93/218.15 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.15 cut (((j (e21)) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H59]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((j (h (e12))) = (j (h (e12))))); [ zenon_intro zenon_H11 | zenon_intro zenon_H12 ]. % 217.93/218.15 cut (((j (h (e12))) = (j (h (e12)))) = ((j (e21)) = (j (h (e12))))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H59. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H11. % 217.93/218.15 cut (((j (h (e12))) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H12]. % 217.93/218.15 cut (((j (h (e12))) = (j (e21)))); [idtac | apply NNPP; zenon_intro zenon_H55]. % 217.93/218.15 congruence. % 217.93/218.15 apply (zenon_L23_); trivial. % 217.93/218.15 apply zenon_H12. apply refl_equal. % 217.93/218.15 apply zenon_H12. apply refl_equal. % 217.93/218.15 apply zenon_H1d. apply refl_equal. % 217.93/218.15 apply zenon_H12. apply refl_equal. % 217.93/218.15 apply zenon_H12. apply refl_equal. % 217.93/218.15 apply zenon_H1d. apply refl_equal. % 217.93/218.15 apply zenon_H1d. apply refl_equal. % 217.93/218.15 apply zenon_Ha. apply refl_equal. % 217.93/218.15 apply zenon_H1d. apply refl_equal. % 217.93/218.15 apply zenon_H1d. apply refl_equal. % 217.93/218.15 (* end of lemma zenon_L24_ *) % 217.93/218.15 assert (zenon_L25_ : ((j (h (e13))) = (e13)) -> ((h (e13)) = (e21)) -> ((j (e21)) = (e14)) -> (~((e13) = (e14))) -> False). % 217.93/218.15 do 0 intro. intros zenon_H3c zenon_H4f zenon_H5a zenon_H5b. % 217.93/218.15 elim (classic ((e14) = (e14))); [ zenon_intro zenon_H27 | zenon_intro zenon_H24 ]. % 217.93/218.15 cut (((e14) = (e14)) = ((e13) = (e14))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H5b. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H27. % 217.93/218.15 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.15 cut (((e14) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H5c]. % 217.93/218.15 congruence. % 217.93/218.15 cut (((j (h (e13))) = (e13)) = ((e14) = (e13))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H5c. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H3c. % 217.93/218.15 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.15 cut (((j (h (e13))) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H5d]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((e14) = (e14))); [ zenon_intro zenon_H27 | zenon_intro zenon_H24 ]. % 217.93/218.15 cut (((e14) = (e14)) = ((j (h (e13))) = (e14))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H5d. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H27. % 217.93/218.15 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.15 cut (((e14) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H5e]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((j (h (e13))) = (j (h (e13))))); [ zenon_intro zenon_H3f | zenon_intro zenon_H40 ]. % 217.93/218.15 cut (((j (h (e13))) = (j (h (e13)))) = ((e14) = (j (h (e13))))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H5e. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H3f. % 217.93/218.15 cut (((j (h (e13))) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H40]. % 217.93/218.15 cut (((j (h (e13))) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H5d]. % 217.93/218.15 congruence. % 217.93/218.15 cut (((j (e21)) = (e14)) = ((j (h (e13))) = (e14))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H5d. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H5a. % 217.93/218.15 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.15 cut (((j (e21)) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H52]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((j (h (e13))) = (j (h (e13))))); [ zenon_intro zenon_H3f | zenon_intro zenon_H40 ]. % 217.93/218.15 cut (((j (h (e13))) = (j (h (e13)))) = ((j (e21)) = (j (h (e13))))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H52. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H3f. % 217.93/218.15 cut (((j (h (e13))) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H40]. % 217.93/218.15 cut (((j (h (e13))) = (j (e21)))); [idtac | apply NNPP; zenon_intro zenon_H4e]. % 217.93/218.15 congruence. % 217.93/218.15 apply (zenon_L19_); trivial. % 217.93/218.15 apply zenon_H40. apply refl_equal. % 217.93/218.15 apply zenon_H40. apply refl_equal. % 217.93/218.15 apply zenon_H24. apply refl_equal. % 217.93/218.15 apply zenon_H40. apply refl_equal. % 217.93/218.15 apply zenon_H40. apply refl_equal. % 217.93/218.15 apply zenon_H24. apply refl_equal. % 217.93/218.15 apply zenon_H24. apply refl_equal. % 217.93/218.15 apply zenon_H1d. apply refl_equal. % 217.93/218.15 apply zenon_H24. apply refl_equal. % 217.93/218.15 apply zenon_H24. apply refl_equal. % 217.93/218.15 (* end of lemma zenon_L25_ *) % 217.93/218.15 assert (zenon_L26_ : (((j (e21)) = (e10))\/(((j (e21)) = (e11))\/(((j (e21)) = (e12))\/(((j (e21)) = (e13))\/((j (e21)) = (e14)))))) -> (~((e10) = (e13))) -> (~((e11) = (e13))) -> (~((e12) = (e13))) -> ((h (e12)) = (e21)) -> ((j (h (e12))) = (e12)) -> ((j (h (e13))) = (e13)) -> ((h (e13)) = (e21)) -> (~((e13) = (e14))) -> False). % 217.93/218.15 do 0 intro. intros zenon_H5f zenon_H3b zenon_H42 zenon_H1f zenon_H56 zenon_Hc zenon_H3c zenon_H4f zenon_H5b. % 217.93/218.15 apply (zenon_or_s _ _ zenon_H5f); [ zenon_intro zenon_H51 | zenon_intro zenon_H60 ]. % 217.93/218.15 apply (zenon_L20_); trivial. % 217.93/218.15 apply (zenon_or_s _ _ zenon_H60); [ zenon_intro zenon_H53 | zenon_intro zenon_H61 ]. % 217.93/218.15 apply (zenon_L21_); trivial. % 217.93/218.15 apply (zenon_or_s _ _ zenon_H61); [ zenon_intro zenon_H54 | zenon_intro zenon_H62 ]. % 217.93/218.15 apply (zenon_L22_); trivial. % 217.93/218.15 apply (zenon_or_s _ _ zenon_H62); [ zenon_intro zenon_H58 | zenon_intro zenon_H5a ]. % 217.93/218.15 apply (zenon_L24_); trivial. % 217.93/218.15 apply (zenon_L25_); trivial. % 217.93/218.15 (* end of lemma zenon_L26_ *) % 217.93/218.15 assert (zenon_L27_ : (~((j (h (e13))) = (j (e22)))) -> ((h (e13)) = (e22)) -> False). % 217.93/218.15 do 0 intro. intros zenon_H63 zenon_H64. % 217.93/218.15 cut (((h (e13)) = (e22))); [idtac | apply NNPP; zenon_intro zenon_H65]. % 217.93/218.15 congruence. % 217.93/218.15 exact (zenon_H65 zenon_H64). % 217.93/218.15 (* end of lemma zenon_L27_ *) % 217.93/218.15 assert (zenon_L28_ : (~((e10) = (e13))) -> ((j (h (e13))) = (e13)) -> ((h (e13)) = (e22)) -> ((j (e22)) = (e10)) -> False). % 217.93/218.15 do 0 intro. intros zenon_H3b zenon_H3c zenon_H64 zenon_H66. % 217.93/218.15 cut (((j (h (e13))) = (e13)) = ((e10) = (e13))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H3b. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H3c. % 217.93/218.15 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.15 cut (((j (h (e13))) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H3d]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((e10) = (e10))); [ zenon_intro zenon_Hf | zenon_intro zenon_H9 ]. % 217.93/218.15 cut (((e10) = (e10)) = ((j (h (e13))) = (e10))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H3d. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_Hf. % 217.93/218.15 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.15 cut (((e10) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H3e]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((j (h (e13))) = (j (h (e13))))); [ zenon_intro zenon_H3f | zenon_intro zenon_H40 ]. % 217.93/218.15 cut (((j (h (e13))) = (j (h (e13)))) = ((e10) = (j (h (e13))))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H3e. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H3f. % 217.93/218.15 cut (((j (h (e13))) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H40]. % 217.93/218.15 cut (((j (h (e13))) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H3d]. % 217.93/218.15 congruence. % 217.93/218.15 cut (((j (e22)) = (e10)) = ((j (h (e13))) = (e10))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H3d. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H66. % 217.93/218.15 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.15 cut (((j (e22)) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H67]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((j (h (e13))) = (j (h (e13))))); [ zenon_intro zenon_H3f | zenon_intro zenon_H40 ]. % 217.93/218.15 cut (((j (h (e13))) = (j (h (e13)))) = ((j (e22)) = (j (h (e13))))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H67. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H3f. % 217.93/218.15 cut (((j (h (e13))) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H40]. % 217.93/218.15 cut (((j (h (e13))) = (j (e22)))); [idtac | apply NNPP; zenon_intro zenon_H63]. % 217.93/218.15 congruence. % 217.93/218.15 apply (zenon_L27_); trivial. % 217.93/218.15 apply zenon_H40. apply refl_equal. % 217.93/218.15 apply zenon_H40. apply refl_equal. % 217.93/218.15 apply zenon_H9. apply refl_equal. % 217.93/218.15 apply zenon_H40. apply refl_equal. % 217.93/218.15 apply zenon_H40. apply refl_equal. % 217.93/218.15 apply zenon_H9. apply refl_equal. % 217.93/218.15 apply zenon_H9. apply refl_equal. % 217.93/218.15 apply zenon_H1d. apply refl_equal. % 217.93/218.15 (* end of lemma zenon_L28_ *) % 217.93/218.15 assert (zenon_L29_ : (~((e11) = (e13))) -> ((j (h (e13))) = (e13)) -> ((h (e13)) = (e22)) -> ((j (e22)) = (e11)) -> False). % 217.93/218.15 do 0 intro. intros zenon_H42 zenon_H3c zenon_H64 zenon_H68. % 217.93/218.15 cut (((j (h (e13))) = (e13)) = ((e11) = (e13))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H42. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H3c. % 217.93/218.15 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.15 cut (((j (h (e13))) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H43]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((e11) = (e11))); [ zenon_intro zenon_H18 | zenon_intro zenon_H14 ]. % 217.93/218.15 cut (((e11) = (e11)) = ((j (h (e13))) = (e11))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H43. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H18. % 217.93/218.15 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.15 cut (((e11) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H44]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((j (h (e13))) = (j (h (e13))))); [ zenon_intro zenon_H3f | zenon_intro zenon_H40 ]. % 217.93/218.15 cut (((j (h (e13))) = (j (h (e13)))) = ((e11) = (j (h (e13))))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H44. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H3f. % 217.93/218.15 cut (((j (h (e13))) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H40]. % 217.93/218.15 cut (((j (h (e13))) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H43]. % 217.93/218.15 congruence. % 217.93/218.15 cut (((j (e22)) = (e11)) = ((j (h (e13))) = (e11))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H43. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H68. % 217.93/218.15 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.15 cut (((j (e22)) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H67]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((j (h (e13))) = (j (h (e13))))); [ zenon_intro zenon_H3f | zenon_intro zenon_H40 ]. % 217.93/218.15 cut (((j (h (e13))) = (j (h (e13)))) = ((j (e22)) = (j (h (e13))))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H67. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H3f. % 217.93/218.15 cut (((j (h (e13))) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H40]. % 217.93/218.15 cut (((j (h (e13))) = (j (e22)))); [idtac | apply NNPP; zenon_intro zenon_H63]. % 217.93/218.15 congruence. % 217.93/218.15 apply (zenon_L27_); trivial. % 217.93/218.15 apply zenon_H40. apply refl_equal. % 217.93/218.15 apply zenon_H40. apply refl_equal. % 217.93/218.15 apply zenon_H14. apply refl_equal. % 217.93/218.15 apply zenon_H40. apply refl_equal. % 217.93/218.15 apply zenon_H40. apply refl_equal. % 217.93/218.15 apply zenon_H14. apply refl_equal. % 217.93/218.15 apply zenon_H14. apply refl_equal. % 217.93/218.15 apply zenon_H1d. apply refl_equal. % 217.93/218.15 (* end of lemma zenon_L29_ *) % 217.93/218.15 assert (zenon_L30_ : (~((e12) = (e13))) -> ((j (h (e13))) = (e13)) -> ((h (e13)) = (e22)) -> ((j (e22)) = (e12)) -> False). % 217.93/218.15 do 0 intro. intros zenon_H1f zenon_H3c zenon_H64 zenon_H69. % 217.93/218.15 cut (((j (h (e13))) = (e13)) = ((e12) = (e13))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H1f. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H3c. % 217.93/218.15 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.15 cut (((j (h (e13))) = (e12))); [idtac | apply NNPP; zenon_intro zenon_H45]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((e12) = (e12))); [ zenon_intro zenon_H31 | zenon_intro zenon_Ha ]. % 217.93/218.15 cut (((e12) = (e12)) = ((j (h (e13))) = (e12))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H45. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H31. % 217.93/218.15 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.15 cut (((e12) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H46]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((j (h (e13))) = (j (h (e13))))); [ zenon_intro zenon_H3f | zenon_intro zenon_H40 ]. % 217.93/218.15 cut (((j (h (e13))) = (j (h (e13)))) = ((e12) = (j (h (e13))))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H46. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H3f. % 217.93/218.15 cut (((j (h (e13))) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H40]. % 217.93/218.15 cut (((j (h (e13))) = (e12))); [idtac | apply NNPP; zenon_intro zenon_H45]. % 217.93/218.15 congruence. % 217.93/218.15 cut (((j (e22)) = (e12)) = ((j (h (e13))) = (e12))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H45. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H69. % 217.93/218.15 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.15 cut (((j (e22)) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H67]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((j (h (e13))) = (j (h (e13))))); [ zenon_intro zenon_H3f | zenon_intro zenon_H40 ]. % 217.93/218.15 cut (((j (h (e13))) = (j (h (e13)))) = ((j (e22)) = (j (h (e13))))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H67. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H3f. % 217.93/218.15 cut (((j (h (e13))) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H40]. % 217.93/218.15 cut (((j (h (e13))) = (j (e22)))); [idtac | apply NNPP; zenon_intro zenon_H63]. % 217.93/218.15 congruence. % 217.93/218.15 apply (zenon_L27_); trivial. % 217.93/218.15 apply zenon_H40. apply refl_equal. % 217.93/218.15 apply zenon_H40. apply refl_equal. % 217.93/218.15 apply zenon_Ha. apply refl_equal. % 217.93/218.15 apply zenon_H40. apply refl_equal. % 217.93/218.15 apply zenon_H40. apply refl_equal. % 217.93/218.15 apply zenon_Ha. apply refl_equal. % 217.93/218.15 apply zenon_Ha. apply refl_equal. % 217.93/218.15 apply zenon_H1d. apply refl_equal. % 217.93/218.15 (* end of lemma zenon_L30_ *) % 217.93/218.15 assert (zenon_L31_ : (~((op1 (j (e24)) (j (e24))) = (op1 (e10) (e10)))) -> ((j (e24)) = (e10)) -> False). % 217.93/218.15 do 0 intro. intros zenon_H6a zenon_H6b. % 217.93/218.15 cut (((j (e24)) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H6c]. % 217.93/218.15 cut (((j (e24)) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H6c]. % 217.93/218.15 congruence. % 217.93/218.15 exact (zenon_H6c zenon_H6b). % 217.93/218.15 exact (zenon_H6c zenon_H6b). % 217.93/218.15 (* end of lemma zenon_L31_ *) % 217.93/218.15 assert (zenon_L32_ : (~((op1 (j (e24)) (j (e24))) = (op1 (e14) (e14)))) -> ((op1 (e10) (e10)) = (e10)) -> ((j (e24)) = (e10)) -> ((op1 (e14) (e14)) = (e10)) -> False). % 217.93/218.15 do 0 intro. intros zenon_H6d zenon_H6e zenon_H6b zenon_H6f. % 217.93/218.15 cut (((op1 (e10) (e10)) = (e10)) = ((op1 (j (e24)) (j (e24))) = (op1 (e14) (e14)))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H6d. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H6e. % 217.93/218.15 cut (((e10) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H70]. % 217.93/218.15 cut (((op1 (e10) (e10)) = (op1 (j (e24)) (j (e24))))); [idtac | apply NNPP; zenon_intro zenon_H71]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((op1 (j (e24)) (j (e24))) = (op1 (j (e24)) (j (e24))))); [ zenon_intro zenon_H72 | zenon_intro zenon_H73 ]. % 217.93/218.15 cut (((op1 (j (e24)) (j (e24))) = (op1 (j (e24)) (j (e24)))) = ((op1 (e10) (e10)) = (op1 (j (e24)) (j (e24))))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H71. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H72. % 217.93/218.15 cut (((op1 (j (e24)) (j (e24))) = (op1 (j (e24)) (j (e24))))); [idtac | apply NNPP; zenon_intro zenon_H73]. % 217.93/218.15 cut (((op1 (j (e24)) (j (e24))) = (op1 (e10) (e10)))); [idtac | apply NNPP; zenon_intro zenon_H6a]. % 217.93/218.15 congruence. % 217.93/218.15 apply (zenon_L31_); trivial. % 217.93/218.15 apply zenon_H73. apply refl_equal. % 217.93/218.15 apply zenon_H73. apply refl_equal. % 217.93/218.15 apply zenon_H70. apply sym_equal. exact zenon_H6f. % 217.93/218.15 (* end of lemma zenon_L32_ *) % 217.93/218.15 assert (zenon_L33_ : ((j (op2 (e24) (e24))) = (op1 (j (e24)) (j (e24)))) -> ((op2 (e24) (e24)) = (e22)) -> ((op1 (e10) (e10)) = (e10)) -> ((op1 (e14) (e14)) = (e10)) -> ((j (e24)) = (e10)) -> (~((op1 (e14) (e14)) = (j (e22)))) -> False). % 217.93/218.15 do 0 intro. intros zenon_H74 zenon_H75 zenon_H6e zenon_H6f zenon_H6b zenon_H76. % 217.93/218.15 elim (classic ((j (e22)) = (j (e22)))); [ zenon_intro zenon_H77 | zenon_intro zenon_H78 ]. % 217.93/218.15 cut (((j (e22)) = (j (e22))) = ((op1 (e14) (e14)) = (j (e22)))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H76. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H77. % 217.93/218.15 cut (((j (e22)) = (j (e22)))); [idtac | apply NNPP; zenon_intro zenon_H78]. % 217.93/218.15 cut (((j (e22)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H79]. % 217.93/218.15 congruence. % 217.93/218.15 cut (((j (op2 (e24) (e24))) = (op1 (j (e24)) (j (e24)))) = ((j (e22)) = (op1 (e14) (e14)))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H79. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H74. % 217.93/218.15 cut (((op1 (j (e24)) (j (e24))) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H6d]. % 217.93/218.15 cut (((j (op2 (e24) (e24))) = (j (e22)))); [idtac | apply NNPP; zenon_intro zenon_H7a]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((j (e22)) = (j (e22)))); [ zenon_intro zenon_H77 | zenon_intro zenon_H78 ]. % 217.93/218.15 cut (((j (e22)) = (j (e22))) = ((j (op2 (e24) (e24))) = (j (e22)))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H7a. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H77. % 217.93/218.15 cut (((j (e22)) = (j (e22)))); [idtac | apply NNPP; zenon_intro zenon_H78]. % 217.93/218.15 cut (((j (e22)) = (j (op2 (e24) (e24))))); [idtac | apply NNPP; zenon_intro zenon_H7b]. % 217.93/218.15 congruence. % 217.93/218.15 cut (((e22) = (op2 (e24) (e24)))); [idtac | apply NNPP; zenon_intro zenon_H7c]. % 217.93/218.15 congruence. % 217.93/218.15 apply zenon_H7c. apply sym_equal. exact zenon_H75. % 217.93/218.15 apply zenon_H78. apply refl_equal. % 217.93/218.15 apply zenon_H78. apply refl_equal. % 217.93/218.15 apply (zenon_L32_); trivial. % 217.93/218.15 apply zenon_H78. apply refl_equal. % 217.93/218.15 apply zenon_H78. apply refl_equal. % 217.93/218.15 (* end of lemma zenon_L33_ *) % 217.93/218.15 assert (zenon_L34_ : ((j (op2 (e24) (e24))) = (op1 (j (e24)) (j (e24)))) -> ((j (e24)) = (e10)) -> ((op1 (e14) (e14)) = (e10)) -> ((op1 (e10) (e10)) = (e10)) -> ((op2 (e24) (e24)) = (e22)) -> ((j (e22)) = (e13)) -> (~((e10) = (e13))) -> False). % 217.93/218.15 do 0 intro. intros zenon_H74 zenon_H6b zenon_H6f zenon_H6e zenon_H75 zenon_H7d zenon_H3b. % 217.93/218.15 elim (classic ((e13) = (e13))); [ zenon_intro zenon_H20 | zenon_intro zenon_H1d ]. % 217.93/218.15 cut (((e13) = (e13)) = ((e10) = (e13))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H3b. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H20. % 217.93/218.15 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.15 cut (((e13) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H4b]. % 217.93/218.15 congruence. % 217.93/218.15 cut (((op1 (e14) (e14)) = (e10)) = ((e13) = (e10))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H4b. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H6f. % 217.93/218.15 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.15 cut (((op1 (e14) (e14)) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H7e]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((e13) = (e13))); [ zenon_intro zenon_H20 | zenon_intro zenon_H1d ]. % 217.93/218.15 cut (((e13) = (e13)) = ((op1 (e14) (e14)) = (e13))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H7e. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H20. % 217.93/218.15 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.15 cut (((e13) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H7f]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((op1 (e14) (e14)) = (op1 (e14) (e14)))); [ zenon_intro zenon_H80 | zenon_intro zenon_H81 ]. % 217.93/218.15 cut (((op1 (e14) (e14)) = (op1 (e14) (e14))) = ((e13) = (op1 (e14) (e14)))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H7f. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H80. % 217.93/218.15 cut (((op1 (e14) (e14)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H81]. % 217.93/218.15 cut (((op1 (e14) (e14)) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H7e]. % 217.93/218.15 congruence. % 217.93/218.15 cut (((j (e22)) = (e13)) = ((op1 (e14) (e14)) = (e13))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H7e. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H7d. % 217.93/218.15 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.15 cut (((j (e22)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H79]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((op1 (e14) (e14)) = (op1 (e14) (e14)))); [ zenon_intro zenon_H80 | zenon_intro zenon_H81 ]. % 217.93/218.15 cut (((op1 (e14) (e14)) = (op1 (e14) (e14))) = ((j (e22)) = (op1 (e14) (e14)))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H79. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H80. % 217.93/218.15 cut (((op1 (e14) (e14)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H81]. % 217.93/218.15 cut (((op1 (e14) (e14)) = (j (e22)))); [idtac | apply NNPP; zenon_intro zenon_H76]. % 217.93/218.15 congruence. % 217.93/218.15 apply (zenon_L33_); trivial. % 217.93/218.15 apply zenon_H81. apply refl_equal. % 217.93/218.15 apply zenon_H81. apply refl_equal. % 217.93/218.15 apply zenon_H1d. apply refl_equal. % 217.93/218.15 apply zenon_H81. apply refl_equal. % 217.93/218.15 apply zenon_H81. apply refl_equal. % 217.93/218.15 apply zenon_H1d. apply refl_equal. % 217.93/218.15 apply zenon_H1d. apply refl_equal. % 217.93/218.15 apply zenon_H9. apply refl_equal. % 217.93/218.15 apply zenon_H1d. apply refl_equal. % 217.93/218.15 apply zenon_H1d. apply refl_equal. % 217.93/218.15 (* end of lemma zenon_L34_ *) % 217.93/218.15 assert (zenon_L35_ : (~((j (e24)) = (j (op2 (e23) (e23))))) -> ((op2 (e23) (e23)) = (e24)) -> False). % 217.93/218.15 do 0 intro. intros zenon_H82 zenon_H83. % 217.93/218.15 cut (((e24) = (op2 (e23) (e23)))); [idtac | apply NNPP; zenon_intro zenon_H84]. % 217.93/218.15 congruence. % 217.93/218.15 apply zenon_H84. apply sym_equal. exact zenon_H83. % 217.93/218.15 (* end of lemma zenon_L35_ *) % 217.93/218.15 assert (zenon_L36_ : (~((op1 (j (e23)) (j (e23))) = (op1 (e10) (e10)))) -> ((j (e23)) = (e10)) -> False). % 217.93/218.15 do 0 intro. intros zenon_H85 zenon_H86. % 217.93/218.15 cut (((j (e23)) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H87]. % 217.93/218.15 cut (((j (e23)) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H87]. % 217.93/218.15 congruence. % 217.93/218.15 exact (zenon_H87 zenon_H86). % 217.93/218.15 exact (zenon_H87 zenon_H86). % 217.93/218.15 (* end of lemma zenon_L36_ *) % 217.93/218.15 assert (zenon_L37_ : (~((op1 (j (e23)) (j (e23))) = (op1 (e14) (e14)))) -> ((op1 (e10) (e10)) = (e10)) -> ((j (e23)) = (e10)) -> ((op1 (e14) (e14)) = (e10)) -> False). % 217.93/218.15 do 0 intro. intros zenon_H88 zenon_H6e zenon_H86 zenon_H6f. % 217.93/218.15 cut (((op1 (e10) (e10)) = (e10)) = ((op1 (j (e23)) (j (e23))) = (op1 (e14) (e14)))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H88. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H6e. % 217.93/218.15 cut (((e10) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H70]. % 217.93/218.15 cut (((op1 (e10) (e10)) = (op1 (j (e23)) (j (e23))))); [idtac | apply NNPP; zenon_intro zenon_H89]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((op1 (j (e23)) (j (e23))) = (op1 (j (e23)) (j (e23))))); [ zenon_intro zenon_H8a | zenon_intro zenon_H8b ]. % 217.93/218.15 cut (((op1 (j (e23)) (j (e23))) = (op1 (j (e23)) (j (e23)))) = ((op1 (e10) (e10)) = (op1 (j (e23)) (j (e23))))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H89. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H8a. % 217.93/218.15 cut (((op1 (j (e23)) (j (e23))) = (op1 (j (e23)) (j (e23))))); [idtac | apply NNPP; zenon_intro zenon_H8b]. % 217.93/218.15 cut (((op1 (j (e23)) (j (e23))) = (op1 (e10) (e10)))); [idtac | apply NNPP; zenon_intro zenon_H85]. % 217.93/218.15 congruence. % 217.93/218.15 apply (zenon_L36_); trivial. % 217.93/218.15 apply zenon_H8b. apply refl_equal. % 217.93/218.15 apply zenon_H8b. apply refl_equal. % 217.93/218.15 apply zenon_H70. apply sym_equal. exact zenon_H6f. % 217.93/218.15 (* end of lemma zenon_L37_ *) % 217.93/218.15 assert (zenon_L38_ : ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((op2 (e23) (e23)) = (e24)) -> ((op1 (e10) (e10)) = (e10)) -> ((op1 (e14) (e14)) = (e10)) -> ((j (e23)) = (e10)) -> (~((op1 (e14) (e14)) = (j (e24)))) -> False). % 217.93/218.15 do 0 intro. intros zenon_H8c zenon_H83 zenon_H6e zenon_H6f zenon_H86 zenon_H8d. % 217.93/218.15 elim (classic ((j (e24)) = (j (e24)))); [ zenon_intro zenon_H8e | zenon_intro zenon_H8f ]. % 217.93/218.15 cut (((j (e24)) = (j (e24))) = ((op1 (e14) (e14)) = (j (e24)))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H8d. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H8e. % 217.93/218.15 cut (((j (e24)) = (j (e24)))); [idtac | apply NNPP; zenon_intro zenon_H8f]. % 217.93/218.15 cut (((j (e24)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H90]. % 217.93/218.15 congruence. % 217.93/218.15 cut (((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) = ((j (e24)) = (op1 (e14) (e14)))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H90. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H8c. % 217.93/218.15 cut (((op1 (j (e23)) (j (e23))) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H88]. % 217.93/218.15 cut (((j (op2 (e23) (e23))) = (j (e24)))); [idtac | apply NNPP; zenon_intro zenon_H91]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((j (e24)) = (j (e24)))); [ zenon_intro zenon_H8e | zenon_intro zenon_H8f ]. % 217.93/218.15 cut (((j (e24)) = (j (e24))) = ((j (op2 (e23) (e23))) = (j (e24)))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H91. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H8e. % 217.93/218.15 cut (((j (e24)) = (j (e24)))); [idtac | apply NNPP; zenon_intro zenon_H8f]. % 217.93/218.15 cut (((j (e24)) = (j (op2 (e23) (e23))))); [idtac | apply NNPP; zenon_intro zenon_H82]. % 217.93/218.15 congruence. % 217.93/218.15 apply (zenon_L35_); trivial. % 217.93/218.15 apply zenon_H8f. apply refl_equal. % 217.93/218.15 apply zenon_H8f. apply refl_equal. % 217.93/218.15 apply (zenon_L37_); trivial. % 217.93/218.15 apply zenon_H8f. apply refl_equal. % 217.93/218.15 apply zenon_H8f. apply refl_equal. % 217.93/218.15 (* end of lemma zenon_L38_ *) % 217.93/218.15 assert (zenon_L39_ : ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((j (e23)) = (e10)) -> ((op1 (e14) (e14)) = (e10)) -> ((op1 (e10) (e10)) = (e10)) -> ((op2 (e23) (e23)) = (e24)) -> ((j (e24)) = (e11)) -> (~((e10) = (e11))) -> False). % 217.93/218.15 do 0 intro. intros zenon_H8c zenon_H86 zenon_H6f zenon_H6e zenon_H83 zenon_H92 zenon_H93. % 217.93/218.15 elim (classic ((e11) = (e11))); [ zenon_intro zenon_H18 | zenon_intro zenon_H14 ]. % 217.93/218.15 cut (((e11) = (e11)) = ((e10) = (e11))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H93. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H18. % 217.93/218.15 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.15 cut (((e11) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H94]. % 217.93/218.15 congruence. % 217.93/218.15 cut (((op1 (e14) (e14)) = (e10)) = ((e11) = (e10))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H94. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H6f. % 217.93/218.15 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.15 cut (((op1 (e14) (e14)) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H95]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((e11) = (e11))); [ zenon_intro zenon_H18 | zenon_intro zenon_H14 ]. % 217.93/218.15 cut (((e11) = (e11)) = ((op1 (e14) (e14)) = (e11))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H95. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H18. % 217.93/218.15 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.15 cut (((e11) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H96]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((op1 (e14) (e14)) = (op1 (e14) (e14)))); [ zenon_intro zenon_H80 | zenon_intro zenon_H81 ]. % 217.93/218.15 cut (((op1 (e14) (e14)) = (op1 (e14) (e14))) = ((e11) = (op1 (e14) (e14)))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H96. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H80. % 217.93/218.15 cut (((op1 (e14) (e14)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H81]. % 217.93/218.15 cut (((op1 (e14) (e14)) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H95]. % 217.93/218.15 congruence. % 217.93/218.15 cut (((j (e24)) = (e11)) = ((op1 (e14) (e14)) = (e11))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H95. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H92. % 217.93/218.15 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.15 cut (((j (e24)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H90]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((op1 (e14) (e14)) = (op1 (e14) (e14)))); [ zenon_intro zenon_H80 | zenon_intro zenon_H81 ]. % 217.93/218.15 cut (((op1 (e14) (e14)) = (op1 (e14) (e14))) = ((j (e24)) = (op1 (e14) (e14)))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H90. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H80. % 217.93/218.15 cut (((op1 (e14) (e14)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H81]. % 217.93/218.15 cut (((op1 (e14) (e14)) = (j (e24)))); [idtac | apply NNPP; zenon_intro zenon_H8d]. % 217.93/218.15 congruence. % 217.93/218.15 apply (zenon_L38_); trivial. % 217.93/218.15 apply zenon_H81. apply refl_equal. % 217.93/218.15 apply zenon_H81. apply refl_equal. % 217.93/218.15 apply zenon_H14. apply refl_equal. % 217.93/218.15 apply zenon_H81. apply refl_equal. % 217.93/218.15 apply zenon_H81. apply refl_equal. % 217.93/218.15 apply zenon_H14. apply refl_equal. % 217.93/218.15 apply zenon_H14. apply refl_equal. % 217.93/218.15 apply zenon_H9. apply refl_equal. % 217.93/218.15 apply zenon_H14. apply refl_equal. % 217.93/218.15 apply zenon_H14. apply refl_equal. % 217.93/218.15 (* end of lemma zenon_L39_ *) % 217.93/218.15 assert (zenon_L40_ : ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((j (e23)) = (e10)) -> ((op1 (e14) (e14)) = (e10)) -> ((op1 (e10) (e10)) = (e10)) -> ((op2 (e23) (e23)) = (e24)) -> ((j (e24)) = (e12)) -> (~((e10) = (e12))) -> False). % 217.93/218.15 do 0 intro. intros zenon_H8c zenon_H86 zenon_H6f zenon_H6e zenon_H83 zenon_H97 zenon_Hb. % 217.93/218.15 elim (classic ((e12) = (e12))); [ zenon_intro zenon_H31 | zenon_intro zenon_Ha ]. % 217.93/218.15 cut (((e12) = (e12)) = ((e10) = (e12))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_Hb. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H31. % 217.93/218.15 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.15 cut (((e12) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H32]. % 217.93/218.15 congruence. % 217.93/218.15 cut (((op1 (e14) (e14)) = (e10)) = ((e12) = (e10))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H32. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H6f. % 217.93/218.15 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.15 cut (((op1 (e14) (e14)) = (e12))); [idtac | apply NNPP; zenon_intro zenon_H98]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((e12) = (e12))); [ zenon_intro zenon_H31 | zenon_intro zenon_Ha ]. % 217.93/218.15 cut (((e12) = (e12)) = ((op1 (e14) (e14)) = (e12))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H98. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H31. % 217.93/218.15 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.15 cut (((e12) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H99]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((op1 (e14) (e14)) = (op1 (e14) (e14)))); [ zenon_intro zenon_H80 | zenon_intro zenon_H81 ]. % 217.93/218.15 cut (((op1 (e14) (e14)) = (op1 (e14) (e14))) = ((e12) = (op1 (e14) (e14)))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H99. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H80. % 217.93/218.15 cut (((op1 (e14) (e14)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H81]. % 217.93/218.15 cut (((op1 (e14) (e14)) = (e12))); [idtac | apply NNPP; zenon_intro zenon_H98]. % 217.93/218.15 congruence. % 217.93/218.15 cut (((j (e24)) = (e12)) = ((op1 (e14) (e14)) = (e12))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H98. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H97. % 217.93/218.15 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.15 cut (((j (e24)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H90]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((op1 (e14) (e14)) = (op1 (e14) (e14)))); [ zenon_intro zenon_H80 | zenon_intro zenon_H81 ]. % 217.93/218.15 cut (((op1 (e14) (e14)) = (op1 (e14) (e14))) = ((j (e24)) = (op1 (e14) (e14)))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H90. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H80. % 217.93/218.15 cut (((op1 (e14) (e14)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H81]. % 217.93/218.15 cut (((op1 (e14) (e14)) = (j (e24)))); [idtac | apply NNPP; zenon_intro zenon_H8d]. % 217.93/218.15 congruence. % 217.93/218.15 apply (zenon_L38_); trivial. % 217.93/218.15 apply zenon_H81. apply refl_equal. % 217.93/218.15 apply zenon_H81. apply refl_equal. % 217.93/218.15 apply zenon_Ha. apply refl_equal. % 217.93/218.15 apply zenon_H81. apply refl_equal. % 217.93/218.15 apply zenon_H81. apply refl_equal. % 217.93/218.15 apply zenon_Ha. apply refl_equal. % 217.93/218.15 apply zenon_Ha. apply refl_equal. % 217.93/218.15 apply zenon_H9. apply refl_equal. % 217.93/218.15 apply zenon_Ha. apply refl_equal. % 217.93/218.15 apply zenon_Ha. apply refl_equal. % 217.93/218.15 (* end of lemma zenon_L40_ *) % 217.93/218.15 assert (zenon_L41_ : ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((j (e23)) = (e10)) -> ((op1 (e14) (e14)) = (e10)) -> ((op1 (e10) (e10)) = (e10)) -> ((op2 (e23) (e23)) = (e24)) -> ((j (e24)) = (e13)) -> (~((e10) = (e13))) -> False). % 217.93/218.15 do 0 intro. intros zenon_H8c zenon_H86 zenon_H6f zenon_H6e zenon_H83 zenon_H9a zenon_H3b. % 217.93/218.15 elim (classic ((e13) = (e13))); [ zenon_intro zenon_H20 | zenon_intro zenon_H1d ]. % 217.93/218.15 cut (((e13) = (e13)) = ((e10) = (e13))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H3b. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H20. % 217.93/218.15 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.15 cut (((e13) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H4b]. % 217.93/218.15 congruence. % 217.93/218.15 cut (((op1 (e14) (e14)) = (e10)) = ((e13) = (e10))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H4b. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H6f. % 217.93/218.15 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.15 cut (((op1 (e14) (e14)) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H7e]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((e13) = (e13))); [ zenon_intro zenon_H20 | zenon_intro zenon_H1d ]. % 217.93/218.15 cut (((e13) = (e13)) = ((op1 (e14) (e14)) = (e13))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H7e. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H20. % 217.93/218.15 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.15 cut (((e13) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H7f]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((op1 (e14) (e14)) = (op1 (e14) (e14)))); [ zenon_intro zenon_H80 | zenon_intro zenon_H81 ]. % 217.93/218.15 cut (((op1 (e14) (e14)) = (op1 (e14) (e14))) = ((e13) = (op1 (e14) (e14)))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H7f. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H80. % 217.93/218.15 cut (((op1 (e14) (e14)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H81]. % 217.93/218.15 cut (((op1 (e14) (e14)) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H7e]. % 217.93/218.15 congruence. % 217.93/218.15 cut (((j (e24)) = (e13)) = ((op1 (e14) (e14)) = (e13))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H7e. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H9a. % 217.93/218.15 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.15 cut (((j (e24)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H90]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((op1 (e14) (e14)) = (op1 (e14) (e14)))); [ zenon_intro zenon_H80 | zenon_intro zenon_H81 ]. % 217.93/218.15 cut (((op1 (e14) (e14)) = (op1 (e14) (e14))) = ((j (e24)) = (op1 (e14) (e14)))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H90. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H80. % 217.93/218.15 cut (((op1 (e14) (e14)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H81]. % 217.93/218.15 cut (((op1 (e14) (e14)) = (j (e24)))); [idtac | apply NNPP; zenon_intro zenon_H8d]. % 217.93/218.15 congruence. % 217.93/218.15 apply (zenon_L38_); trivial. % 217.93/218.15 apply zenon_H81. apply refl_equal. % 217.93/218.15 apply zenon_H81. apply refl_equal. % 217.93/218.15 apply zenon_H1d. apply refl_equal. % 217.93/218.15 apply zenon_H81. apply refl_equal. % 217.93/218.15 apply zenon_H81. apply refl_equal. % 217.93/218.15 apply zenon_H1d. apply refl_equal. % 217.93/218.15 apply zenon_H1d. apply refl_equal. % 217.93/218.15 apply zenon_H9. apply refl_equal. % 217.93/218.15 apply zenon_H1d. apply refl_equal. % 217.93/218.15 apply zenon_H1d. apply refl_equal. % 217.93/218.15 (* end of lemma zenon_L41_ *) % 217.93/218.15 assert (zenon_L42_ : ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((j (e23)) = (e10)) -> ((op1 (e14) (e14)) = (e10)) -> ((op1 (e10) (e10)) = (e10)) -> ((op2 (e23) (e23)) = (e24)) -> ((j (e24)) = (e14)) -> (~((e10) = (e14))) -> False). % 217.93/218.15 do 0 intro. intros zenon_H8c zenon_H86 zenon_H6f zenon_H6e zenon_H83 zenon_H9b zenon_H47. % 217.93/218.15 elim (classic ((e14) = (e14))); [ zenon_intro zenon_H27 | zenon_intro zenon_H24 ]. % 217.93/218.15 cut (((e14) = (e14)) = ((e10) = (e14))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H47. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H27. % 217.93/218.15 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.15 cut (((e14) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H48]. % 217.93/218.15 congruence. % 217.93/218.15 cut (((op1 (e14) (e14)) = (e10)) = ((e14) = (e10))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H48. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H6f. % 217.93/218.15 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.15 cut (((op1 (e14) (e14)) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H9c]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((e14) = (e14))); [ zenon_intro zenon_H27 | zenon_intro zenon_H24 ]. % 217.93/218.15 cut (((e14) = (e14)) = ((op1 (e14) (e14)) = (e14))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H9c. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H27. % 217.93/218.15 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.15 cut (((e14) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H9d]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((op1 (e14) (e14)) = (op1 (e14) (e14)))); [ zenon_intro zenon_H80 | zenon_intro zenon_H81 ]. % 217.93/218.15 cut (((op1 (e14) (e14)) = (op1 (e14) (e14))) = ((e14) = (op1 (e14) (e14)))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H9d. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H80. % 217.93/218.15 cut (((op1 (e14) (e14)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H81]. % 217.93/218.15 cut (((op1 (e14) (e14)) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H9c]. % 217.93/218.15 congruence. % 217.93/218.15 cut (((j (e24)) = (e14)) = ((op1 (e14) (e14)) = (e14))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H9c. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H9b. % 217.93/218.15 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.15 cut (((j (e24)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H90]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((op1 (e14) (e14)) = (op1 (e14) (e14)))); [ zenon_intro zenon_H80 | zenon_intro zenon_H81 ]. % 217.93/218.15 cut (((op1 (e14) (e14)) = (op1 (e14) (e14))) = ((j (e24)) = (op1 (e14) (e14)))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H90. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H80. % 217.93/218.15 cut (((op1 (e14) (e14)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H81]. % 217.93/218.15 cut (((op1 (e14) (e14)) = (j (e24)))); [idtac | apply NNPP; zenon_intro zenon_H8d]. % 217.93/218.15 congruence. % 217.93/218.15 apply (zenon_L38_); trivial. % 217.93/218.15 apply zenon_H81. apply refl_equal. % 217.93/218.15 apply zenon_H81. apply refl_equal. % 217.93/218.15 apply zenon_H24. apply refl_equal. % 217.93/218.15 apply zenon_H81. apply refl_equal. % 217.93/218.15 apply zenon_H81. apply refl_equal. % 217.93/218.15 apply zenon_H24. apply refl_equal. % 217.93/218.15 apply zenon_H24. apply refl_equal. % 217.93/218.15 apply zenon_H9. apply refl_equal. % 217.93/218.15 apply zenon_H24. apply refl_equal. % 217.93/218.15 apply zenon_H24. apply refl_equal. % 217.93/218.15 (* end of lemma zenon_L42_ *) % 217.93/218.15 assert (zenon_L43_ : (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> ((j (e22)) = (e13)) -> ((op2 (e24) (e24)) = (e22)) -> ((j (op2 (e24) (e24))) = (op1 (j (e24)) (j (e24)))) -> (~((e10) = (e11))) -> (~((e10) = (e12))) -> (~((e10) = (e13))) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((j (e23)) = (e10)) -> ((op1 (e14) (e14)) = (e10)) -> ((op1 (e10) (e10)) = (e10)) -> ((op2 (e23) (e23)) = (e24)) -> (~((e10) = (e14))) -> False). % 217.93/218.15 do 0 intro. intros zenon_H9e zenon_H7d zenon_H75 zenon_H74 zenon_H93 zenon_Hb zenon_H3b zenon_H8c zenon_H86 zenon_H6f zenon_H6e zenon_H83 zenon_H47. % 217.93/218.15 apply (zenon_or_s _ _ zenon_H9e); [ zenon_intro zenon_H6b | zenon_intro zenon_H9f ]. % 217.93/218.15 apply (zenon_L34_); trivial. % 217.93/218.15 apply (zenon_or_s _ _ zenon_H9f); [ zenon_intro zenon_H92 | zenon_intro zenon_Ha0 ]. % 217.93/218.15 apply (zenon_L39_); trivial. % 217.93/218.15 apply (zenon_or_s _ _ zenon_Ha0); [ zenon_intro zenon_H97 | zenon_intro zenon_Ha1 ]. % 217.93/218.15 apply (zenon_L40_); trivial. % 217.93/218.15 apply (zenon_or_s _ _ zenon_Ha1); [ zenon_intro zenon_H9a | zenon_intro zenon_H9b ]. % 217.93/218.15 apply (zenon_L41_); trivial. % 217.93/218.15 apply (zenon_L42_); trivial. % 217.93/218.15 (* end of lemma zenon_L43_ *) % 217.93/218.15 assert (zenon_L44_ : (~((j (e23)) = (j (op2 (e22) (e22))))) -> ((op2 (e22) (e22)) = (e23)) -> False). % 217.93/218.15 do 0 intro. intros zenon_Ha2 zenon_Ha3. % 217.93/218.15 cut (((e23) = (op2 (e22) (e22)))); [idtac | apply NNPP; zenon_intro zenon_Ha4]. % 217.93/218.15 congruence. % 217.93/218.15 apply zenon_Ha4. apply sym_equal. exact zenon_Ha3. % 217.93/218.15 (* end of lemma zenon_L44_ *) % 217.93/218.15 assert (zenon_L45_ : (~((op1 (j (e22)) (j (e22))) = (op1 (e13) (e13)))) -> ((j (e22)) = (e13)) -> False). % 217.93/218.15 do 0 intro. intros zenon_Ha5 zenon_H7d. % 217.93/218.15 cut (((j (e22)) = (e13))); [idtac | apply NNPP; zenon_intro zenon_Ha6]. % 217.93/218.15 cut (((j (e22)) = (e13))); [idtac | apply NNPP; zenon_intro zenon_Ha6]. % 217.93/218.15 congruence. % 217.93/218.15 exact (zenon_Ha6 zenon_H7d). % 217.93/218.15 exact (zenon_Ha6 zenon_H7d). % 217.93/218.15 (* end of lemma zenon_L45_ *) % 217.93/218.15 assert (zenon_L46_ : (~((op1 (j (e22)) (j (e22))) = (op1 (e14) (e14)))) -> ((op1 (e13) (e13)) = (e10)) -> ((j (e22)) = (e13)) -> ((op1 (e14) (e14)) = (e10)) -> False). % 217.93/218.15 do 0 intro. intros zenon_Ha7 zenon_Ha8 zenon_H7d zenon_H6f. % 217.93/218.15 cut (((op1 (e13) (e13)) = (e10)) = ((op1 (j (e22)) (j (e22))) = (op1 (e14) (e14)))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_Ha7. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_Ha8. % 217.93/218.15 cut (((e10) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H70]. % 217.93/218.15 cut (((op1 (e13) (e13)) = (op1 (j (e22)) (j (e22))))); [idtac | apply NNPP; zenon_intro zenon_Ha9]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((op1 (j (e22)) (j (e22))) = (op1 (j (e22)) (j (e22))))); [ zenon_intro zenon_Haa | zenon_intro zenon_Hab ]. % 217.93/218.15 cut (((op1 (j (e22)) (j (e22))) = (op1 (j (e22)) (j (e22)))) = ((op1 (e13) (e13)) = (op1 (j (e22)) (j (e22))))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_Ha9. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_Haa. % 217.93/218.15 cut (((op1 (j (e22)) (j (e22))) = (op1 (j (e22)) (j (e22))))); [idtac | apply NNPP; zenon_intro zenon_Hab]. % 217.93/218.15 cut (((op1 (j (e22)) (j (e22))) = (op1 (e13) (e13)))); [idtac | apply NNPP; zenon_intro zenon_Ha5]. % 217.93/218.15 congruence. % 217.93/218.15 apply (zenon_L45_); trivial. % 217.93/218.15 apply zenon_Hab. apply refl_equal. % 217.93/218.15 apply zenon_Hab. apply refl_equal. % 217.93/218.15 apply zenon_H70. apply sym_equal. exact zenon_H6f. % 217.93/218.15 (* end of lemma zenon_L46_ *) % 217.93/218.15 assert (zenon_L47_ : ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((op2 (e22) (e22)) = (e23)) -> ((op1 (e13) (e13)) = (e10)) -> ((op1 (e14) (e14)) = (e10)) -> ((j (e22)) = (e13)) -> (~((op1 (e14) (e14)) = (j (e23)))) -> False). % 217.93/218.15 do 0 intro. intros zenon_Hac zenon_Ha3 zenon_Ha8 zenon_H6f zenon_H7d zenon_Had. % 217.93/218.15 elim (classic ((j (e23)) = (j (e23)))); [ zenon_intro zenon_Hae | zenon_intro zenon_Haf ]. % 217.93/218.15 cut (((j (e23)) = (j (e23))) = ((op1 (e14) (e14)) = (j (e23)))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_Had. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_Hae. % 217.93/218.15 cut (((j (e23)) = (j (e23)))); [idtac | apply NNPP; zenon_intro zenon_Haf]. % 217.93/218.15 cut (((j (e23)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_Hb0]. % 217.93/218.15 congruence. % 217.93/218.15 cut (((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) = ((j (e23)) = (op1 (e14) (e14)))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_Hb0. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_Hac. % 217.93/218.15 cut (((op1 (j (e22)) (j (e22))) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_Ha7]. % 217.93/218.15 cut (((j (op2 (e22) (e22))) = (j (e23)))); [idtac | apply NNPP; zenon_intro zenon_Hb1]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((j (e23)) = (j (e23)))); [ zenon_intro zenon_Hae | zenon_intro zenon_Haf ]. % 217.93/218.15 cut (((j (e23)) = (j (e23))) = ((j (op2 (e22) (e22))) = (j (e23)))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_Hb1. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_Hae. % 217.93/218.15 cut (((j (e23)) = (j (e23)))); [idtac | apply NNPP; zenon_intro zenon_Haf]. % 217.93/218.15 cut (((j (e23)) = (j (op2 (e22) (e22))))); [idtac | apply NNPP; zenon_intro zenon_Ha2]. % 217.93/218.15 congruence. % 217.93/218.15 apply (zenon_L44_); trivial. % 217.93/218.15 apply zenon_Haf. apply refl_equal. % 217.93/218.15 apply zenon_Haf. apply refl_equal. % 217.93/218.15 apply (zenon_L46_); trivial. % 217.93/218.15 apply zenon_Haf. apply refl_equal. % 217.93/218.15 apply zenon_Haf. apply refl_equal. % 217.93/218.15 (* end of lemma zenon_L47_ *) % 217.93/218.15 assert (zenon_L48_ : ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((j (e22)) = (e13)) -> ((op1 (e14) (e14)) = (e10)) -> ((op1 (e13) (e13)) = (e10)) -> ((op2 (e22) (e22)) = (e23)) -> ((j (e23)) = (e11)) -> (~((e10) = (e11))) -> False). % 217.93/218.15 do 0 intro. intros zenon_Hac zenon_H7d zenon_H6f zenon_Ha8 zenon_Ha3 zenon_Hb2 zenon_H93. % 217.93/218.15 elim (classic ((e11) = (e11))); [ zenon_intro zenon_H18 | zenon_intro zenon_H14 ]. % 217.93/218.15 cut (((e11) = (e11)) = ((e10) = (e11))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H93. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H18. % 217.93/218.15 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.15 cut (((e11) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H94]. % 217.93/218.15 congruence. % 217.93/218.15 cut (((op1 (e14) (e14)) = (e10)) = ((e11) = (e10))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H94. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H6f. % 217.93/218.15 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.15 cut (((op1 (e14) (e14)) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H95]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((e11) = (e11))); [ zenon_intro zenon_H18 | zenon_intro zenon_H14 ]. % 217.93/218.15 cut (((e11) = (e11)) = ((op1 (e14) (e14)) = (e11))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H95. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H18. % 217.93/218.15 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.15 cut (((e11) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H96]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((op1 (e14) (e14)) = (op1 (e14) (e14)))); [ zenon_intro zenon_H80 | zenon_intro zenon_H81 ]. % 217.93/218.15 cut (((op1 (e14) (e14)) = (op1 (e14) (e14))) = ((e11) = (op1 (e14) (e14)))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H96. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H80. % 217.93/218.15 cut (((op1 (e14) (e14)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H81]. % 217.93/218.15 cut (((op1 (e14) (e14)) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H95]. % 217.93/218.15 congruence. % 217.93/218.15 cut (((j (e23)) = (e11)) = ((op1 (e14) (e14)) = (e11))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H95. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_Hb2. % 217.93/218.15 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.15 cut (((j (e23)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_Hb0]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((op1 (e14) (e14)) = (op1 (e14) (e14)))); [ zenon_intro zenon_H80 | zenon_intro zenon_H81 ]. % 217.93/218.15 cut (((op1 (e14) (e14)) = (op1 (e14) (e14))) = ((j (e23)) = (op1 (e14) (e14)))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_Hb0. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H80. % 217.93/218.15 cut (((op1 (e14) (e14)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H81]. % 217.93/218.15 cut (((op1 (e14) (e14)) = (j (e23)))); [idtac | apply NNPP; zenon_intro zenon_Had]. % 217.93/218.15 congruence. % 217.93/218.15 apply (zenon_L47_); trivial. % 217.93/218.15 apply zenon_H81. apply refl_equal. % 217.93/218.15 apply zenon_H81. apply refl_equal. % 217.93/218.15 apply zenon_H14. apply refl_equal. % 217.93/218.15 apply zenon_H81. apply refl_equal. % 217.93/218.15 apply zenon_H81. apply refl_equal. % 217.93/218.15 apply zenon_H14. apply refl_equal. % 217.93/218.15 apply zenon_H14. apply refl_equal. % 217.93/218.15 apply zenon_H9. apply refl_equal. % 217.93/218.15 apply zenon_H14. apply refl_equal. % 217.93/218.15 apply zenon_H14. apply refl_equal. % 217.93/218.15 (* end of lemma zenon_L48_ *) % 217.93/218.15 assert (zenon_L49_ : ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((j (e22)) = (e13)) -> ((op1 (e14) (e14)) = (e10)) -> ((op1 (e13) (e13)) = (e10)) -> ((op2 (e22) (e22)) = (e23)) -> ((j (e23)) = (e12)) -> (~((e10) = (e12))) -> False). % 217.93/218.15 do 0 intro. intros zenon_Hac zenon_H7d zenon_H6f zenon_Ha8 zenon_Ha3 zenon_Hb3 zenon_Hb. % 217.93/218.15 elim (classic ((e12) = (e12))); [ zenon_intro zenon_H31 | zenon_intro zenon_Ha ]. % 217.93/218.15 cut (((e12) = (e12)) = ((e10) = (e12))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_Hb. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H31. % 217.93/218.15 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.15 cut (((e12) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H32]. % 217.93/218.15 congruence. % 217.93/218.15 cut (((op1 (e14) (e14)) = (e10)) = ((e12) = (e10))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H32. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H6f. % 217.93/218.15 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.15 cut (((op1 (e14) (e14)) = (e12))); [idtac | apply NNPP; zenon_intro zenon_H98]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((e12) = (e12))); [ zenon_intro zenon_H31 | zenon_intro zenon_Ha ]. % 217.93/218.15 cut (((e12) = (e12)) = ((op1 (e14) (e14)) = (e12))). % 217.93/218.15 intro zenon_D_pnotp. % 217.93/218.15 apply zenon_H98. % 217.93/218.15 rewrite <- zenon_D_pnotp. % 217.93/218.15 exact zenon_H31. % 217.93/218.15 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.15 cut (((e12) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H99]. % 217.93/218.15 congruence. % 217.93/218.15 elim (classic ((op1 (e14) (e14)) = (op1 (e14) (e14)))); [ zenon_intro zenon_H80 | zenon_intro zenon_H81 ]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14))) = ((e12) = (op1 (e14) (e14)))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H99. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H80. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H81]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (e12))); [idtac | apply NNPP; zenon_intro zenon_H98]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((j (e23)) = (e12)) = ((op1 (e14) (e14)) = (e12))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H98. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hb3. % 217.93/218.16 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.16 cut (((j (e23)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_Hb0]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((op1 (e14) (e14)) = (op1 (e14) (e14)))); [ zenon_intro zenon_H80 | zenon_intro zenon_H81 ]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14))) = ((j (e23)) = (op1 (e14) (e14)))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hb0. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H80. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H81]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (j (e23)))); [idtac | apply NNPP; zenon_intro zenon_Had]. % 217.93/218.16 congruence. % 217.93/218.16 apply (zenon_L47_); trivial. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_Ha. apply refl_equal. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_Ha. apply refl_equal. % 217.93/218.16 apply zenon_Ha. apply refl_equal. % 217.93/218.16 apply zenon_H9. apply refl_equal. % 217.93/218.16 apply zenon_Ha. apply refl_equal. % 217.93/218.16 apply zenon_Ha. apply refl_equal. % 217.93/218.16 (* end of lemma zenon_L49_ *) % 217.93/218.16 assert (zenon_L50_ : ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((j (e22)) = (e13)) -> ((op1 (e14) (e14)) = (e10)) -> ((op1 (e13) (e13)) = (e10)) -> ((op2 (e22) (e22)) = (e23)) -> ((j (e23)) = (e13)) -> (~((e10) = (e13))) -> False). % 217.93/218.16 do 0 intro. intros zenon_Hac zenon_H7d zenon_H6f zenon_Ha8 zenon_Ha3 zenon_Hb4 zenon_H3b. % 217.93/218.16 elim (classic ((e13) = (e13))); [ zenon_intro zenon_H20 | zenon_intro zenon_H1d ]. % 217.93/218.16 cut (((e13) = (e13)) = ((e10) = (e13))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H3b. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H20. % 217.93/218.16 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.16 cut (((e13) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H4b]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((op1 (e14) (e14)) = (e10)) = ((e13) = (e10))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H4b. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H6f. % 217.93/218.16 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H7e]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((e13) = (e13))); [ zenon_intro zenon_H20 | zenon_intro zenon_H1d ]. % 217.93/218.16 cut (((e13) = (e13)) = ((op1 (e14) (e14)) = (e13))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H7e. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H20. % 217.93/218.16 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.16 cut (((e13) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H7f]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((op1 (e14) (e14)) = (op1 (e14) (e14)))); [ zenon_intro zenon_H80 | zenon_intro zenon_H81 ]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14))) = ((e13) = (op1 (e14) (e14)))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H7f. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H80. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H81]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H7e]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((j (e23)) = (e13)) = ((op1 (e14) (e14)) = (e13))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H7e. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hb4. % 217.93/218.16 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.16 cut (((j (e23)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_Hb0]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((op1 (e14) (e14)) = (op1 (e14) (e14)))); [ zenon_intro zenon_H80 | zenon_intro zenon_H81 ]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14))) = ((j (e23)) = (op1 (e14) (e14)))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hb0. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H80. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H81]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (j (e23)))); [idtac | apply NNPP; zenon_intro zenon_Had]. % 217.93/218.16 congruence. % 217.93/218.16 apply (zenon_L47_); trivial. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H1d. apply refl_equal. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H1d. apply refl_equal. % 217.93/218.16 apply zenon_H1d. apply refl_equal. % 217.93/218.16 apply zenon_H9. apply refl_equal. % 217.93/218.16 apply zenon_H1d. apply refl_equal. % 217.93/218.16 apply zenon_H1d. apply refl_equal. % 217.93/218.16 (* end of lemma zenon_L50_ *) % 217.93/218.16 assert (zenon_L51_ : ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((j (e22)) = (e13)) -> ((op1 (e14) (e14)) = (e10)) -> ((op1 (e13) (e13)) = (e10)) -> ((op2 (e22) (e22)) = (e23)) -> ((j (e23)) = (e14)) -> (~((e10) = (e14))) -> False). % 217.93/218.16 do 0 intro. intros zenon_Hac zenon_H7d zenon_H6f zenon_Ha8 zenon_Ha3 zenon_Hb5 zenon_H47. % 217.93/218.16 elim (classic ((e14) = (e14))); [ zenon_intro zenon_H27 | zenon_intro zenon_H24 ]. % 217.93/218.16 cut (((e14) = (e14)) = ((e10) = (e14))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H47. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H27. % 217.93/218.16 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.16 cut (((e14) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H48]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((op1 (e14) (e14)) = (e10)) = ((e14) = (e10))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H48. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H6f. % 217.93/218.16 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H9c]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((e14) = (e14))); [ zenon_intro zenon_H27 | zenon_intro zenon_H24 ]. % 217.93/218.16 cut (((e14) = (e14)) = ((op1 (e14) (e14)) = (e14))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H9c. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H27. % 217.93/218.16 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.16 cut (((e14) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H9d]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((op1 (e14) (e14)) = (op1 (e14) (e14)))); [ zenon_intro zenon_H80 | zenon_intro zenon_H81 ]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14))) = ((e14) = (op1 (e14) (e14)))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H9d. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H80. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H81]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H9c]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((j (e23)) = (e14)) = ((op1 (e14) (e14)) = (e14))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H9c. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hb5. % 217.93/218.16 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.16 cut (((j (e23)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_Hb0]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((op1 (e14) (e14)) = (op1 (e14) (e14)))); [ zenon_intro zenon_H80 | zenon_intro zenon_H81 ]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14))) = ((j (e23)) = (op1 (e14) (e14)))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hb0. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H80. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H81]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (j (e23)))); [idtac | apply NNPP; zenon_intro zenon_Had]. % 217.93/218.16 congruence. % 217.93/218.16 apply (zenon_L47_); trivial. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H24. apply refl_equal. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H24. apply refl_equal. % 217.93/218.16 apply zenon_H24. apply refl_equal. % 217.93/218.16 apply zenon_H9. apply refl_equal. % 217.93/218.16 apply zenon_H24. apply refl_equal. % 217.93/218.16 apply zenon_H24. apply refl_equal. % 217.93/218.16 (* end of lemma zenon_L51_ *) % 217.93/218.16 assert (zenon_L52_ : (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> ((op2 (e23) (e23)) = (e24)) -> ((op1 (e10) (e10)) = (e10)) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((j (op2 (e24) (e24))) = (op1 (j (e24)) (j (e24)))) -> ((op2 (e24) (e24)) = (e22)) -> (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> (~((e10) = (e11))) -> (~((e10) = (e12))) -> (~((e10) = (e13))) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((j (e22)) = (e13)) -> ((op1 (e14) (e14)) = (e10)) -> ((op1 (e13) (e13)) = (e10)) -> ((op2 (e22) (e22)) = (e23)) -> (~((e10) = (e14))) -> False). % 217.93/218.16 do 0 intro. intros zenon_Hb6 zenon_H83 zenon_H6e zenon_H8c zenon_H74 zenon_H75 zenon_H9e zenon_H93 zenon_Hb zenon_H3b zenon_Hac zenon_H7d zenon_H6f zenon_Ha8 zenon_Ha3 zenon_H47. % 217.93/218.16 apply (zenon_or_s _ _ zenon_Hb6); [ zenon_intro zenon_H86 | zenon_intro zenon_Hb7 ]. % 217.93/218.16 apply (zenon_L43_); trivial. % 217.93/218.16 apply (zenon_or_s _ _ zenon_Hb7); [ zenon_intro zenon_Hb2 | zenon_intro zenon_Hb8 ]. % 217.93/218.16 apply (zenon_L48_); trivial. % 217.93/218.16 apply (zenon_or_s _ _ zenon_Hb8); [ zenon_intro zenon_Hb3 | zenon_intro zenon_Hb9 ]. % 217.93/218.16 apply (zenon_L49_); trivial. % 217.93/218.16 apply (zenon_or_s _ _ zenon_Hb9); [ zenon_intro zenon_Hb4 | zenon_intro zenon_Hb5 ]. % 217.93/218.16 apply (zenon_L50_); trivial. % 217.93/218.16 apply (zenon_L51_); trivial. % 217.93/218.16 (* end of lemma zenon_L52_ *) % 217.93/218.16 assert (zenon_L53_ : ((j (h (e13))) = (e13)) -> ((h (e13)) = (e22)) -> ((j (e22)) = (e14)) -> (~((e13) = (e14))) -> False). % 217.93/218.16 do 0 intro. intros zenon_H3c zenon_H64 zenon_Hba zenon_H5b. % 217.93/218.16 elim (classic ((e14) = (e14))); [ zenon_intro zenon_H27 | zenon_intro zenon_H24 ]. % 217.93/218.16 cut (((e14) = (e14)) = ((e13) = (e14))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H5b. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H27. % 217.93/218.16 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.16 cut (((e14) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H5c]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((j (h (e13))) = (e13)) = ((e14) = (e13))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H5c. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H3c. % 217.93/218.16 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.16 cut (((j (h (e13))) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H5d]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((e14) = (e14))); [ zenon_intro zenon_H27 | zenon_intro zenon_H24 ]. % 217.93/218.16 cut (((e14) = (e14)) = ((j (h (e13))) = (e14))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H5d. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H27. % 217.93/218.16 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.16 cut (((e14) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H5e]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((j (h (e13))) = (j (h (e13))))); [ zenon_intro zenon_H3f | zenon_intro zenon_H40 ]. % 217.93/218.16 cut (((j (h (e13))) = (j (h (e13)))) = ((e14) = (j (h (e13))))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H5e. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H3f. % 217.93/218.16 cut (((j (h (e13))) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H40]. % 217.93/218.16 cut (((j (h (e13))) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H5d]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((j (e22)) = (e14)) = ((j (h (e13))) = (e14))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H5d. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hba. % 217.93/218.16 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.16 cut (((j (e22)) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H67]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((j (h (e13))) = (j (h (e13))))); [ zenon_intro zenon_H3f | zenon_intro zenon_H40 ]. % 217.93/218.16 cut (((j (h (e13))) = (j (h (e13)))) = ((j (e22)) = (j (h (e13))))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H67. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H3f. % 217.93/218.16 cut (((j (h (e13))) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H40]. % 217.93/218.16 cut (((j (h (e13))) = (j (e22)))); [idtac | apply NNPP; zenon_intro zenon_H63]. % 217.93/218.16 congruence. % 217.93/218.16 apply (zenon_L27_); trivial. % 217.93/218.16 apply zenon_H40. apply refl_equal. % 217.93/218.16 apply zenon_H40. apply refl_equal. % 217.93/218.16 apply zenon_H24. apply refl_equal. % 217.93/218.16 apply zenon_H40. apply refl_equal. % 217.93/218.16 apply zenon_H40. apply refl_equal. % 217.93/218.16 apply zenon_H24. apply refl_equal. % 217.93/218.16 apply zenon_H24. apply refl_equal. % 217.93/218.16 apply zenon_H1d. apply refl_equal. % 217.93/218.16 apply zenon_H24. apply refl_equal. % 217.93/218.16 apply zenon_H24. apply refl_equal. % 217.93/218.16 (* end of lemma zenon_L53_ *) % 217.93/218.16 assert (zenon_L54_ : (((j (e22)) = (e10))\/(((j (e22)) = (e11))\/(((j (e22)) = (e12))\/(((j (e22)) = (e13))\/((j (e22)) = (e14)))))) -> (~((e11) = (e13))) -> (~((e12) = (e13))) -> (~((e10) = (e14))) -> ((op2 (e22) (e22)) = (e23)) -> ((op1 (e13) (e13)) = (e10)) -> ((op1 (e14) (e14)) = (e10)) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> (~((e10) = (e13))) -> (~((e10) = (e12))) -> (~((e10) = (e11))) -> (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> ((op2 (e24) (e24)) = (e22)) -> ((j (op2 (e24) (e24))) = (op1 (j (e24)) (j (e24)))) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((op1 (e10) (e10)) = (e10)) -> ((op2 (e23) (e23)) = (e24)) -> (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> ((j (h (e13))) = (e13)) -> ((h (e13)) = (e22)) -> (~((e13) = (e14))) -> False). % 217.93/218.16 do 0 intro. intros zenon_Hbb zenon_H42 zenon_H1f zenon_H47 zenon_Ha3 zenon_Ha8 zenon_H6f zenon_Hac zenon_H3b zenon_Hb zenon_H93 zenon_H9e zenon_H75 zenon_H74 zenon_H8c zenon_H6e zenon_H83 zenon_Hb6 zenon_H3c zenon_H64 zenon_H5b. % 217.93/218.16 apply (zenon_or_s _ _ zenon_Hbb); [ zenon_intro zenon_H66 | zenon_intro zenon_Hbc ]. % 217.93/218.16 apply (zenon_L28_); trivial. % 217.93/218.16 apply (zenon_or_s _ _ zenon_Hbc); [ zenon_intro zenon_H68 | zenon_intro zenon_Hbd ]. % 217.93/218.16 apply (zenon_L29_); trivial. % 217.93/218.16 apply (zenon_or_s _ _ zenon_Hbd); [ zenon_intro zenon_H69 | zenon_intro zenon_Hbe ]. % 217.93/218.16 apply (zenon_L30_); trivial. % 217.93/218.16 apply (zenon_or_s _ _ zenon_Hbe); [ zenon_intro zenon_H7d | zenon_intro zenon_Hba ]. % 217.93/218.16 apply (zenon_L52_); trivial. % 217.93/218.16 apply (zenon_L53_); trivial. % 217.93/218.16 (* end of lemma zenon_L54_ *) % 217.93/218.16 assert (zenon_L55_ : (~((j (h (e14))) = (j (e20)))) -> ((h (e14)) = (e20)) -> False). % 217.93/218.16 do 0 intro. intros zenon_Hbf zenon_Hc0. % 217.93/218.16 cut (((h (e14)) = (e20))); [idtac | apply NNPP; zenon_intro zenon_Hc1]. % 217.93/218.16 congruence. % 217.93/218.16 exact (zenon_Hc1 zenon_Hc0). % 217.93/218.16 (* end of lemma zenon_L55_ *) % 217.93/218.16 assert (zenon_L56_ : (~((e10) = (e14))) -> ((j (h (e14))) = (e14)) -> ((h (e14)) = (e20)) -> ((j (e20)) = (e10)) -> False). % 217.93/218.16 do 0 intro. intros zenon_H47 zenon_Hc2 zenon_Hc0 zenon_Hd. % 217.93/218.16 cut (((j (h (e14))) = (e14)) = ((e10) = (e14))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H47. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hc2. % 217.93/218.16 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.16 cut (((j (h (e14))) = (e10))); [idtac | apply NNPP; zenon_intro zenon_Hc3]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((e10) = (e10))); [ zenon_intro zenon_Hf | zenon_intro zenon_H9 ]. % 217.93/218.16 cut (((e10) = (e10)) = ((j (h (e14))) = (e10))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hc3. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hf. % 217.93/218.16 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.16 cut (((e10) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hc4]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((j (h (e14))) = (j (h (e14))))); [ zenon_intro zenon_Hc5 | zenon_intro zenon_Hc6 ]. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14)))) = ((e10) = (j (h (e14))))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hc4. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hc5. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hc6]. % 217.93/218.16 cut (((j (h (e14))) = (e10))); [idtac | apply NNPP; zenon_intro zenon_Hc3]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((j (e20)) = (e10)) = ((j (h (e14))) = (e10))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hc3. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hd. % 217.93/218.16 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.16 cut (((j (e20)) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hc7]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((j (h (e14))) = (j (h (e14))))); [ zenon_intro zenon_Hc5 | zenon_intro zenon_Hc6 ]. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14)))) = ((j (e20)) = (j (h (e14))))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hc7. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hc5. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hc6]. % 217.93/218.16 cut (((j (h (e14))) = (j (e20)))); [idtac | apply NNPP; zenon_intro zenon_Hbf]. % 217.93/218.16 congruence. % 217.93/218.16 apply (zenon_L55_); trivial. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_H9. apply refl_equal. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_H9. apply refl_equal. % 217.93/218.16 apply zenon_H9. apply refl_equal. % 217.93/218.16 apply zenon_H24. apply refl_equal. % 217.93/218.16 (* end of lemma zenon_L56_ *) % 217.93/218.16 assert (zenon_L57_ : (~((e11) = (e14))) -> ((j (h (e14))) = (e14)) -> ((h (e14)) = (e20)) -> ((j (e20)) = (e11)) -> False). % 217.93/218.16 do 0 intro. intros zenon_Hc8 zenon_Hc2 zenon_Hc0 zenon_H16. % 217.93/218.16 cut (((j (h (e14))) = (e14)) = ((e11) = (e14))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hc8. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hc2. % 217.93/218.16 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.16 cut (((j (h (e14))) = (e11))); [idtac | apply NNPP; zenon_intro zenon_Hc9]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((e11) = (e11))); [ zenon_intro zenon_H18 | zenon_intro zenon_H14 ]. % 217.93/218.16 cut (((e11) = (e11)) = ((j (h (e14))) = (e11))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hc9. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H18. % 217.93/218.16 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.16 cut (((e11) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hca]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((j (h (e14))) = (j (h (e14))))); [ zenon_intro zenon_Hc5 | zenon_intro zenon_Hc6 ]. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14)))) = ((e11) = (j (h (e14))))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hca. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hc5. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hc6]. % 217.93/218.16 cut (((j (h (e14))) = (e11))); [idtac | apply NNPP; zenon_intro zenon_Hc9]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((j (e20)) = (e11)) = ((j (h (e14))) = (e11))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hc9. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H16. % 217.93/218.16 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.16 cut (((j (e20)) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hc7]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((j (h (e14))) = (j (h (e14))))); [ zenon_intro zenon_Hc5 | zenon_intro zenon_Hc6 ]. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14)))) = ((j (e20)) = (j (h (e14))))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hc7. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hc5. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hc6]. % 217.93/218.16 cut (((j (h (e14))) = (j (e20)))); [idtac | apply NNPP; zenon_intro zenon_Hbf]. % 217.93/218.16 congruence. % 217.93/218.16 apply (zenon_L55_); trivial. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_H14. apply refl_equal. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_H14. apply refl_equal. % 217.93/218.16 apply zenon_H14. apply refl_equal. % 217.93/218.16 apply zenon_H24. apply refl_equal. % 217.93/218.16 (* end of lemma zenon_L57_ *) % 217.93/218.16 assert (zenon_L58_ : (~((e12) = (e14))) -> ((j (h (e14))) = (e14)) -> ((h (e14)) = (e20)) -> ((j (e20)) = (e12)) -> False). % 217.93/218.16 do 0 intro. intros zenon_H26 zenon_Hc2 zenon_Hc0 zenon_H30. % 217.93/218.16 cut (((j (h (e14))) = (e14)) = ((e12) = (e14))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H26. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hc2. % 217.93/218.16 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.16 cut (((j (h (e14))) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Hcb]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((e12) = (e12))); [ zenon_intro zenon_H31 | zenon_intro zenon_Ha ]. % 217.93/218.16 cut (((e12) = (e12)) = ((j (h (e14))) = (e12))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hcb. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H31. % 217.93/218.16 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.16 cut (((e12) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hcc]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((j (h (e14))) = (j (h (e14))))); [ zenon_intro zenon_Hc5 | zenon_intro zenon_Hc6 ]. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14)))) = ((e12) = (j (h (e14))))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hcc. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hc5. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hc6]. % 217.93/218.16 cut (((j (h (e14))) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Hcb]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((j (e20)) = (e12)) = ((j (h (e14))) = (e12))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hcb. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H30. % 217.93/218.16 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.16 cut (((j (e20)) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hc7]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((j (h (e14))) = (j (h (e14))))); [ zenon_intro zenon_Hc5 | zenon_intro zenon_Hc6 ]. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14)))) = ((j (e20)) = (j (h (e14))))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hc7. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hc5. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hc6]. % 217.93/218.16 cut (((j (h (e14))) = (j (e20)))); [idtac | apply NNPP; zenon_intro zenon_Hbf]. % 217.93/218.16 congruence. % 217.93/218.16 apply (zenon_L55_); trivial. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_Ha. apply refl_equal. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_Ha. apply refl_equal. % 217.93/218.16 apply zenon_Ha. apply refl_equal. % 217.93/218.16 apply zenon_H24. apply refl_equal. % 217.93/218.16 (* end of lemma zenon_L58_ *) % 217.93/218.16 assert (zenon_L59_ : (~((e13) = (e14))) -> ((j (h (e14))) = (e14)) -> ((h (e14)) = (e20)) -> ((j (e20)) = (e13)) -> False). % 217.93/218.16 do 0 intro. intros zenon_H5b zenon_Hc2 zenon_Hc0 zenon_H1e. % 217.93/218.16 cut (((j (h (e14))) = (e14)) = ((e13) = (e14))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H5b. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hc2. % 217.93/218.16 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.16 cut (((j (h (e14))) = (e13))); [idtac | apply NNPP; zenon_intro zenon_Hcd]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((e13) = (e13))); [ zenon_intro zenon_H20 | zenon_intro zenon_H1d ]. % 217.93/218.16 cut (((e13) = (e13)) = ((j (h (e14))) = (e13))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hcd. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H20. % 217.93/218.16 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.16 cut (((e13) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hce]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((j (h (e14))) = (j (h (e14))))); [ zenon_intro zenon_Hc5 | zenon_intro zenon_Hc6 ]. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14)))) = ((e13) = (j (h (e14))))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hce. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hc5. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hc6]. % 217.93/218.16 cut (((j (h (e14))) = (e13))); [idtac | apply NNPP; zenon_intro zenon_Hcd]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((j (e20)) = (e13)) = ((j (h (e14))) = (e13))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hcd. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H1e. % 217.93/218.16 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.16 cut (((j (e20)) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hc7]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((j (h (e14))) = (j (h (e14))))); [ zenon_intro zenon_Hc5 | zenon_intro zenon_Hc6 ]. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14)))) = ((j (e20)) = (j (h (e14))))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hc7. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hc5. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hc6]. % 217.93/218.16 cut (((j (h (e14))) = (j (e20)))); [idtac | apply NNPP; zenon_intro zenon_Hbf]. % 217.93/218.16 congruence. % 217.93/218.16 apply (zenon_L55_); trivial. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_H1d. apply refl_equal. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_H1d. apply refl_equal. % 217.93/218.16 apply zenon_H1d. apply refl_equal. % 217.93/218.16 apply zenon_H24. apply refl_equal. % 217.93/218.16 (* end of lemma zenon_L59_ *) % 217.93/218.16 assert (zenon_L60_ : (((j (e20)) = (e10))\/(((j (e20)) = (e11))\/(((j (e20)) = (e12))\/(((j (e20)) = (e13))\/((j (e20)) = (e14)))))) -> (~((e11) = (e14))) -> (~((e12) = (e14))) -> ((h (e14)) = (e20)) -> ((j (h (e14))) = (e14)) -> (~((e13) = (e14))) -> ((j (h (e10))) = (e10)) -> ((h (e10)) = (e20)) -> (~((e10) = (e14))) -> False). % 217.93/218.16 do 0 intro. intros zenon_H2b zenon_Hc8 zenon_H26 zenon_Hc0 zenon_Hc2 zenon_H5b zenon_H2c zenon_H1b zenon_H47. % 217.93/218.16 apply (zenon_or_s _ _ zenon_H2b); [ zenon_intro zenon_Hd | zenon_intro zenon_H2d ]. % 217.93/218.16 apply (zenon_L56_); trivial. % 217.93/218.16 apply (zenon_or_s _ _ zenon_H2d); [ zenon_intro zenon_H16 | zenon_intro zenon_H2e ]. % 217.93/218.16 apply (zenon_L57_); trivial. % 217.93/218.16 apply (zenon_or_s _ _ zenon_H2e); [ zenon_intro zenon_H30 | zenon_intro zenon_H2f ]. % 217.93/218.16 apply (zenon_L58_); trivial. % 217.93/218.16 apply (zenon_or_s _ _ zenon_H2f); [ zenon_intro zenon_H1e | zenon_intro zenon_H25 ]. % 217.93/218.16 apply (zenon_L59_); trivial. % 217.93/218.16 apply (zenon_L17_); trivial. % 217.93/218.16 (* end of lemma zenon_L60_ *) % 217.93/218.16 assert (zenon_L61_ : (~((j (h (e14))) = (j (e21)))) -> ((h (e14)) = (e21)) -> False). % 217.93/218.16 do 0 intro. intros zenon_Hcf zenon_Hd0. % 217.93/218.16 cut (((h (e14)) = (e21))); [idtac | apply NNPP; zenon_intro zenon_Hd1]. % 217.93/218.16 congruence. % 217.93/218.16 exact (zenon_Hd1 zenon_Hd0). % 217.93/218.16 (* end of lemma zenon_L61_ *) % 217.93/218.16 assert (zenon_L62_ : (~((e10) = (e14))) -> ((j (h (e14))) = (e14)) -> ((h (e14)) = (e21)) -> ((j (e21)) = (e10)) -> False). % 217.93/218.16 do 0 intro. intros zenon_H47 zenon_Hc2 zenon_Hd0 zenon_H51. % 217.93/218.16 cut (((j (h (e14))) = (e14)) = ((e10) = (e14))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H47. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hc2. % 217.93/218.16 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.16 cut (((j (h (e14))) = (e10))); [idtac | apply NNPP; zenon_intro zenon_Hc3]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((e10) = (e10))); [ zenon_intro zenon_Hf | zenon_intro zenon_H9 ]. % 217.93/218.16 cut (((e10) = (e10)) = ((j (h (e14))) = (e10))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hc3. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hf. % 217.93/218.16 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.16 cut (((e10) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hc4]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((j (h (e14))) = (j (h (e14))))); [ zenon_intro zenon_Hc5 | zenon_intro zenon_Hc6 ]. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14)))) = ((e10) = (j (h (e14))))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hc4. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hc5. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hc6]. % 217.93/218.16 cut (((j (h (e14))) = (e10))); [idtac | apply NNPP; zenon_intro zenon_Hc3]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((j (e21)) = (e10)) = ((j (h (e14))) = (e10))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hc3. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H51. % 217.93/218.16 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.16 cut (((j (e21)) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hd2]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((j (h (e14))) = (j (h (e14))))); [ zenon_intro zenon_Hc5 | zenon_intro zenon_Hc6 ]. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14)))) = ((j (e21)) = (j (h (e14))))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hd2. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hc5. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hc6]. % 217.93/218.16 cut (((j (h (e14))) = (j (e21)))); [idtac | apply NNPP; zenon_intro zenon_Hcf]. % 217.93/218.16 congruence. % 217.93/218.16 apply (zenon_L61_); trivial. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_H9. apply refl_equal. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_H9. apply refl_equal. % 217.93/218.16 apply zenon_H9. apply refl_equal. % 217.93/218.16 apply zenon_H24. apply refl_equal. % 217.93/218.16 (* end of lemma zenon_L62_ *) % 217.93/218.16 assert (zenon_L63_ : (~((e11) = (e14))) -> ((j (h (e14))) = (e14)) -> ((h (e14)) = (e21)) -> ((j (e21)) = (e11)) -> False). % 217.93/218.16 do 0 intro. intros zenon_Hc8 zenon_Hc2 zenon_Hd0 zenon_H53. % 217.93/218.16 cut (((j (h (e14))) = (e14)) = ((e11) = (e14))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hc8. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hc2. % 217.93/218.16 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.16 cut (((j (h (e14))) = (e11))); [idtac | apply NNPP; zenon_intro zenon_Hc9]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((e11) = (e11))); [ zenon_intro zenon_H18 | zenon_intro zenon_H14 ]. % 217.93/218.16 cut (((e11) = (e11)) = ((j (h (e14))) = (e11))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hc9. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H18. % 217.93/218.16 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.16 cut (((e11) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hca]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((j (h (e14))) = (j (h (e14))))); [ zenon_intro zenon_Hc5 | zenon_intro zenon_Hc6 ]. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14)))) = ((e11) = (j (h (e14))))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hca. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hc5. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hc6]. % 217.93/218.16 cut (((j (h (e14))) = (e11))); [idtac | apply NNPP; zenon_intro zenon_Hc9]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((j (e21)) = (e11)) = ((j (h (e14))) = (e11))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hc9. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H53. % 217.93/218.16 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.16 cut (((j (e21)) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hd2]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((j (h (e14))) = (j (h (e14))))); [ zenon_intro zenon_Hc5 | zenon_intro zenon_Hc6 ]. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14)))) = ((j (e21)) = (j (h (e14))))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hd2. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hc5. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hc6]. % 217.93/218.16 cut (((j (h (e14))) = (j (e21)))); [idtac | apply NNPP; zenon_intro zenon_Hcf]. % 217.93/218.16 congruence. % 217.93/218.16 apply (zenon_L61_); trivial. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_H14. apply refl_equal. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_H14. apply refl_equal. % 217.93/218.16 apply zenon_H14. apply refl_equal. % 217.93/218.16 apply zenon_H24. apply refl_equal. % 217.93/218.16 (* end of lemma zenon_L63_ *) % 217.93/218.16 assert (zenon_L64_ : (~((e12) = (e14))) -> ((j (h (e14))) = (e14)) -> ((h (e14)) = (e21)) -> ((j (e21)) = (e12)) -> False). % 217.93/218.16 do 0 intro. intros zenon_H26 zenon_Hc2 zenon_Hd0 zenon_H54. % 217.93/218.16 cut (((j (h (e14))) = (e14)) = ((e12) = (e14))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H26. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hc2. % 217.93/218.16 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.16 cut (((j (h (e14))) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Hcb]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((e12) = (e12))); [ zenon_intro zenon_H31 | zenon_intro zenon_Ha ]. % 217.93/218.16 cut (((e12) = (e12)) = ((j (h (e14))) = (e12))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hcb. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H31. % 217.93/218.16 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.16 cut (((e12) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hcc]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((j (h (e14))) = (j (h (e14))))); [ zenon_intro zenon_Hc5 | zenon_intro zenon_Hc6 ]. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14)))) = ((e12) = (j (h (e14))))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hcc. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hc5. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hc6]. % 217.93/218.16 cut (((j (h (e14))) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Hcb]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((j (e21)) = (e12)) = ((j (h (e14))) = (e12))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hcb. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H54. % 217.93/218.16 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.16 cut (((j (e21)) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hd2]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((j (h (e14))) = (j (h (e14))))); [ zenon_intro zenon_Hc5 | zenon_intro zenon_Hc6 ]. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14)))) = ((j (e21)) = (j (h (e14))))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hd2. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hc5. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hc6]. % 217.93/218.16 cut (((j (h (e14))) = (j (e21)))); [idtac | apply NNPP; zenon_intro zenon_Hcf]. % 217.93/218.16 congruence. % 217.93/218.16 apply (zenon_L61_); trivial. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_Ha. apply refl_equal. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_Ha. apply refl_equal. % 217.93/218.16 apply zenon_Ha. apply refl_equal. % 217.93/218.16 apply zenon_H24. apply refl_equal. % 217.93/218.16 (* end of lemma zenon_L64_ *) % 217.93/218.16 assert (zenon_L65_ : (~((e13) = (e14))) -> ((j (h (e14))) = (e14)) -> ((h (e14)) = (e21)) -> ((j (e21)) = (e13)) -> False). % 217.93/218.16 do 0 intro. intros zenon_H5b zenon_Hc2 zenon_Hd0 zenon_H58. % 217.93/218.16 cut (((j (h (e14))) = (e14)) = ((e13) = (e14))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H5b. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hc2. % 217.93/218.16 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.16 cut (((j (h (e14))) = (e13))); [idtac | apply NNPP; zenon_intro zenon_Hcd]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((e13) = (e13))); [ zenon_intro zenon_H20 | zenon_intro zenon_H1d ]. % 217.93/218.16 cut (((e13) = (e13)) = ((j (h (e14))) = (e13))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hcd. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H20. % 217.93/218.16 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.16 cut (((e13) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hce]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((j (h (e14))) = (j (h (e14))))); [ zenon_intro zenon_Hc5 | zenon_intro zenon_Hc6 ]. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14)))) = ((e13) = (j (h (e14))))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hce. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hc5. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hc6]. % 217.93/218.16 cut (((j (h (e14))) = (e13))); [idtac | apply NNPP; zenon_intro zenon_Hcd]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((j (e21)) = (e13)) = ((j (h (e14))) = (e13))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hcd. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H58. % 217.93/218.16 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.16 cut (((j (e21)) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hd2]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((j (h (e14))) = (j (h (e14))))); [ zenon_intro zenon_Hc5 | zenon_intro zenon_Hc6 ]. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14)))) = ((j (e21)) = (j (h (e14))))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hd2. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hc5. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hc6]. % 217.93/218.16 cut (((j (h (e14))) = (j (e21)))); [idtac | apply NNPP; zenon_intro zenon_Hcf]. % 217.93/218.16 congruence. % 217.93/218.16 apply (zenon_L61_); trivial. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_H1d. apply refl_equal. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_H1d. apply refl_equal. % 217.93/218.16 apply zenon_H1d. apply refl_equal. % 217.93/218.16 apply zenon_H24. apply refl_equal. % 217.93/218.16 (* end of lemma zenon_L65_ *) % 217.93/218.16 assert (zenon_L66_ : ((j (h (e12))) = (e12)) -> ((h (e12)) = (e21)) -> ((j (e21)) = (e14)) -> (~((e12) = (e14))) -> False). % 217.93/218.16 do 0 intro. intros zenon_Hc zenon_H56 zenon_H5a zenon_H26. % 217.93/218.16 elim (classic ((e14) = (e14))); [ zenon_intro zenon_H27 | zenon_intro zenon_H24 ]. % 217.93/218.16 cut (((e14) = (e14)) = ((e12) = (e14))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H26. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H27. % 217.93/218.16 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.16 cut (((e14) = (e12))); [idtac | apply NNPP; zenon_intro zenon_H28]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((j (h (e12))) = (e12)) = ((e14) = (e12))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H28. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hc. % 217.93/218.16 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.16 cut (((j (h (e12))) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H29]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((e14) = (e14))); [ zenon_intro zenon_H27 | zenon_intro zenon_H24 ]. % 217.93/218.16 cut (((e14) = (e14)) = ((j (h (e12))) = (e14))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H29. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H27. % 217.93/218.16 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.16 cut (((e14) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H2a]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((j (h (e12))) = (j (h (e12))))); [ zenon_intro zenon_H11 | zenon_intro zenon_H12 ]. % 217.93/218.16 cut (((j (h (e12))) = (j (h (e12)))) = ((e14) = (j (h (e12))))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H2a. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H11. % 217.93/218.16 cut (((j (h (e12))) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H12]. % 217.93/218.16 cut (((j (h (e12))) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H29]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((j (e21)) = (e14)) = ((j (h (e12))) = (e14))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H29. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H5a. % 217.93/218.16 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.16 cut (((j (e21)) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H59]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((j (h (e12))) = (j (h (e12))))); [ zenon_intro zenon_H11 | zenon_intro zenon_H12 ]. % 217.93/218.16 cut (((j (h (e12))) = (j (h (e12)))) = ((j (e21)) = (j (h (e12))))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H59. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H11. % 217.93/218.16 cut (((j (h (e12))) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H12]. % 217.93/218.16 cut (((j (h (e12))) = (j (e21)))); [idtac | apply NNPP; zenon_intro zenon_H55]. % 217.93/218.16 congruence. % 217.93/218.16 apply (zenon_L23_); trivial. % 217.93/218.16 apply zenon_H12. apply refl_equal. % 217.93/218.16 apply zenon_H12. apply refl_equal. % 217.93/218.16 apply zenon_H24. apply refl_equal. % 217.93/218.16 apply zenon_H12. apply refl_equal. % 217.93/218.16 apply zenon_H12. apply refl_equal. % 217.93/218.16 apply zenon_H24. apply refl_equal. % 217.93/218.16 apply zenon_H24. apply refl_equal. % 217.93/218.16 apply zenon_Ha. apply refl_equal. % 217.93/218.16 apply zenon_H24. apply refl_equal. % 217.93/218.16 apply zenon_H24. apply refl_equal. % 217.93/218.16 (* end of lemma zenon_L66_ *) % 217.93/218.16 assert (zenon_L67_ : (((j (e21)) = (e10))\/(((j (e21)) = (e11))\/(((j (e21)) = (e12))\/(((j (e21)) = (e13))\/((j (e21)) = (e14)))))) -> (~((e10) = (e14))) -> (~((e11) = (e14))) -> ((h (e14)) = (e21)) -> ((j (h (e14))) = (e14)) -> (~((e13) = (e14))) -> ((j (h (e12))) = (e12)) -> ((h (e12)) = (e21)) -> (~((e12) = (e14))) -> False). % 217.93/218.16 do 0 intro. intros zenon_H5f zenon_H47 zenon_Hc8 zenon_Hd0 zenon_Hc2 zenon_H5b zenon_Hc zenon_H56 zenon_H26. % 217.93/218.16 apply (zenon_or_s _ _ zenon_H5f); [ zenon_intro zenon_H51 | zenon_intro zenon_H60 ]. % 217.93/218.16 apply (zenon_L62_); trivial. % 217.93/218.16 apply (zenon_or_s _ _ zenon_H60); [ zenon_intro zenon_H53 | zenon_intro zenon_H61 ]. % 217.93/218.16 apply (zenon_L63_); trivial. % 217.93/218.16 apply (zenon_or_s _ _ zenon_H61); [ zenon_intro zenon_H54 | zenon_intro zenon_H62 ]. % 217.93/218.16 apply (zenon_L64_); trivial. % 217.93/218.16 apply (zenon_or_s _ _ zenon_H62); [ zenon_intro zenon_H58 | zenon_intro zenon_H5a ]. % 217.93/218.16 apply (zenon_L65_); trivial. % 217.93/218.16 apply (zenon_L66_); trivial. % 217.93/218.16 (* end of lemma zenon_L67_ *) % 217.93/218.16 assert (zenon_L68_ : (~((j (h (e14))) = (j (e22)))) -> ((h (e14)) = (e22)) -> False). % 217.93/218.16 do 0 intro. intros zenon_Hd3 zenon_Hd4. % 217.93/218.16 cut (((h (e14)) = (e22))); [idtac | apply NNPP; zenon_intro zenon_Hd5]. % 217.93/218.16 congruence. % 217.93/218.16 exact (zenon_Hd5 zenon_Hd4). % 217.93/218.16 (* end of lemma zenon_L68_ *) % 217.93/218.16 assert (zenon_L69_ : (~((e10) = (e14))) -> ((j (h (e14))) = (e14)) -> ((h (e14)) = (e22)) -> ((j (e22)) = (e10)) -> False). % 217.93/218.16 do 0 intro. intros zenon_H47 zenon_Hc2 zenon_Hd4 zenon_H66. % 217.93/218.16 cut (((j (h (e14))) = (e14)) = ((e10) = (e14))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H47. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hc2. % 217.93/218.16 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.16 cut (((j (h (e14))) = (e10))); [idtac | apply NNPP; zenon_intro zenon_Hc3]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((e10) = (e10))); [ zenon_intro zenon_Hf | zenon_intro zenon_H9 ]. % 217.93/218.16 cut (((e10) = (e10)) = ((j (h (e14))) = (e10))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hc3. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hf. % 217.93/218.16 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.16 cut (((e10) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hc4]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((j (h (e14))) = (j (h (e14))))); [ zenon_intro zenon_Hc5 | zenon_intro zenon_Hc6 ]. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14)))) = ((e10) = (j (h (e14))))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hc4. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hc5. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hc6]. % 217.93/218.16 cut (((j (h (e14))) = (e10))); [idtac | apply NNPP; zenon_intro zenon_Hc3]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((j (e22)) = (e10)) = ((j (h (e14))) = (e10))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hc3. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H66. % 217.93/218.16 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.16 cut (((j (e22)) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hd6]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((j (h (e14))) = (j (h (e14))))); [ zenon_intro zenon_Hc5 | zenon_intro zenon_Hc6 ]. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14)))) = ((j (e22)) = (j (h (e14))))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hd6. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hc5. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hc6]. % 217.93/218.16 cut (((j (h (e14))) = (j (e22)))); [idtac | apply NNPP; zenon_intro zenon_Hd3]. % 217.93/218.16 congruence. % 217.93/218.16 apply (zenon_L68_); trivial. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_H9. apply refl_equal. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_H9. apply refl_equal. % 217.93/218.16 apply zenon_H9. apply refl_equal. % 217.93/218.16 apply zenon_H24. apply refl_equal. % 217.93/218.16 (* end of lemma zenon_L69_ *) % 217.93/218.16 assert (zenon_L70_ : (~((e11) = (e14))) -> ((j (h (e14))) = (e14)) -> ((h (e14)) = (e22)) -> ((j (e22)) = (e11)) -> False). % 217.93/218.16 do 0 intro. intros zenon_Hc8 zenon_Hc2 zenon_Hd4 zenon_H68. % 217.93/218.16 cut (((j (h (e14))) = (e14)) = ((e11) = (e14))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hc8. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hc2. % 217.93/218.16 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.16 cut (((j (h (e14))) = (e11))); [idtac | apply NNPP; zenon_intro zenon_Hc9]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((e11) = (e11))); [ zenon_intro zenon_H18 | zenon_intro zenon_H14 ]. % 217.93/218.16 cut (((e11) = (e11)) = ((j (h (e14))) = (e11))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hc9. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H18. % 217.93/218.16 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.16 cut (((e11) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hca]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((j (h (e14))) = (j (h (e14))))); [ zenon_intro zenon_Hc5 | zenon_intro zenon_Hc6 ]. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14)))) = ((e11) = (j (h (e14))))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hca. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hc5. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hc6]. % 217.93/218.16 cut (((j (h (e14))) = (e11))); [idtac | apply NNPP; zenon_intro zenon_Hc9]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((j (e22)) = (e11)) = ((j (h (e14))) = (e11))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hc9. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H68. % 217.93/218.16 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.16 cut (((j (e22)) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hd6]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((j (h (e14))) = (j (h (e14))))); [ zenon_intro zenon_Hc5 | zenon_intro zenon_Hc6 ]. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14)))) = ((j (e22)) = (j (h (e14))))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hd6. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hc5. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hc6]. % 217.93/218.16 cut (((j (h (e14))) = (j (e22)))); [idtac | apply NNPP; zenon_intro zenon_Hd3]. % 217.93/218.16 congruence. % 217.93/218.16 apply (zenon_L68_); trivial. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_H14. apply refl_equal. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_H14. apply refl_equal. % 217.93/218.16 apply zenon_H14. apply refl_equal. % 217.93/218.16 apply zenon_H24. apply refl_equal. % 217.93/218.16 (* end of lemma zenon_L70_ *) % 217.93/218.16 assert (zenon_L71_ : (~((e12) = (e14))) -> ((j (h (e14))) = (e14)) -> ((h (e14)) = (e22)) -> ((j (e22)) = (e12)) -> False). % 217.93/218.16 do 0 intro. intros zenon_H26 zenon_Hc2 zenon_Hd4 zenon_H69. % 217.93/218.16 cut (((j (h (e14))) = (e14)) = ((e12) = (e14))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H26. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hc2. % 217.93/218.16 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.16 cut (((j (h (e14))) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Hcb]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((e12) = (e12))); [ zenon_intro zenon_H31 | zenon_intro zenon_Ha ]. % 217.93/218.16 cut (((e12) = (e12)) = ((j (h (e14))) = (e12))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hcb. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H31. % 217.93/218.16 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.16 cut (((e12) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hcc]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((j (h (e14))) = (j (h (e14))))); [ zenon_intro zenon_Hc5 | zenon_intro zenon_Hc6 ]. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14)))) = ((e12) = (j (h (e14))))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hcc. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hc5. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hc6]. % 217.93/218.16 cut (((j (h (e14))) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Hcb]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((j (e22)) = (e12)) = ((j (h (e14))) = (e12))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hcb. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H69. % 217.93/218.16 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.16 cut (((j (e22)) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hd6]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((j (h (e14))) = (j (h (e14))))); [ zenon_intro zenon_Hc5 | zenon_intro zenon_Hc6 ]. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14)))) = ((j (e22)) = (j (h (e14))))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hd6. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hc5. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hc6]. % 217.93/218.16 cut (((j (h (e14))) = (j (e22)))); [idtac | apply NNPP; zenon_intro zenon_Hd3]. % 217.93/218.16 congruence. % 217.93/218.16 apply (zenon_L68_); trivial. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_Ha. apply refl_equal. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_Ha. apply refl_equal. % 217.93/218.16 apply zenon_Ha. apply refl_equal. % 217.93/218.16 apply zenon_H24. apply refl_equal. % 217.93/218.16 (* end of lemma zenon_L71_ *) % 217.93/218.16 assert (zenon_L72_ : (~((e13) = (e14))) -> ((j (h (e14))) = (e14)) -> ((h (e14)) = (e22)) -> ((j (e22)) = (e13)) -> False). % 217.93/218.16 do 0 intro. intros zenon_H5b zenon_Hc2 zenon_Hd4 zenon_H7d. % 217.93/218.16 cut (((j (h (e14))) = (e14)) = ((e13) = (e14))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H5b. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hc2. % 217.93/218.16 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.16 cut (((j (h (e14))) = (e13))); [idtac | apply NNPP; zenon_intro zenon_Hcd]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((e13) = (e13))); [ zenon_intro zenon_H20 | zenon_intro zenon_H1d ]. % 217.93/218.16 cut (((e13) = (e13)) = ((j (h (e14))) = (e13))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hcd. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H20. % 217.93/218.16 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.16 cut (((e13) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hce]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((j (h (e14))) = (j (h (e14))))); [ zenon_intro zenon_Hc5 | zenon_intro zenon_Hc6 ]. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14)))) = ((e13) = (j (h (e14))))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hce. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hc5. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hc6]. % 217.93/218.16 cut (((j (h (e14))) = (e13))); [idtac | apply NNPP; zenon_intro zenon_Hcd]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((j (e22)) = (e13)) = ((j (h (e14))) = (e13))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hcd. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H7d. % 217.93/218.16 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.16 cut (((j (e22)) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hd6]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((j (h (e14))) = (j (h (e14))))); [ zenon_intro zenon_Hc5 | zenon_intro zenon_Hc6 ]. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14)))) = ((j (e22)) = (j (h (e14))))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hd6. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hc5. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hc6]. % 217.93/218.16 cut (((j (h (e14))) = (j (e22)))); [idtac | apply NNPP; zenon_intro zenon_Hd3]. % 217.93/218.16 congruence. % 217.93/218.16 apply (zenon_L68_); trivial. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_H1d. apply refl_equal. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_H1d. apply refl_equal. % 217.93/218.16 apply zenon_H1d. apply refl_equal. % 217.93/218.16 apply zenon_H24. apply refl_equal. % 217.93/218.16 (* end of lemma zenon_L72_ *) % 217.93/218.16 assert (zenon_L73_ : ((j (op2 (e24) (e24))) = (op1 (j (e24)) (j (e24)))) -> ((j (e24)) = (e10)) -> ((op1 (e14) (e14)) = (e10)) -> ((op1 (e10) (e10)) = (e10)) -> ((op2 (e24) (e24)) = (e22)) -> ((j (e22)) = (e14)) -> (~((e10) = (e14))) -> False). % 217.93/218.16 do 0 intro. intros zenon_H74 zenon_H6b zenon_H6f zenon_H6e zenon_H75 zenon_Hba zenon_H47. % 217.93/218.16 elim (classic ((e14) = (e14))); [ zenon_intro zenon_H27 | zenon_intro zenon_H24 ]. % 217.93/218.16 cut (((e14) = (e14)) = ((e10) = (e14))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H47. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H27. % 217.93/218.16 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.16 cut (((e14) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H48]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((op1 (e14) (e14)) = (e10)) = ((e14) = (e10))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H48. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H6f. % 217.93/218.16 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H9c]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((e14) = (e14))); [ zenon_intro zenon_H27 | zenon_intro zenon_H24 ]. % 217.93/218.16 cut (((e14) = (e14)) = ((op1 (e14) (e14)) = (e14))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H9c. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H27. % 217.93/218.16 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.16 cut (((e14) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H9d]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((op1 (e14) (e14)) = (op1 (e14) (e14)))); [ zenon_intro zenon_H80 | zenon_intro zenon_H81 ]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14))) = ((e14) = (op1 (e14) (e14)))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H9d. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H80. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H81]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H9c]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((j (e22)) = (e14)) = ((op1 (e14) (e14)) = (e14))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H9c. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hba. % 217.93/218.16 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.16 cut (((j (e22)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H79]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((op1 (e14) (e14)) = (op1 (e14) (e14)))); [ zenon_intro zenon_H80 | zenon_intro zenon_H81 ]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14))) = ((j (e22)) = (op1 (e14) (e14)))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H79. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H80. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H81]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (j (e22)))); [idtac | apply NNPP; zenon_intro zenon_H76]. % 217.93/218.16 congruence. % 217.93/218.16 apply (zenon_L33_); trivial. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H24. apply refl_equal. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H24. apply refl_equal. % 217.93/218.16 apply zenon_H24. apply refl_equal. % 217.93/218.16 apply zenon_H9. apply refl_equal. % 217.93/218.16 apply zenon_H24. apply refl_equal. % 217.93/218.16 apply zenon_H24. apply refl_equal. % 217.93/218.16 (* end of lemma zenon_L73_ *) % 217.93/218.16 assert (zenon_L74_ : (~((op1 (j (e22)) (j (e22))) = (op1 (e14) (e14)))) -> ((j (e22)) = (e14)) -> False). % 217.93/218.16 do 0 intro. intros zenon_Ha7 zenon_Hba. % 217.93/218.16 cut (((j (e22)) = (e14))); [idtac | apply NNPP; zenon_intro zenon_Hd7]. % 217.93/218.16 cut (((j (e22)) = (e14))); [idtac | apply NNPP; zenon_intro zenon_Hd7]. % 217.93/218.16 congruence. % 217.93/218.16 exact (zenon_Hd7 zenon_Hba). % 217.93/218.16 exact (zenon_Hd7 zenon_Hba). % 217.93/218.16 (* end of lemma zenon_L74_ *) % 217.93/218.16 assert (zenon_L75_ : ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((op2 (e22) (e22)) = (e23)) -> ((j (e22)) = (e14)) -> (~((op1 (e14) (e14)) = (j (e23)))) -> False). % 217.93/218.16 do 0 intro. intros zenon_Hac zenon_Ha3 zenon_Hba zenon_Had. % 217.93/218.16 elim (classic ((j (e23)) = (j (e23)))); [ zenon_intro zenon_Hae | zenon_intro zenon_Haf ]. % 217.93/218.16 cut (((j (e23)) = (j (e23))) = ((op1 (e14) (e14)) = (j (e23)))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Had. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hae. % 217.93/218.16 cut (((j (e23)) = (j (e23)))); [idtac | apply NNPP; zenon_intro zenon_Haf]. % 217.93/218.16 cut (((j (e23)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_Hb0]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) = ((j (e23)) = (op1 (e14) (e14)))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hb0. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hac. % 217.93/218.16 cut (((op1 (j (e22)) (j (e22))) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_Ha7]. % 217.93/218.16 cut (((j (op2 (e22) (e22))) = (j (e23)))); [idtac | apply NNPP; zenon_intro zenon_Hb1]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((j (e23)) = (j (e23)))); [ zenon_intro zenon_Hae | zenon_intro zenon_Haf ]. % 217.93/218.16 cut (((j (e23)) = (j (e23))) = ((j (op2 (e22) (e22))) = (j (e23)))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hb1. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hae. % 217.93/218.16 cut (((j (e23)) = (j (e23)))); [idtac | apply NNPP; zenon_intro zenon_Haf]. % 217.93/218.16 cut (((j (e23)) = (j (op2 (e22) (e22))))); [idtac | apply NNPP; zenon_intro zenon_Ha2]. % 217.93/218.16 congruence. % 217.93/218.16 apply (zenon_L44_); trivial. % 217.93/218.16 apply zenon_Haf. apply refl_equal. % 217.93/218.16 apply zenon_Haf. apply refl_equal. % 217.93/218.16 apply (zenon_L74_); trivial. % 217.93/218.16 apply zenon_Haf. apply refl_equal. % 217.93/218.16 apply zenon_Haf. apply refl_equal. % 217.93/218.16 (* end of lemma zenon_L75_ *) % 217.93/218.16 assert (zenon_L76_ : ((op1 (e14) (e14)) = (e10)) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((j (e22)) = (e14)) -> ((op2 (e22) (e22)) = (e23)) -> ((j (e23)) = (e11)) -> (~((e10) = (e11))) -> False). % 217.93/218.16 do 0 intro. intros zenon_H6f zenon_Hac zenon_Hba zenon_Ha3 zenon_Hb2 zenon_H93. % 217.93/218.16 elim (classic ((e11) = (e11))); [ zenon_intro zenon_H18 | zenon_intro zenon_H14 ]. % 217.93/218.16 cut (((e11) = (e11)) = ((e10) = (e11))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H93. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H18. % 217.93/218.16 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.16 cut (((e11) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H94]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((op1 (e14) (e14)) = (e10)) = ((e11) = (e10))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H94. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H6f. % 217.93/218.16 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H95]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((e11) = (e11))); [ zenon_intro zenon_H18 | zenon_intro zenon_H14 ]. % 217.93/218.16 cut (((e11) = (e11)) = ((op1 (e14) (e14)) = (e11))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H95. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H18. % 217.93/218.16 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.16 cut (((e11) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H96]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((op1 (e14) (e14)) = (op1 (e14) (e14)))); [ zenon_intro zenon_H80 | zenon_intro zenon_H81 ]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14))) = ((e11) = (op1 (e14) (e14)))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H96. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H80. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H81]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H95]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((j (e23)) = (e11)) = ((op1 (e14) (e14)) = (e11))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H95. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hb2. % 217.93/218.16 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.16 cut (((j (e23)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_Hb0]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((op1 (e14) (e14)) = (op1 (e14) (e14)))); [ zenon_intro zenon_H80 | zenon_intro zenon_H81 ]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14))) = ((j (e23)) = (op1 (e14) (e14)))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hb0. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H80. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H81]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (j (e23)))); [idtac | apply NNPP; zenon_intro zenon_Had]. % 217.93/218.16 congruence. % 217.93/218.16 apply (zenon_L75_); trivial. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H14. apply refl_equal. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H14. apply refl_equal. % 217.93/218.16 apply zenon_H14. apply refl_equal. % 217.93/218.16 apply zenon_H9. apply refl_equal. % 217.93/218.16 apply zenon_H14. apply refl_equal. % 217.93/218.16 apply zenon_H14. apply refl_equal. % 217.93/218.16 (* end of lemma zenon_L76_ *) % 217.93/218.16 assert (zenon_L77_ : ((op1 (e14) (e14)) = (e10)) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((j (e22)) = (e14)) -> ((op2 (e22) (e22)) = (e23)) -> ((j (e23)) = (e12)) -> (~((e10) = (e12))) -> False). % 217.93/218.16 do 0 intro. intros zenon_H6f zenon_Hac zenon_Hba zenon_Ha3 zenon_Hb3 zenon_Hb. % 217.93/218.16 elim (classic ((e12) = (e12))); [ zenon_intro zenon_H31 | zenon_intro zenon_Ha ]. % 217.93/218.16 cut (((e12) = (e12)) = ((e10) = (e12))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hb. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H31. % 217.93/218.16 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.16 cut (((e12) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H32]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((op1 (e14) (e14)) = (e10)) = ((e12) = (e10))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H32. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H6f. % 217.93/218.16 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (e12))); [idtac | apply NNPP; zenon_intro zenon_H98]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((e12) = (e12))); [ zenon_intro zenon_H31 | zenon_intro zenon_Ha ]. % 217.93/218.16 cut (((e12) = (e12)) = ((op1 (e14) (e14)) = (e12))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H98. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H31. % 217.93/218.16 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.16 cut (((e12) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H99]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((op1 (e14) (e14)) = (op1 (e14) (e14)))); [ zenon_intro zenon_H80 | zenon_intro zenon_H81 ]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14))) = ((e12) = (op1 (e14) (e14)))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H99. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H80. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H81]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (e12))); [idtac | apply NNPP; zenon_intro zenon_H98]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((j (e23)) = (e12)) = ((op1 (e14) (e14)) = (e12))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H98. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hb3. % 217.93/218.16 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.16 cut (((j (e23)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_Hb0]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((op1 (e14) (e14)) = (op1 (e14) (e14)))); [ zenon_intro zenon_H80 | zenon_intro zenon_H81 ]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14))) = ((j (e23)) = (op1 (e14) (e14)))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hb0. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H80. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H81]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (j (e23)))); [idtac | apply NNPP; zenon_intro zenon_Had]. % 217.93/218.16 congruence. % 217.93/218.16 apply (zenon_L75_); trivial. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_Ha. apply refl_equal. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_Ha. apply refl_equal. % 217.93/218.16 apply zenon_Ha. apply refl_equal. % 217.93/218.16 apply zenon_H9. apply refl_equal. % 217.93/218.16 apply zenon_Ha. apply refl_equal. % 217.93/218.16 apply zenon_Ha. apply refl_equal. % 217.93/218.16 (* end of lemma zenon_L77_ *) % 217.93/218.16 assert (zenon_L78_ : ((op1 (e14) (e14)) = (e10)) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((j (e22)) = (e14)) -> ((op2 (e22) (e22)) = (e23)) -> ((j (e23)) = (e13)) -> (~((e10) = (e13))) -> False). % 217.93/218.16 do 0 intro. intros zenon_H6f zenon_Hac zenon_Hba zenon_Ha3 zenon_Hb4 zenon_H3b. % 217.93/218.16 elim (classic ((e13) = (e13))); [ zenon_intro zenon_H20 | zenon_intro zenon_H1d ]. % 217.93/218.16 cut (((e13) = (e13)) = ((e10) = (e13))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H3b. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H20. % 217.93/218.16 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.16 cut (((e13) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H4b]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((op1 (e14) (e14)) = (e10)) = ((e13) = (e10))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H4b. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H6f. % 217.93/218.16 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H7e]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((e13) = (e13))); [ zenon_intro zenon_H20 | zenon_intro zenon_H1d ]. % 217.93/218.16 cut (((e13) = (e13)) = ((op1 (e14) (e14)) = (e13))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H7e. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H20. % 217.93/218.16 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.16 cut (((e13) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H7f]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((op1 (e14) (e14)) = (op1 (e14) (e14)))); [ zenon_intro zenon_H80 | zenon_intro zenon_H81 ]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14))) = ((e13) = (op1 (e14) (e14)))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H7f. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H80. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H81]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H7e]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((j (e23)) = (e13)) = ((op1 (e14) (e14)) = (e13))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H7e. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hb4. % 217.93/218.16 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.16 cut (((j (e23)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_Hb0]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((op1 (e14) (e14)) = (op1 (e14) (e14)))); [ zenon_intro zenon_H80 | zenon_intro zenon_H81 ]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14))) = ((j (e23)) = (op1 (e14) (e14)))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hb0. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H80. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H81]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (j (e23)))); [idtac | apply NNPP; zenon_intro zenon_Had]. % 217.93/218.16 congruence. % 217.93/218.16 apply (zenon_L75_); trivial. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H1d. apply refl_equal. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H1d. apply refl_equal. % 217.93/218.16 apply zenon_H1d. apply refl_equal. % 217.93/218.16 apply zenon_H9. apply refl_equal. % 217.93/218.16 apply zenon_H1d. apply refl_equal. % 217.93/218.16 apply zenon_H1d. apply refl_equal. % 217.93/218.16 (* end of lemma zenon_L78_ *) % 217.93/218.16 assert (zenon_L79_ : ((op1 (e14) (e14)) = (e10)) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((j (e22)) = (e14)) -> ((op2 (e22) (e22)) = (e23)) -> ((j (e23)) = (e14)) -> (~((e10) = (e14))) -> False). % 217.93/218.16 do 0 intro. intros zenon_H6f zenon_Hac zenon_Hba zenon_Ha3 zenon_Hb5 zenon_H47. % 217.93/218.16 elim (classic ((e14) = (e14))); [ zenon_intro zenon_H27 | zenon_intro zenon_H24 ]. % 217.93/218.16 cut (((e14) = (e14)) = ((e10) = (e14))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H47. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H27. % 217.93/218.16 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.16 cut (((e14) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H48]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((op1 (e14) (e14)) = (e10)) = ((e14) = (e10))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H48. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H6f. % 217.93/218.16 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H9c]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((e14) = (e14))); [ zenon_intro zenon_H27 | zenon_intro zenon_H24 ]. % 217.93/218.16 cut (((e14) = (e14)) = ((op1 (e14) (e14)) = (e14))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H9c. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H27. % 217.93/218.16 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.16 cut (((e14) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H9d]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((op1 (e14) (e14)) = (op1 (e14) (e14)))); [ zenon_intro zenon_H80 | zenon_intro zenon_H81 ]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14))) = ((e14) = (op1 (e14) (e14)))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H9d. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H80. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H81]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H9c]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((j (e23)) = (e14)) = ((op1 (e14) (e14)) = (e14))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H9c. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hb5. % 217.93/218.16 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.16 cut (((j (e23)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_Hb0]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((op1 (e14) (e14)) = (op1 (e14) (e14)))); [ zenon_intro zenon_H80 | zenon_intro zenon_H81 ]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14))) = ((j (e23)) = (op1 (e14) (e14)))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hb0. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H80. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H81]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (j (e23)))); [idtac | apply NNPP; zenon_intro zenon_Had]. % 217.93/218.16 congruence. % 217.93/218.16 apply (zenon_L75_); trivial. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H24. apply refl_equal. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H24. apply refl_equal. % 217.93/218.16 apply zenon_H24. apply refl_equal. % 217.93/218.16 apply zenon_H9. apply refl_equal. % 217.93/218.16 apply zenon_H24. apply refl_equal. % 217.93/218.16 apply zenon_H24. apply refl_equal. % 217.93/218.16 (* end of lemma zenon_L79_ *) % 217.93/218.16 assert (zenon_L80_ : (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> ((op2 (e23) (e23)) = (e24)) -> ((op1 (e10) (e10)) = (e10)) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((j (op2 (e24) (e24))) = (op1 (j (e24)) (j (e24)))) -> ((op2 (e24) (e24)) = (e22)) -> (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> (~((e10) = (e11))) -> (~((e10) = (e12))) -> (~((e10) = (e13))) -> ((op1 (e14) (e14)) = (e10)) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((j (e22)) = (e14)) -> ((op2 (e22) (e22)) = (e23)) -> (~((e10) = (e14))) -> False). % 217.93/218.16 do 0 intro. intros zenon_Hb6 zenon_H83 zenon_H6e zenon_H8c zenon_H74 zenon_H75 zenon_H9e zenon_H93 zenon_Hb zenon_H3b zenon_H6f zenon_Hac zenon_Hba zenon_Ha3 zenon_H47. % 217.93/218.16 apply (zenon_or_s _ _ zenon_Hb6); [ zenon_intro zenon_H86 | zenon_intro zenon_Hb7 ]. % 217.93/218.16 apply (zenon_or_s _ _ zenon_H9e); [ zenon_intro zenon_H6b | zenon_intro zenon_H9f ]. % 217.93/218.16 apply (zenon_L73_); trivial. % 217.93/218.16 apply (zenon_or_s _ _ zenon_H9f); [ zenon_intro zenon_H92 | zenon_intro zenon_Ha0 ]. % 217.93/218.16 apply (zenon_L39_); trivial. % 217.93/218.16 apply (zenon_or_s _ _ zenon_Ha0); [ zenon_intro zenon_H97 | zenon_intro zenon_Ha1 ]. % 217.93/218.16 apply (zenon_L40_); trivial. % 217.93/218.16 apply (zenon_or_s _ _ zenon_Ha1); [ zenon_intro zenon_H9a | zenon_intro zenon_H9b ]. % 217.93/218.16 apply (zenon_L41_); trivial. % 217.93/218.16 apply (zenon_L42_); trivial. % 217.93/218.16 apply (zenon_or_s _ _ zenon_Hb7); [ zenon_intro zenon_Hb2 | zenon_intro zenon_Hb8 ]. % 217.93/218.16 apply (zenon_L76_); trivial. % 217.93/218.16 apply (zenon_or_s _ _ zenon_Hb8); [ zenon_intro zenon_Hb3 | zenon_intro zenon_Hb9 ]. % 217.93/218.16 apply (zenon_L77_); trivial. % 217.93/218.16 apply (zenon_or_s _ _ zenon_Hb9); [ zenon_intro zenon_Hb4 | zenon_intro zenon_Hb5 ]. % 217.93/218.16 apply (zenon_L78_); trivial. % 217.93/218.16 apply (zenon_L79_); trivial. % 217.93/218.16 (* end of lemma zenon_L80_ *) % 217.93/218.16 assert (zenon_L81_ : (((j (e22)) = (e10))\/(((j (e22)) = (e11))\/(((j (e22)) = (e12))\/(((j (e22)) = (e13))\/((j (e22)) = (e14)))))) -> (~((e11) = (e14))) -> (~((e12) = (e14))) -> ((h (e14)) = (e22)) -> ((j (h (e14))) = (e14)) -> (~((e13) = (e14))) -> (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> ((op2 (e23) (e23)) = (e24)) -> ((op1 (e10) (e10)) = (e10)) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((j (op2 (e24) (e24))) = (op1 (j (e24)) (j (e24)))) -> ((op2 (e24) (e24)) = (e22)) -> (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> (~((e10) = (e11))) -> (~((e10) = (e12))) -> (~((e10) = (e13))) -> ((op1 (e14) (e14)) = (e10)) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((op2 (e22) (e22)) = (e23)) -> (~((e10) = (e14))) -> False). % 217.93/218.16 do 0 intro. intros zenon_Hbb zenon_Hc8 zenon_H26 zenon_Hd4 zenon_Hc2 zenon_H5b zenon_Hb6 zenon_H83 zenon_H6e zenon_H8c zenon_H74 zenon_H75 zenon_H9e zenon_H93 zenon_Hb zenon_H3b zenon_H6f zenon_Hac zenon_Ha3 zenon_H47. % 217.93/218.16 apply (zenon_or_s _ _ zenon_Hbb); [ zenon_intro zenon_H66 | zenon_intro zenon_Hbc ]. % 217.93/218.16 apply (zenon_L69_); trivial. % 217.93/218.16 apply (zenon_or_s _ _ zenon_Hbc); [ zenon_intro zenon_H68 | zenon_intro zenon_Hbd ]. % 217.93/218.16 apply (zenon_L70_); trivial. % 217.93/218.16 apply (zenon_or_s _ _ zenon_Hbd); [ zenon_intro zenon_H69 | zenon_intro zenon_Hbe ]. % 217.93/218.16 apply (zenon_L71_); trivial. % 217.93/218.16 apply (zenon_or_s _ _ zenon_Hbe); [ zenon_intro zenon_H7d | zenon_intro zenon_Hba ]. % 217.93/218.16 apply (zenon_L72_); trivial. % 217.93/218.16 apply (zenon_L80_); trivial. % 217.93/218.16 (* end of lemma zenon_L81_ *) % 217.93/218.16 assert (zenon_L82_ : (~((j (h (e14))) = (j (e23)))) -> ((h (e14)) = (e23)) -> False). % 217.93/218.16 do 0 intro. intros zenon_Hd8 zenon_Hd9. % 217.93/218.16 cut (((h (e14)) = (e23))); [idtac | apply NNPP; zenon_intro zenon_Hda]. % 217.93/218.16 congruence. % 217.93/218.16 exact (zenon_Hda zenon_Hd9). % 217.93/218.16 (* end of lemma zenon_L82_ *) % 217.93/218.16 assert (zenon_L83_ : (~((e10) = (e14))) -> ((j (h (e14))) = (e14)) -> ((h (e14)) = (e23)) -> ((j (e23)) = (e10)) -> False). % 217.93/218.16 do 0 intro. intros zenon_H47 zenon_Hc2 zenon_Hd9 zenon_H86. % 217.93/218.16 cut (((j (h (e14))) = (e14)) = ((e10) = (e14))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H47. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hc2. % 217.93/218.16 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.16 cut (((j (h (e14))) = (e10))); [idtac | apply NNPP; zenon_intro zenon_Hc3]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((e10) = (e10))); [ zenon_intro zenon_Hf | zenon_intro zenon_H9 ]. % 217.93/218.16 cut (((e10) = (e10)) = ((j (h (e14))) = (e10))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hc3. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hf. % 217.93/218.16 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.16 cut (((e10) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hc4]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((j (h (e14))) = (j (h (e14))))); [ zenon_intro zenon_Hc5 | zenon_intro zenon_Hc6 ]. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14)))) = ((e10) = (j (h (e14))))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hc4. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hc5. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hc6]. % 217.93/218.16 cut (((j (h (e14))) = (e10))); [idtac | apply NNPP; zenon_intro zenon_Hc3]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((j (e23)) = (e10)) = ((j (h (e14))) = (e10))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hc3. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H86. % 217.93/218.16 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.16 cut (((j (e23)) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hdb]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((j (h (e14))) = (j (h (e14))))); [ zenon_intro zenon_Hc5 | zenon_intro zenon_Hc6 ]. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14)))) = ((j (e23)) = (j (h (e14))))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hdb. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hc5. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hc6]. % 217.93/218.16 cut (((j (h (e14))) = (j (e23)))); [idtac | apply NNPP; zenon_intro zenon_Hd8]. % 217.93/218.16 congruence. % 217.93/218.16 apply (zenon_L82_); trivial. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_H9. apply refl_equal. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_H9. apply refl_equal. % 217.93/218.16 apply zenon_H9. apply refl_equal. % 217.93/218.16 apply zenon_H24. apply refl_equal. % 217.93/218.16 (* end of lemma zenon_L83_ *) % 217.93/218.16 assert (zenon_L84_ : (~((e11) = (e14))) -> ((j (h (e14))) = (e14)) -> ((h (e14)) = (e23)) -> ((j (e23)) = (e11)) -> False). % 217.93/218.16 do 0 intro. intros zenon_Hc8 zenon_Hc2 zenon_Hd9 zenon_Hb2. % 217.93/218.16 cut (((j (h (e14))) = (e14)) = ((e11) = (e14))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hc8. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hc2. % 217.93/218.16 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.16 cut (((j (h (e14))) = (e11))); [idtac | apply NNPP; zenon_intro zenon_Hc9]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((e11) = (e11))); [ zenon_intro zenon_H18 | zenon_intro zenon_H14 ]. % 217.93/218.16 cut (((e11) = (e11)) = ((j (h (e14))) = (e11))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hc9. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H18. % 217.93/218.16 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.16 cut (((e11) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hca]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((j (h (e14))) = (j (h (e14))))); [ zenon_intro zenon_Hc5 | zenon_intro zenon_Hc6 ]. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14)))) = ((e11) = (j (h (e14))))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hca. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hc5. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hc6]. % 217.93/218.16 cut (((j (h (e14))) = (e11))); [idtac | apply NNPP; zenon_intro zenon_Hc9]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((j (e23)) = (e11)) = ((j (h (e14))) = (e11))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hc9. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hb2. % 217.93/218.16 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.16 cut (((j (e23)) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hdb]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((j (h (e14))) = (j (h (e14))))); [ zenon_intro zenon_Hc5 | zenon_intro zenon_Hc6 ]. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14)))) = ((j (e23)) = (j (h (e14))))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hdb. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hc5. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hc6]. % 217.93/218.16 cut (((j (h (e14))) = (j (e23)))); [idtac | apply NNPP; zenon_intro zenon_Hd8]. % 217.93/218.16 congruence. % 217.93/218.16 apply (zenon_L82_); trivial. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_H14. apply refl_equal. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_H14. apply refl_equal. % 217.93/218.16 apply zenon_H14. apply refl_equal. % 217.93/218.16 apply zenon_H24. apply refl_equal. % 217.93/218.16 (* end of lemma zenon_L84_ *) % 217.93/218.16 assert (zenon_L85_ : (~((e12) = (e14))) -> ((j (h (e14))) = (e14)) -> ((h (e14)) = (e23)) -> ((j (e23)) = (e12)) -> False). % 217.93/218.16 do 0 intro. intros zenon_H26 zenon_Hc2 zenon_Hd9 zenon_Hb3. % 217.93/218.16 cut (((j (h (e14))) = (e14)) = ((e12) = (e14))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H26. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hc2. % 217.93/218.16 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.16 cut (((j (h (e14))) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Hcb]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((e12) = (e12))); [ zenon_intro zenon_H31 | zenon_intro zenon_Ha ]. % 217.93/218.16 cut (((e12) = (e12)) = ((j (h (e14))) = (e12))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hcb. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H31. % 217.93/218.16 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.16 cut (((e12) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hcc]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((j (h (e14))) = (j (h (e14))))); [ zenon_intro zenon_Hc5 | zenon_intro zenon_Hc6 ]. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14)))) = ((e12) = (j (h (e14))))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hcc. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hc5. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hc6]. % 217.93/218.16 cut (((j (h (e14))) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Hcb]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((j (e23)) = (e12)) = ((j (h (e14))) = (e12))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hcb. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hb3. % 217.93/218.16 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.16 cut (((j (e23)) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hdb]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((j (h (e14))) = (j (h (e14))))); [ zenon_intro zenon_Hc5 | zenon_intro zenon_Hc6 ]. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14)))) = ((j (e23)) = (j (h (e14))))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hdb. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hc5. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hc6]. % 217.93/218.16 cut (((j (h (e14))) = (j (e23)))); [idtac | apply NNPP; zenon_intro zenon_Hd8]. % 217.93/218.16 congruence. % 217.93/218.16 apply (zenon_L82_); trivial. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_Ha. apply refl_equal. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_Ha. apply refl_equal. % 217.93/218.16 apply zenon_Ha. apply refl_equal. % 217.93/218.16 apply zenon_H24. apply refl_equal. % 217.93/218.16 (* end of lemma zenon_L85_ *) % 217.93/218.16 assert (zenon_L86_ : (~((e13) = (e14))) -> ((j (h (e14))) = (e14)) -> ((h (e14)) = (e23)) -> ((j (e23)) = (e13)) -> False). % 217.93/218.16 do 0 intro. intros zenon_H5b zenon_Hc2 zenon_Hd9 zenon_Hb4. % 217.93/218.16 cut (((j (h (e14))) = (e14)) = ((e13) = (e14))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H5b. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hc2. % 217.93/218.16 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.16 cut (((j (h (e14))) = (e13))); [idtac | apply NNPP; zenon_intro zenon_Hcd]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((e13) = (e13))); [ zenon_intro zenon_H20 | zenon_intro zenon_H1d ]. % 217.93/218.16 cut (((e13) = (e13)) = ((j (h (e14))) = (e13))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hcd. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H20. % 217.93/218.16 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.16 cut (((e13) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hce]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((j (h (e14))) = (j (h (e14))))); [ zenon_intro zenon_Hc5 | zenon_intro zenon_Hc6 ]. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14)))) = ((e13) = (j (h (e14))))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hce. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hc5. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hc6]. % 217.93/218.16 cut (((j (h (e14))) = (e13))); [idtac | apply NNPP; zenon_intro zenon_Hcd]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((j (e23)) = (e13)) = ((j (h (e14))) = (e13))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hcd. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hb4. % 217.93/218.16 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.16 cut (((j (e23)) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hdb]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((j (h (e14))) = (j (h (e14))))); [ zenon_intro zenon_Hc5 | zenon_intro zenon_Hc6 ]. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14)))) = ((j (e23)) = (j (h (e14))))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hdb. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hc5. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hc6]. % 217.93/218.16 cut (((j (h (e14))) = (j (e23)))); [idtac | apply NNPP; zenon_intro zenon_Hd8]. % 217.93/218.16 congruence. % 217.93/218.16 apply (zenon_L82_); trivial. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_H1d. apply refl_equal. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_H1d. apply refl_equal. % 217.93/218.16 apply zenon_H1d. apply refl_equal. % 217.93/218.16 apply zenon_H24. apply refl_equal. % 217.93/218.16 (* end of lemma zenon_L86_ *) % 217.93/218.16 assert (zenon_L87_ : (~((j (h (e13))) = (j (e23)))) -> ((h (e13)) = (e23)) -> False). % 217.93/218.16 do 0 intro. intros zenon_Hdc zenon_Hdd. % 217.93/218.16 cut (((h (e13)) = (e23))); [idtac | apply NNPP; zenon_intro zenon_Hde]. % 217.93/218.16 congruence. % 217.93/218.16 exact (zenon_Hde zenon_Hdd). % 217.93/218.16 (* end of lemma zenon_L87_ *) % 217.93/218.16 assert (zenon_L88_ : ((j (h (e13))) = (e13)) -> ((h (e13)) = (e23)) -> ((j (e23)) = (e14)) -> (~((e13) = (e14))) -> False). % 217.93/218.16 do 0 intro. intros zenon_H3c zenon_Hdd zenon_Hb5 zenon_H5b. % 217.93/218.16 elim (classic ((e14) = (e14))); [ zenon_intro zenon_H27 | zenon_intro zenon_H24 ]. % 217.93/218.16 cut (((e14) = (e14)) = ((e13) = (e14))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H5b. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H27. % 217.93/218.16 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.16 cut (((e14) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H5c]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((j (h (e13))) = (e13)) = ((e14) = (e13))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H5c. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H3c. % 217.93/218.16 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.16 cut (((j (h (e13))) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H5d]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((e14) = (e14))); [ zenon_intro zenon_H27 | zenon_intro zenon_H24 ]. % 217.93/218.16 cut (((e14) = (e14)) = ((j (h (e13))) = (e14))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H5d. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H27. % 217.93/218.16 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.16 cut (((e14) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H5e]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((j (h (e13))) = (j (h (e13))))); [ zenon_intro zenon_H3f | zenon_intro zenon_H40 ]. % 217.93/218.16 cut (((j (h (e13))) = (j (h (e13)))) = ((e14) = (j (h (e13))))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H5e. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H3f. % 217.93/218.16 cut (((j (h (e13))) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H40]. % 217.93/218.16 cut (((j (h (e13))) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H5d]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((j (e23)) = (e14)) = ((j (h (e13))) = (e14))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H5d. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hb5. % 217.93/218.16 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.16 cut (((j (e23)) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_Hdf]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((j (h (e13))) = (j (h (e13))))); [ zenon_intro zenon_H3f | zenon_intro zenon_H40 ]. % 217.93/218.16 cut (((j (h (e13))) = (j (h (e13)))) = ((j (e23)) = (j (h (e13))))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hdf. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H3f. % 217.93/218.16 cut (((j (h (e13))) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H40]. % 217.93/218.16 cut (((j (h (e13))) = (j (e23)))); [idtac | apply NNPP; zenon_intro zenon_Hdc]. % 217.93/218.16 congruence. % 217.93/218.16 apply (zenon_L87_); trivial. % 217.93/218.16 apply zenon_H40. apply refl_equal. % 217.93/218.16 apply zenon_H40. apply refl_equal. % 217.93/218.16 apply zenon_H24. apply refl_equal. % 217.93/218.16 apply zenon_H40. apply refl_equal. % 217.93/218.16 apply zenon_H40. apply refl_equal. % 217.93/218.16 apply zenon_H24. apply refl_equal. % 217.93/218.16 apply zenon_H24. apply refl_equal. % 217.93/218.16 apply zenon_H1d. apply refl_equal. % 217.93/218.16 apply zenon_H24. apply refl_equal. % 217.93/218.16 apply zenon_H24. apply refl_equal. % 217.93/218.16 (* end of lemma zenon_L88_ *) % 217.93/218.16 assert (zenon_L89_ : (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> (~((e10) = (e14))) -> (~((e11) = (e14))) -> (~((e12) = (e14))) -> ((h (e14)) = (e23)) -> ((j (h (e14))) = (e14)) -> ((j (h (e13))) = (e13)) -> ((h (e13)) = (e23)) -> (~((e13) = (e14))) -> False). % 217.93/218.16 do 0 intro. intros zenon_Hb6 zenon_H47 zenon_Hc8 zenon_H26 zenon_Hd9 zenon_Hc2 zenon_H3c zenon_Hdd zenon_H5b. % 217.93/218.16 apply (zenon_or_s _ _ zenon_Hb6); [ zenon_intro zenon_H86 | zenon_intro zenon_Hb7 ]. % 217.93/218.16 apply (zenon_L83_); trivial. % 217.93/218.16 apply (zenon_or_s _ _ zenon_Hb7); [ zenon_intro zenon_Hb2 | zenon_intro zenon_Hb8 ]. % 217.93/218.16 apply (zenon_L84_); trivial. % 217.93/218.16 apply (zenon_or_s _ _ zenon_Hb8); [ zenon_intro zenon_Hb3 | zenon_intro zenon_Hb9 ]. % 217.93/218.16 apply (zenon_L85_); trivial. % 217.93/218.16 apply (zenon_or_s _ _ zenon_Hb9); [ zenon_intro zenon_Hb4 | zenon_intro zenon_Hb5 ]. % 217.93/218.16 apply (zenon_L86_); trivial. % 217.93/218.16 apply (zenon_L88_); trivial. % 217.93/218.16 (* end of lemma zenon_L89_ *) % 217.93/218.16 assert (zenon_L90_ : (~((j (h (e14))) = (j (e24)))) -> ((h (e14)) = (e24)) -> False). % 217.93/218.16 do 0 intro. intros zenon_He0 zenon_He1. % 217.93/218.16 cut (((h (e14)) = (e24))); [idtac | apply NNPP; zenon_intro zenon_He2]. % 217.93/218.16 congruence. % 217.93/218.16 exact (zenon_He2 zenon_He1). % 217.93/218.16 (* end of lemma zenon_L90_ *) % 217.93/218.16 assert (zenon_L91_ : (~((e10) = (e14))) -> ((j (h (e14))) = (e14)) -> ((h (e14)) = (e24)) -> ((j (e24)) = (e10)) -> False). % 217.93/218.16 do 0 intro. intros zenon_H47 zenon_Hc2 zenon_He1 zenon_H6b. % 217.93/218.16 cut (((j (h (e14))) = (e14)) = ((e10) = (e14))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H47. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hc2. % 217.93/218.16 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.16 cut (((j (h (e14))) = (e10))); [idtac | apply NNPP; zenon_intro zenon_Hc3]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((e10) = (e10))); [ zenon_intro zenon_Hf | zenon_intro zenon_H9 ]. % 217.93/218.16 cut (((e10) = (e10)) = ((j (h (e14))) = (e10))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hc3. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hf. % 217.93/218.16 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.16 cut (((e10) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hc4]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((j (h (e14))) = (j (h (e14))))); [ zenon_intro zenon_Hc5 | zenon_intro zenon_Hc6 ]. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14)))) = ((e10) = (j (h (e14))))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hc4. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hc5. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hc6]. % 217.93/218.16 cut (((j (h (e14))) = (e10))); [idtac | apply NNPP; zenon_intro zenon_Hc3]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((j (e24)) = (e10)) = ((j (h (e14))) = (e10))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hc3. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H6b. % 217.93/218.16 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.16 cut (((j (e24)) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_He3]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((j (h (e14))) = (j (h (e14))))); [ zenon_intro zenon_Hc5 | zenon_intro zenon_Hc6 ]. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14)))) = ((j (e24)) = (j (h (e14))))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_He3. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hc5. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hc6]. % 217.93/218.16 cut (((j (h (e14))) = (j (e24)))); [idtac | apply NNPP; zenon_intro zenon_He0]. % 217.93/218.16 congruence. % 217.93/218.16 apply (zenon_L90_); trivial. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_H9. apply refl_equal. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_H9. apply refl_equal. % 217.93/218.16 apply zenon_H9. apply refl_equal. % 217.93/218.16 apply zenon_H24. apply refl_equal. % 217.93/218.16 (* end of lemma zenon_L91_ *) % 217.93/218.16 assert (zenon_L92_ : (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> ((h (e14)) = (e24)) -> ((j (h (e14))) = (e14)) -> (~((e10) = (e11))) -> (~((e10) = (e12))) -> (~((e10) = (e13))) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((j (e23)) = (e10)) -> ((op1 (e14) (e14)) = (e10)) -> ((op1 (e10) (e10)) = (e10)) -> ((op2 (e23) (e23)) = (e24)) -> (~((e10) = (e14))) -> False). % 217.93/218.16 do 0 intro. intros zenon_H9e zenon_He1 zenon_Hc2 zenon_H93 zenon_Hb zenon_H3b zenon_H8c zenon_H86 zenon_H6f zenon_H6e zenon_H83 zenon_H47. % 217.93/218.16 apply (zenon_or_s _ _ zenon_H9e); [ zenon_intro zenon_H6b | zenon_intro zenon_H9f ]. % 217.93/218.16 apply (zenon_L91_); trivial. % 217.93/218.16 apply (zenon_or_s _ _ zenon_H9f); [ zenon_intro zenon_H92 | zenon_intro zenon_Ha0 ]. % 217.93/218.16 apply (zenon_L39_); trivial. % 217.93/218.16 apply (zenon_or_s _ _ zenon_Ha0); [ zenon_intro zenon_H97 | zenon_intro zenon_Ha1 ]. % 217.93/218.16 apply (zenon_L40_); trivial. % 217.93/218.16 apply (zenon_or_s _ _ zenon_Ha1); [ zenon_intro zenon_H9a | zenon_intro zenon_H9b ]. % 217.93/218.16 apply (zenon_L41_); trivial. % 217.93/218.16 apply (zenon_L42_); trivial. % 217.93/218.16 (* end of lemma zenon_L92_ *) % 217.93/218.16 assert (zenon_L93_ : (~((op1 (j (e22)) (j (e22))) = (op1 (e10) (e10)))) -> ((j (e22)) = (e10)) -> False). % 217.93/218.16 do 0 intro. intros zenon_He4 zenon_H66. % 217.93/218.16 cut (((j (e22)) = (e10))); [idtac | apply NNPP; zenon_intro zenon_He5]. % 217.93/218.16 cut (((j (e22)) = (e10))); [idtac | apply NNPP; zenon_intro zenon_He5]. % 217.93/218.16 congruence. % 217.93/218.16 exact (zenon_He5 zenon_H66). % 217.93/218.16 exact (zenon_He5 zenon_H66). % 217.93/218.16 (* end of lemma zenon_L93_ *) % 217.93/218.16 assert (zenon_L94_ : (~((op1 (j (e22)) (j (e22))) = (op1 (e14) (e14)))) -> ((op1 (e10) (e10)) = (e10)) -> ((j (e22)) = (e10)) -> ((op1 (e14) (e14)) = (e10)) -> False). % 217.93/218.16 do 0 intro. intros zenon_Ha7 zenon_H6e zenon_H66 zenon_H6f. % 217.93/218.16 cut (((op1 (e10) (e10)) = (e10)) = ((op1 (j (e22)) (j (e22))) = (op1 (e14) (e14)))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Ha7. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H6e. % 217.93/218.16 cut (((e10) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H70]. % 217.93/218.16 cut (((op1 (e10) (e10)) = (op1 (j (e22)) (j (e22))))); [idtac | apply NNPP; zenon_intro zenon_He6]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((op1 (j (e22)) (j (e22))) = (op1 (j (e22)) (j (e22))))); [ zenon_intro zenon_Haa | zenon_intro zenon_Hab ]. % 217.93/218.16 cut (((op1 (j (e22)) (j (e22))) = (op1 (j (e22)) (j (e22)))) = ((op1 (e10) (e10)) = (op1 (j (e22)) (j (e22))))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_He6. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Haa. % 217.93/218.16 cut (((op1 (j (e22)) (j (e22))) = (op1 (j (e22)) (j (e22))))); [idtac | apply NNPP; zenon_intro zenon_Hab]. % 217.93/218.16 cut (((op1 (j (e22)) (j (e22))) = (op1 (e10) (e10)))); [idtac | apply NNPP; zenon_intro zenon_He4]. % 217.93/218.16 congruence. % 217.93/218.16 apply (zenon_L93_); trivial. % 217.93/218.16 apply zenon_Hab. apply refl_equal. % 217.93/218.16 apply zenon_Hab. apply refl_equal. % 217.93/218.16 apply zenon_H70. apply sym_equal. exact zenon_H6f. % 217.93/218.16 (* end of lemma zenon_L94_ *) % 217.93/218.16 assert (zenon_L95_ : ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((op2 (e22) (e22)) = (e23)) -> ((op1 (e10) (e10)) = (e10)) -> ((op1 (e14) (e14)) = (e10)) -> ((j (e22)) = (e10)) -> (~((op1 (e14) (e14)) = (j (e23)))) -> False). % 217.93/218.16 do 0 intro. intros zenon_Hac zenon_Ha3 zenon_H6e zenon_H6f zenon_H66 zenon_Had. % 217.93/218.16 elim (classic ((j (e23)) = (j (e23)))); [ zenon_intro zenon_Hae | zenon_intro zenon_Haf ]. % 217.93/218.16 cut (((j (e23)) = (j (e23))) = ((op1 (e14) (e14)) = (j (e23)))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Had. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hae. % 217.93/218.16 cut (((j (e23)) = (j (e23)))); [idtac | apply NNPP; zenon_intro zenon_Haf]. % 217.93/218.16 cut (((j (e23)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_Hb0]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) = ((j (e23)) = (op1 (e14) (e14)))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hb0. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hac. % 217.93/218.16 cut (((op1 (j (e22)) (j (e22))) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_Ha7]. % 217.93/218.16 cut (((j (op2 (e22) (e22))) = (j (e23)))); [idtac | apply NNPP; zenon_intro zenon_Hb1]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((j (e23)) = (j (e23)))); [ zenon_intro zenon_Hae | zenon_intro zenon_Haf ]. % 217.93/218.16 cut (((j (e23)) = (j (e23))) = ((j (op2 (e22) (e22))) = (j (e23)))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hb1. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hae. % 217.93/218.16 cut (((j (e23)) = (j (e23)))); [idtac | apply NNPP; zenon_intro zenon_Haf]. % 217.93/218.16 cut (((j (e23)) = (j (op2 (e22) (e22))))); [idtac | apply NNPP; zenon_intro zenon_Ha2]. % 217.93/218.16 congruence. % 217.93/218.16 apply (zenon_L44_); trivial. % 217.93/218.16 apply zenon_Haf. apply refl_equal. % 217.93/218.16 apply zenon_Haf. apply refl_equal. % 217.93/218.16 apply (zenon_L94_); trivial. % 217.93/218.16 apply zenon_Haf. apply refl_equal. % 217.93/218.16 apply zenon_Haf. apply refl_equal. % 217.93/218.16 (* end of lemma zenon_L95_ *) % 217.93/218.16 assert (zenon_L96_ : ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((j (e22)) = (e10)) -> ((op1 (e14) (e14)) = (e10)) -> ((op1 (e10) (e10)) = (e10)) -> ((op2 (e22) (e22)) = (e23)) -> ((j (e23)) = (e11)) -> (~((e10) = (e11))) -> False). % 217.93/218.16 do 0 intro. intros zenon_Hac zenon_H66 zenon_H6f zenon_H6e zenon_Ha3 zenon_Hb2 zenon_H93. % 217.93/218.16 elim (classic ((e11) = (e11))); [ zenon_intro zenon_H18 | zenon_intro zenon_H14 ]. % 217.93/218.16 cut (((e11) = (e11)) = ((e10) = (e11))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H93. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H18. % 217.93/218.16 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.16 cut (((e11) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H94]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((op1 (e14) (e14)) = (e10)) = ((e11) = (e10))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H94. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H6f. % 217.93/218.16 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H95]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((e11) = (e11))); [ zenon_intro zenon_H18 | zenon_intro zenon_H14 ]. % 217.93/218.16 cut (((e11) = (e11)) = ((op1 (e14) (e14)) = (e11))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H95. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H18. % 217.93/218.16 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.16 cut (((e11) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H96]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((op1 (e14) (e14)) = (op1 (e14) (e14)))); [ zenon_intro zenon_H80 | zenon_intro zenon_H81 ]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14))) = ((e11) = (op1 (e14) (e14)))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H96. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H80. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H81]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H95]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((j (e23)) = (e11)) = ((op1 (e14) (e14)) = (e11))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H95. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hb2. % 217.93/218.16 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.16 cut (((j (e23)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_Hb0]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((op1 (e14) (e14)) = (op1 (e14) (e14)))); [ zenon_intro zenon_H80 | zenon_intro zenon_H81 ]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14))) = ((j (e23)) = (op1 (e14) (e14)))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hb0. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H80. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H81]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (j (e23)))); [idtac | apply NNPP; zenon_intro zenon_Had]. % 217.93/218.16 congruence. % 217.93/218.16 apply (zenon_L95_); trivial. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H14. apply refl_equal. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H14. apply refl_equal. % 217.93/218.16 apply zenon_H14. apply refl_equal. % 217.93/218.16 apply zenon_H9. apply refl_equal. % 217.93/218.16 apply zenon_H14. apply refl_equal. % 217.93/218.16 apply zenon_H14. apply refl_equal. % 217.93/218.16 (* end of lemma zenon_L96_ *) % 217.93/218.16 assert (zenon_L97_ : ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((j (e22)) = (e10)) -> ((op1 (e14) (e14)) = (e10)) -> ((op1 (e10) (e10)) = (e10)) -> ((op2 (e22) (e22)) = (e23)) -> ((j (e23)) = (e12)) -> (~((e10) = (e12))) -> False). % 217.93/218.16 do 0 intro. intros zenon_Hac zenon_H66 zenon_H6f zenon_H6e zenon_Ha3 zenon_Hb3 zenon_Hb. % 217.93/218.16 elim (classic ((e12) = (e12))); [ zenon_intro zenon_H31 | zenon_intro zenon_Ha ]. % 217.93/218.16 cut (((e12) = (e12)) = ((e10) = (e12))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hb. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H31. % 217.93/218.16 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.16 cut (((e12) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H32]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((op1 (e14) (e14)) = (e10)) = ((e12) = (e10))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H32. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H6f. % 217.93/218.16 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (e12))); [idtac | apply NNPP; zenon_intro zenon_H98]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((e12) = (e12))); [ zenon_intro zenon_H31 | zenon_intro zenon_Ha ]. % 217.93/218.16 cut (((e12) = (e12)) = ((op1 (e14) (e14)) = (e12))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H98. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H31. % 217.93/218.16 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.16 cut (((e12) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H99]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((op1 (e14) (e14)) = (op1 (e14) (e14)))); [ zenon_intro zenon_H80 | zenon_intro zenon_H81 ]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14))) = ((e12) = (op1 (e14) (e14)))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H99. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H80. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H81]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (e12))); [idtac | apply NNPP; zenon_intro zenon_H98]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((j (e23)) = (e12)) = ((op1 (e14) (e14)) = (e12))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H98. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hb3. % 217.93/218.16 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.16 cut (((j (e23)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_Hb0]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((op1 (e14) (e14)) = (op1 (e14) (e14)))); [ zenon_intro zenon_H80 | zenon_intro zenon_H81 ]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14))) = ((j (e23)) = (op1 (e14) (e14)))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hb0. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H80. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H81]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (j (e23)))); [idtac | apply NNPP; zenon_intro zenon_Had]. % 217.93/218.16 congruence. % 217.93/218.16 apply (zenon_L95_); trivial. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_Ha. apply refl_equal. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_Ha. apply refl_equal. % 217.93/218.16 apply zenon_Ha. apply refl_equal. % 217.93/218.16 apply zenon_H9. apply refl_equal. % 217.93/218.16 apply zenon_Ha. apply refl_equal. % 217.93/218.16 apply zenon_Ha. apply refl_equal. % 217.93/218.16 (* end of lemma zenon_L97_ *) % 217.93/218.16 assert (zenon_L98_ : (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> (~((e10) = (e14))) -> ((op2 (e23) (e23)) = (e24)) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((j (h (e14))) = (e14)) -> ((h (e14)) = (e24)) -> (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> (~((e10) = (e11))) -> (~((e10) = (e12))) -> (~((e10) = (e13))) -> ((op2 (e22) (e22)) = (e23)) -> ((op1 (e10) (e10)) = (e10)) -> ((op1 (e14) (e14)) = (e10)) -> ((j (e22)) = (e10)) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((j (h (e13))) = (e13)) -> ((h (e13)) = (e23)) -> (~((e13) = (e14))) -> False). % 217.93/218.16 do 0 intro. intros zenon_Hb6 zenon_H47 zenon_H83 zenon_H8c zenon_Hc2 zenon_He1 zenon_H9e zenon_H93 zenon_Hb zenon_H3b zenon_Ha3 zenon_H6e zenon_H6f zenon_H66 zenon_Hac zenon_H3c zenon_Hdd zenon_H5b. % 217.93/218.16 apply (zenon_or_s _ _ zenon_Hb6); [ zenon_intro zenon_H86 | zenon_intro zenon_Hb7 ]. % 217.93/218.16 apply (zenon_L92_); trivial. % 217.93/218.16 apply (zenon_or_s _ _ zenon_Hb7); [ zenon_intro zenon_Hb2 | zenon_intro zenon_Hb8 ]. % 217.93/218.16 apply (zenon_L96_); trivial. % 217.93/218.16 apply (zenon_or_s _ _ zenon_Hb8); [ zenon_intro zenon_Hb3 | zenon_intro zenon_Hb9 ]. % 217.93/218.16 apply (zenon_L97_); trivial. % 217.93/218.16 apply (zenon_or_s _ _ zenon_Hb9); [ zenon_intro zenon_Hb4 | zenon_intro zenon_Hb5 ]. % 217.93/218.16 elim (classic ((e13) = (e13))); [ zenon_intro zenon_H20 | zenon_intro zenon_H1d ]. % 217.93/218.16 cut (((e13) = (e13)) = ((e10) = (e13))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H3b. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H20. % 217.93/218.16 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.16 cut (((e13) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H4b]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((op1 (e14) (e14)) = (e10)) = ((e13) = (e10))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H4b. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H6f. % 217.93/218.16 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H7e]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((e13) = (e13))); [ zenon_intro zenon_H20 | zenon_intro zenon_H1d ]. % 217.93/218.16 cut (((e13) = (e13)) = ((op1 (e14) (e14)) = (e13))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H7e. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H20. % 217.93/218.16 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.16 cut (((e13) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H7f]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((op1 (e14) (e14)) = (op1 (e14) (e14)))); [ zenon_intro zenon_H80 | zenon_intro zenon_H81 ]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14))) = ((e13) = (op1 (e14) (e14)))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H7f. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H80. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H81]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H7e]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((j (e23)) = (e13)) = ((op1 (e14) (e14)) = (e13))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H7e. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hb4. % 217.93/218.16 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.16 cut (((j (e23)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_Hb0]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((op1 (e14) (e14)) = (op1 (e14) (e14)))); [ zenon_intro zenon_H80 | zenon_intro zenon_H81 ]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14))) = ((j (e23)) = (op1 (e14) (e14)))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hb0. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H80. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H81]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (j (e23)))); [idtac | apply NNPP; zenon_intro zenon_Had]. % 217.93/218.16 congruence. % 217.93/218.16 apply (zenon_L95_); trivial. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H1d. apply refl_equal. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H1d. apply refl_equal. % 217.93/218.16 apply zenon_H1d. apply refl_equal. % 217.93/218.16 apply zenon_H9. apply refl_equal. % 217.93/218.16 apply zenon_H1d. apply refl_equal. % 217.93/218.16 apply zenon_H1d. apply refl_equal. % 217.93/218.16 apply (zenon_L88_); trivial. % 217.93/218.16 (* end of lemma zenon_L98_ *) % 217.93/218.16 assert (zenon_L99_ : (~((e11) = (e13))) -> ((j (h (e13))) = (e13)) -> ((h (e13)) = (e23)) -> ((j (e23)) = (e11)) -> False). % 217.93/218.16 do 0 intro. intros zenon_H42 zenon_H3c zenon_Hdd zenon_Hb2. % 217.93/218.16 cut (((j (h (e13))) = (e13)) = ((e11) = (e13))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H42. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H3c. % 217.93/218.16 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.16 cut (((j (h (e13))) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H43]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((e11) = (e11))); [ zenon_intro zenon_H18 | zenon_intro zenon_H14 ]. % 217.93/218.16 cut (((e11) = (e11)) = ((j (h (e13))) = (e11))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H43. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H18. % 217.93/218.16 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.16 cut (((e11) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H44]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((j (h (e13))) = (j (h (e13))))); [ zenon_intro zenon_H3f | zenon_intro zenon_H40 ]. % 217.93/218.16 cut (((j (h (e13))) = (j (h (e13)))) = ((e11) = (j (h (e13))))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H44. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H3f. % 217.93/218.16 cut (((j (h (e13))) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H40]. % 217.93/218.16 cut (((j (h (e13))) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H43]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((j (e23)) = (e11)) = ((j (h (e13))) = (e11))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H43. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hb2. % 217.93/218.16 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.16 cut (((j (e23)) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_Hdf]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((j (h (e13))) = (j (h (e13))))); [ zenon_intro zenon_H3f | zenon_intro zenon_H40 ]. % 217.93/218.16 cut (((j (h (e13))) = (j (h (e13)))) = ((j (e23)) = (j (h (e13))))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hdf. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H3f. % 217.93/218.16 cut (((j (h (e13))) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H40]. % 217.93/218.16 cut (((j (h (e13))) = (j (e23)))); [idtac | apply NNPP; zenon_intro zenon_Hdc]. % 217.93/218.16 congruence. % 217.93/218.16 apply (zenon_L87_); trivial. % 217.93/218.16 apply zenon_H40. apply refl_equal. % 217.93/218.16 apply zenon_H40. apply refl_equal. % 217.93/218.16 apply zenon_H14. apply refl_equal. % 217.93/218.16 apply zenon_H40. apply refl_equal. % 217.93/218.16 apply zenon_H40. apply refl_equal. % 217.93/218.16 apply zenon_H14. apply refl_equal. % 217.93/218.16 apply zenon_H14. apply refl_equal. % 217.93/218.16 apply zenon_H1d. apply refl_equal. % 217.93/218.16 (* end of lemma zenon_L99_ *) % 217.93/218.16 assert (zenon_L100_ : ((j (op2 (e24) (e24))) = (op1 (j (e24)) (j (e24)))) -> ((j (e24)) = (e10)) -> ((op1 (e14) (e14)) = (e10)) -> ((op1 (e10) (e10)) = (e10)) -> ((op2 (e24) (e24)) = (e22)) -> ((j (e22)) = (e11)) -> (~((e10) = (e11))) -> False). % 217.93/218.16 do 0 intro. intros zenon_H74 zenon_H6b zenon_H6f zenon_H6e zenon_H75 zenon_H68 zenon_H93. % 217.93/218.16 elim (classic ((e11) = (e11))); [ zenon_intro zenon_H18 | zenon_intro zenon_H14 ]. % 217.93/218.16 cut (((e11) = (e11)) = ((e10) = (e11))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H93. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H18. % 217.93/218.16 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.16 cut (((e11) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H94]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((op1 (e14) (e14)) = (e10)) = ((e11) = (e10))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H94. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H6f. % 217.93/218.16 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H95]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((e11) = (e11))); [ zenon_intro zenon_H18 | zenon_intro zenon_H14 ]. % 217.93/218.16 cut (((e11) = (e11)) = ((op1 (e14) (e14)) = (e11))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H95. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H18. % 217.93/218.16 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.16 cut (((e11) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H96]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((op1 (e14) (e14)) = (op1 (e14) (e14)))); [ zenon_intro zenon_H80 | zenon_intro zenon_H81 ]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14))) = ((e11) = (op1 (e14) (e14)))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H96. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H80. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H81]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H95]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((j (e22)) = (e11)) = ((op1 (e14) (e14)) = (e11))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H95. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H68. % 217.93/218.16 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.16 cut (((j (e22)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H79]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((op1 (e14) (e14)) = (op1 (e14) (e14)))); [ zenon_intro zenon_H80 | zenon_intro zenon_H81 ]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14))) = ((j (e22)) = (op1 (e14) (e14)))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H79. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H80. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H81]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (j (e22)))); [idtac | apply NNPP; zenon_intro zenon_H76]. % 217.93/218.16 congruence. % 217.93/218.16 apply (zenon_L33_); trivial. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H14. apply refl_equal. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H14. apply refl_equal. % 217.93/218.16 apply zenon_H14. apply refl_equal. % 217.93/218.16 apply zenon_H9. apply refl_equal. % 217.93/218.16 apply zenon_H14. apply refl_equal. % 217.93/218.16 apply zenon_H14. apply refl_equal. % 217.93/218.16 (* end of lemma zenon_L100_ *) % 217.93/218.16 assert (zenon_L101_ : (~((op1 (j (e23)) (j (e23))) = (op1 (e12) (e12)))) -> ((j (e23)) = (e12)) -> False). % 217.93/218.16 do 0 intro. intros zenon_He7 zenon_Hb3. % 217.93/218.16 cut (((j (e23)) = (e12))); [idtac | apply NNPP; zenon_intro zenon_He8]. % 217.93/218.16 cut (((j (e23)) = (e12))); [idtac | apply NNPP; zenon_intro zenon_He8]. % 217.93/218.16 congruence. % 217.93/218.16 exact (zenon_He8 zenon_Hb3). % 217.93/218.16 exact (zenon_He8 zenon_Hb3). % 217.93/218.16 (* end of lemma zenon_L101_ *) % 217.93/218.16 assert (zenon_L102_ : (~((op1 (j (e23)) (j (e23))) = (op1 (e14) (e14)))) -> ((op1 (e12) (e12)) = (e10)) -> ((j (e23)) = (e12)) -> ((op1 (e14) (e14)) = (e10)) -> False). % 217.93/218.16 do 0 intro. intros zenon_H88 zenon_He9 zenon_Hb3 zenon_H6f. % 217.93/218.16 cut (((op1 (e12) (e12)) = (e10)) = ((op1 (j (e23)) (j (e23))) = (op1 (e14) (e14)))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H88. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_He9. % 217.93/218.16 cut (((e10) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H70]. % 217.93/218.16 cut (((op1 (e12) (e12)) = (op1 (j (e23)) (j (e23))))); [idtac | apply NNPP; zenon_intro zenon_Hea]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((op1 (j (e23)) (j (e23))) = (op1 (j (e23)) (j (e23))))); [ zenon_intro zenon_H8a | zenon_intro zenon_H8b ]. % 217.93/218.16 cut (((op1 (j (e23)) (j (e23))) = (op1 (j (e23)) (j (e23)))) = ((op1 (e12) (e12)) = (op1 (j (e23)) (j (e23))))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hea. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H8a. % 217.93/218.16 cut (((op1 (j (e23)) (j (e23))) = (op1 (j (e23)) (j (e23))))); [idtac | apply NNPP; zenon_intro zenon_H8b]. % 217.93/218.16 cut (((op1 (j (e23)) (j (e23))) = (op1 (e12) (e12)))); [idtac | apply NNPP; zenon_intro zenon_He7]. % 217.93/218.16 congruence. % 217.93/218.16 apply (zenon_L101_); trivial. % 217.93/218.16 apply zenon_H8b. apply refl_equal. % 217.93/218.16 apply zenon_H8b. apply refl_equal. % 217.93/218.16 apply zenon_H70. apply sym_equal. exact zenon_H6f. % 217.93/218.16 (* end of lemma zenon_L102_ *) % 217.93/218.16 assert (zenon_L103_ : ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((op2 (e23) (e23)) = (e24)) -> ((op1 (e12) (e12)) = (e10)) -> ((op1 (e14) (e14)) = (e10)) -> ((j (e23)) = (e12)) -> (~((op1 (e14) (e14)) = (j (e24)))) -> False). % 217.93/218.16 do 0 intro. intros zenon_H8c zenon_H83 zenon_He9 zenon_H6f zenon_Hb3 zenon_H8d. % 217.93/218.16 elim (classic ((j (e24)) = (j (e24)))); [ zenon_intro zenon_H8e | zenon_intro zenon_H8f ]. % 217.93/218.16 cut (((j (e24)) = (j (e24))) = ((op1 (e14) (e14)) = (j (e24)))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H8d. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H8e. % 217.93/218.16 cut (((j (e24)) = (j (e24)))); [idtac | apply NNPP; zenon_intro zenon_H8f]. % 217.93/218.16 cut (((j (e24)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H90]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) = ((j (e24)) = (op1 (e14) (e14)))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H90. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H8c. % 217.93/218.16 cut (((op1 (j (e23)) (j (e23))) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H88]. % 217.93/218.16 cut (((j (op2 (e23) (e23))) = (j (e24)))); [idtac | apply NNPP; zenon_intro zenon_H91]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((j (e24)) = (j (e24)))); [ zenon_intro zenon_H8e | zenon_intro zenon_H8f ]. % 217.93/218.16 cut (((j (e24)) = (j (e24))) = ((j (op2 (e23) (e23))) = (j (e24)))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H91. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H8e. % 217.93/218.16 cut (((j (e24)) = (j (e24)))); [idtac | apply NNPP; zenon_intro zenon_H8f]. % 217.93/218.16 cut (((j (e24)) = (j (op2 (e23) (e23))))); [idtac | apply NNPP; zenon_intro zenon_H82]. % 217.93/218.16 congruence. % 217.93/218.16 apply (zenon_L35_); trivial. % 217.93/218.16 apply zenon_H8f. apply refl_equal. % 217.93/218.16 apply zenon_H8f. apply refl_equal. % 217.93/218.16 apply (zenon_L102_); trivial. % 217.93/218.16 apply zenon_H8f. apply refl_equal. % 217.93/218.16 apply zenon_H8f. apply refl_equal. % 217.93/218.16 (* end of lemma zenon_L103_ *) % 217.93/218.16 assert (zenon_L104_ : ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((j (e23)) = (e12)) -> ((op1 (e14) (e14)) = (e10)) -> ((op1 (e12) (e12)) = (e10)) -> ((op2 (e23) (e23)) = (e24)) -> ((j (e24)) = (e11)) -> (~((e10) = (e11))) -> False). % 217.93/218.16 do 0 intro. intros zenon_H8c zenon_Hb3 zenon_H6f zenon_He9 zenon_H83 zenon_H92 zenon_H93. % 217.93/218.16 elim (classic ((e11) = (e11))); [ zenon_intro zenon_H18 | zenon_intro zenon_H14 ]. % 217.93/218.16 cut (((e11) = (e11)) = ((e10) = (e11))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H93. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H18. % 217.93/218.16 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.16 cut (((e11) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H94]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((op1 (e14) (e14)) = (e10)) = ((e11) = (e10))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H94. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H6f. % 217.93/218.16 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H95]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((e11) = (e11))); [ zenon_intro zenon_H18 | zenon_intro zenon_H14 ]. % 217.93/218.16 cut (((e11) = (e11)) = ((op1 (e14) (e14)) = (e11))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H95. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H18. % 217.93/218.16 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.16 cut (((e11) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H96]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((op1 (e14) (e14)) = (op1 (e14) (e14)))); [ zenon_intro zenon_H80 | zenon_intro zenon_H81 ]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14))) = ((e11) = (op1 (e14) (e14)))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H96. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H80. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H81]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H95]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((j (e24)) = (e11)) = ((op1 (e14) (e14)) = (e11))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H95. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H92. % 217.93/218.16 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.16 cut (((j (e24)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H90]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((op1 (e14) (e14)) = (op1 (e14) (e14)))); [ zenon_intro zenon_H80 | zenon_intro zenon_H81 ]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14))) = ((j (e24)) = (op1 (e14) (e14)))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H90. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H80. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H81]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (j (e24)))); [idtac | apply NNPP; zenon_intro zenon_H8d]. % 217.93/218.16 congruence. % 217.93/218.16 apply (zenon_L103_); trivial. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H14. apply refl_equal. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H14. apply refl_equal. % 217.93/218.16 apply zenon_H14. apply refl_equal. % 217.93/218.16 apply zenon_H9. apply refl_equal. % 217.93/218.16 apply zenon_H14. apply refl_equal. % 217.93/218.16 apply zenon_H14. apply refl_equal. % 217.93/218.16 (* end of lemma zenon_L104_ *) % 217.93/218.16 assert (zenon_L105_ : (~((e12) = (e14))) -> ((j (h (e14))) = (e14)) -> ((h (e14)) = (e24)) -> ((j (e24)) = (e12)) -> False). % 217.93/218.16 do 0 intro. intros zenon_H26 zenon_Hc2 zenon_He1 zenon_H97. % 217.93/218.16 cut (((j (h (e14))) = (e14)) = ((e12) = (e14))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H26. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hc2. % 217.93/218.16 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.16 cut (((j (h (e14))) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Hcb]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((e12) = (e12))); [ zenon_intro zenon_H31 | zenon_intro zenon_Ha ]. % 217.93/218.16 cut (((e12) = (e12)) = ((j (h (e14))) = (e12))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hcb. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H31. % 217.93/218.16 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.16 cut (((e12) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hcc]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((j (h (e14))) = (j (h (e14))))); [ zenon_intro zenon_Hc5 | zenon_intro zenon_Hc6 ]. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14)))) = ((e12) = (j (h (e14))))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hcc. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hc5. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hc6]. % 217.93/218.16 cut (((j (h (e14))) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Hcb]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((j (e24)) = (e12)) = ((j (h (e14))) = (e12))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hcb. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H97. % 217.93/218.16 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.16 cut (((j (e24)) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_He3]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((j (h (e14))) = (j (h (e14))))); [ zenon_intro zenon_Hc5 | zenon_intro zenon_Hc6 ]. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14)))) = ((j (e24)) = (j (h (e14))))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_He3. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hc5. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hc6]. % 217.93/218.16 cut (((j (h (e14))) = (j (e24)))); [idtac | apply NNPP; zenon_intro zenon_He0]. % 217.93/218.16 congruence. % 217.93/218.16 apply (zenon_L90_); trivial. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_Ha. apply refl_equal. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_Ha. apply refl_equal. % 217.93/218.16 apply zenon_Ha. apply refl_equal. % 217.93/218.16 apply zenon_H24. apply refl_equal. % 217.93/218.16 (* end of lemma zenon_L105_ *) % 217.93/218.16 assert (zenon_L106_ : ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((j (e23)) = (e12)) -> ((op1 (e14) (e14)) = (e10)) -> ((op1 (e12) (e12)) = (e10)) -> ((op2 (e23) (e23)) = (e24)) -> ((j (e24)) = (e13)) -> (~((e10) = (e13))) -> False). % 217.93/218.16 do 0 intro. intros zenon_H8c zenon_Hb3 zenon_H6f zenon_He9 zenon_H83 zenon_H9a zenon_H3b. % 217.93/218.16 elim (classic ((e13) = (e13))); [ zenon_intro zenon_H20 | zenon_intro zenon_H1d ]. % 217.93/218.16 cut (((e13) = (e13)) = ((e10) = (e13))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H3b. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H20. % 217.93/218.16 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.16 cut (((e13) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H4b]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((op1 (e14) (e14)) = (e10)) = ((e13) = (e10))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H4b. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H6f. % 217.93/218.16 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H7e]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((e13) = (e13))); [ zenon_intro zenon_H20 | zenon_intro zenon_H1d ]. % 217.93/218.16 cut (((e13) = (e13)) = ((op1 (e14) (e14)) = (e13))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H7e. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H20. % 217.93/218.16 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.16 cut (((e13) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H7f]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((op1 (e14) (e14)) = (op1 (e14) (e14)))); [ zenon_intro zenon_H80 | zenon_intro zenon_H81 ]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14))) = ((e13) = (op1 (e14) (e14)))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H7f. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H80. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H81]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H7e]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((j (e24)) = (e13)) = ((op1 (e14) (e14)) = (e13))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H7e. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H9a. % 217.93/218.16 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.16 cut (((j (e24)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H90]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((op1 (e14) (e14)) = (op1 (e14) (e14)))); [ zenon_intro zenon_H80 | zenon_intro zenon_H81 ]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14))) = ((j (e24)) = (op1 (e14) (e14)))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H90. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H80. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H81]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (j (e24)))); [idtac | apply NNPP; zenon_intro zenon_H8d]. % 217.93/218.16 congruence. % 217.93/218.16 apply (zenon_L103_); trivial. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H1d. apply refl_equal. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H1d. apply refl_equal. % 217.93/218.16 apply zenon_H1d. apply refl_equal. % 217.93/218.16 apply zenon_H9. apply refl_equal. % 217.93/218.16 apply zenon_H1d. apply refl_equal. % 217.93/218.16 apply zenon_H1d. apply refl_equal. % 217.93/218.16 (* end of lemma zenon_L106_ *) % 217.93/218.16 assert (zenon_L107_ : (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> ((j (e22)) = (e11)) -> ((op2 (e24) (e24)) = (e22)) -> ((op1 (e10) (e10)) = (e10)) -> ((j (op2 (e24) (e24))) = (op1 (j (e24)) (j (e24)))) -> (~((e10) = (e11))) -> ((h (e14)) = (e24)) -> ((j (h (e14))) = (e14)) -> (~((e12) = (e14))) -> (~((e10) = (e13))) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((j (e23)) = (e12)) -> ((op1 (e14) (e14)) = (e10)) -> ((op1 (e12) (e12)) = (e10)) -> ((op2 (e23) (e23)) = (e24)) -> (~((e10) = (e14))) -> False). % 217.93/218.16 do 0 intro. intros zenon_H9e zenon_H68 zenon_H75 zenon_H6e zenon_H74 zenon_H93 zenon_He1 zenon_Hc2 zenon_H26 zenon_H3b zenon_H8c zenon_Hb3 zenon_H6f zenon_He9 zenon_H83 zenon_H47. % 217.93/218.16 apply (zenon_or_s _ _ zenon_H9e); [ zenon_intro zenon_H6b | zenon_intro zenon_H9f ]. % 217.93/218.16 apply (zenon_L100_); trivial. % 217.93/218.16 apply (zenon_or_s _ _ zenon_H9f); [ zenon_intro zenon_H92 | zenon_intro zenon_Ha0 ]. % 217.93/218.16 apply (zenon_L104_); trivial. % 217.93/218.16 apply (zenon_or_s _ _ zenon_Ha0); [ zenon_intro zenon_H97 | zenon_intro zenon_Ha1 ]. % 217.93/218.16 apply (zenon_L105_); trivial. % 217.93/218.16 apply (zenon_or_s _ _ zenon_Ha1); [ zenon_intro zenon_H9a | zenon_intro zenon_H9b ]. % 217.93/218.16 apply (zenon_L106_); trivial. % 217.93/218.16 elim (classic ((e14) = (e14))); [ zenon_intro zenon_H27 | zenon_intro zenon_H24 ]. % 217.93/218.16 cut (((e14) = (e14)) = ((e10) = (e14))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H47. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H27. % 217.93/218.16 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.16 cut (((e14) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H48]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((op1 (e14) (e14)) = (e10)) = ((e14) = (e10))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H48. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H6f. % 217.93/218.16 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H9c]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((e14) = (e14))); [ zenon_intro zenon_H27 | zenon_intro zenon_H24 ]. % 217.93/218.16 cut (((e14) = (e14)) = ((op1 (e14) (e14)) = (e14))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H9c. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H27. % 217.93/218.16 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.16 cut (((e14) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H9d]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((op1 (e14) (e14)) = (op1 (e14) (e14)))); [ zenon_intro zenon_H80 | zenon_intro zenon_H81 ]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14))) = ((e14) = (op1 (e14) (e14)))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H9d. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H80. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H81]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H9c]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((j (e24)) = (e14)) = ((op1 (e14) (e14)) = (e14))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H9c. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H9b. % 217.93/218.16 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.16 cut (((j (e24)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H90]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((op1 (e14) (e14)) = (op1 (e14) (e14)))); [ zenon_intro zenon_H80 | zenon_intro zenon_H81 ]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14))) = ((j (e24)) = (op1 (e14) (e14)))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H90. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H80. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H81]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (j (e24)))); [idtac | apply NNPP; zenon_intro zenon_H8d]. % 217.93/218.16 congruence. % 217.93/218.16 apply (zenon_L103_); trivial. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H24. apply refl_equal. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H24. apply refl_equal. % 217.93/218.16 apply zenon_H24. apply refl_equal. % 217.93/218.16 apply zenon_H9. apply refl_equal. % 217.93/218.16 apply zenon_H24. apply refl_equal. % 217.93/218.16 apply zenon_H24. apply refl_equal. % 217.93/218.16 (* end of lemma zenon_L107_ *) % 217.93/218.16 assert (zenon_L108_ : (~((op1 (j (e23)) (j (e23))) = (op1 (e13) (e13)))) -> ((j (e23)) = (e13)) -> False). % 217.93/218.16 do 0 intro. intros zenon_Heb zenon_Hb4. % 217.93/218.16 cut (((j (e23)) = (e13))); [idtac | apply NNPP; zenon_intro zenon_Hec]. % 217.93/218.16 cut (((j (e23)) = (e13))); [idtac | apply NNPP; zenon_intro zenon_Hec]. % 217.93/218.16 congruence. % 217.93/218.16 exact (zenon_Hec zenon_Hb4). % 217.93/218.16 exact (zenon_Hec zenon_Hb4). % 217.93/218.16 (* end of lemma zenon_L108_ *) % 217.93/218.16 assert (zenon_L109_ : (~((op1 (j (e23)) (j (e23))) = (op1 (e14) (e14)))) -> ((op1 (e13) (e13)) = (e10)) -> ((j (e23)) = (e13)) -> ((op1 (e14) (e14)) = (e10)) -> False). % 217.93/218.16 do 0 intro. intros zenon_H88 zenon_Ha8 zenon_Hb4 zenon_H6f. % 217.93/218.16 cut (((op1 (e13) (e13)) = (e10)) = ((op1 (j (e23)) (j (e23))) = (op1 (e14) (e14)))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H88. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Ha8. % 217.93/218.16 cut (((e10) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H70]. % 217.93/218.16 cut (((op1 (e13) (e13)) = (op1 (j (e23)) (j (e23))))); [idtac | apply NNPP; zenon_intro zenon_Hed]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((op1 (j (e23)) (j (e23))) = (op1 (j (e23)) (j (e23))))); [ zenon_intro zenon_H8a | zenon_intro zenon_H8b ]. % 217.93/218.16 cut (((op1 (j (e23)) (j (e23))) = (op1 (j (e23)) (j (e23)))) = ((op1 (e13) (e13)) = (op1 (j (e23)) (j (e23))))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hed. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H8a. % 217.93/218.16 cut (((op1 (j (e23)) (j (e23))) = (op1 (j (e23)) (j (e23))))); [idtac | apply NNPP; zenon_intro zenon_H8b]. % 217.93/218.16 cut (((op1 (j (e23)) (j (e23))) = (op1 (e13) (e13)))); [idtac | apply NNPP; zenon_intro zenon_Heb]. % 217.93/218.16 congruence. % 217.93/218.16 apply (zenon_L108_); trivial. % 217.93/218.16 apply zenon_H8b. apply refl_equal. % 217.93/218.16 apply zenon_H8b. apply refl_equal. % 217.93/218.16 apply zenon_H70. apply sym_equal. exact zenon_H6f. % 217.93/218.16 (* end of lemma zenon_L109_ *) % 217.93/218.16 assert (zenon_L110_ : ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((op2 (e23) (e23)) = (e24)) -> ((op1 (e13) (e13)) = (e10)) -> ((op1 (e14) (e14)) = (e10)) -> ((j (e23)) = (e13)) -> (~((op1 (e14) (e14)) = (j (e24)))) -> False). % 217.93/218.16 do 0 intro. intros zenon_H8c zenon_H83 zenon_Ha8 zenon_H6f zenon_Hb4 zenon_H8d. % 217.93/218.16 elim (classic ((j (e24)) = (j (e24)))); [ zenon_intro zenon_H8e | zenon_intro zenon_H8f ]. % 217.93/218.16 cut (((j (e24)) = (j (e24))) = ((op1 (e14) (e14)) = (j (e24)))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H8d. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H8e. % 217.93/218.16 cut (((j (e24)) = (j (e24)))); [idtac | apply NNPP; zenon_intro zenon_H8f]. % 217.93/218.16 cut (((j (e24)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H90]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) = ((j (e24)) = (op1 (e14) (e14)))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H90. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H8c. % 217.93/218.16 cut (((op1 (j (e23)) (j (e23))) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H88]. % 217.93/218.16 cut (((j (op2 (e23) (e23))) = (j (e24)))); [idtac | apply NNPP; zenon_intro zenon_H91]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((j (e24)) = (j (e24)))); [ zenon_intro zenon_H8e | zenon_intro zenon_H8f ]. % 217.93/218.16 cut (((j (e24)) = (j (e24))) = ((j (op2 (e23) (e23))) = (j (e24)))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H91. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H8e. % 217.93/218.16 cut (((j (e24)) = (j (e24)))); [idtac | apply NNPP; zenon_intro zenon_H8f]. % 217.93/218.16 cut (((j (e24)) = (j (op2 (e23) (e23))))); [idtac | apply NNPP; zenon_intro zenon_H82]. % 217.93/218.16 congruence. % 217.93/218.16 apply (zenon_L35_); trivial. % 217.93/218.16 apply zenon_H8f. apply refl_equal. % 217.93/218.16 apply zenon_H8f. apply refl_equal. % 217.93/218.16 apply (zenon_L109_); trivial. % 217.93/218.16 apply zenon_H8f. apply refl_equal. % 217.93/218.16 apply zenon_H8f. apply refl_equal. % 217.93/218.16 (* end of lemma zenon_L110_ *) % 217.93/218.16 assert (zenon_L111_ : ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((j (e23)) = (e13)) -> ((op1 (e14) (e14)) = (e10)) -> ((op1 (e13) (e13)) = (e10)) -> ((op2 (e23) (e23)) = (e24)) -> ((j (e24)) = (e11)) -> (~((e10) = (e11))) -> False). % 217.93/218.16 do 0 intro. intros zenon_H8c zenon_Hb4 zenon_H6f zenon_Ha8 zenon_H83 zenon_H92 zenon_H93. % 217.93/218.16 elim (classic ((e11) = (e11))); [ zenon_intro zenon_H18 | zenon_intro zenon_H14 ]. % 217.93/218.16 cut (((e11) = (e11)) = ((e10) = (e11))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H93. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H18. % 217.93/218.16 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.16 cut (((e11) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H94]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((op1 (e14) (e14)) = (e10)) = ((e11) = (e10))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H94. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H6f. % 217.93/218.16 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H95]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((e11) = (e11))); [ zenon_intro zenon_H18 | zenon_intro zenon_H14 ]. % 217.93/218.16 cut (((e11) = (e11)) = ((op1 (e14) (e14)) = (e11))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H95. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H18. % 217.93/218.16 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.16 cut (((e11) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H96]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((op1 (e14) (e14)) = (op1 (e14) (e14)))); [ zenon_intro zenon_H80 | zenon_intro zenon_H81 ]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14))) = ((e11) = (op1 (e14) (e14)))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H96. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H80. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H81]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H95]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((j (e24)) = (e11)) = ((op1 (e14) (e14)) = (e11))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H95. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H92. % 217.93/218.16 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.16 cut (((j (e24)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H90]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((op1 (e14) (e14)) = (op1 (e14) (e14)))); [ zenon_intro zenon_H80 | zenon_intro zenon_H81 ]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14))) = ((j (e24)) = (op1 (e14) (e14)))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H90. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H80. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H81]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (j (e24)))); [idtac | apply NNPP; zenon_intro zenon_H8d]. % 217.93/218.16 congruence. % 217.93/218.16 apply (zenon_L110_); trivial. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H14. apply refl_equal. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H14. apply refl_equal. % 217.93/218.16 apply zenon_H14. apply refl_equal. % 217.93/218.16 apply zenon_H9. apply refl_equal. % 217.93/218.16 apply zenon_H14. apply refl_equal. % 217.93/218.16 apply zenon_H14. apply refl_equal. % 217.93/218.16 (* end of lemma zenon_L111_ *) % 217.93/218.16 assert (zenon_L112_ : ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((j (e23)) = (e13)) -> ((op1 (e14) (e14)) = (e10)) -> ((op1 (e13) (e13)) = (e10)) -> ((op2 (e23) (e23)) = (e24)) -> ((j (e24)) = (e12)) -> (~((e10) = (e12))) -> False). % 217.93/218.16 do 0 intro. intros zenon_H8c zenon_Hb4 zenon_H6f zenon_Ha8 zenon_H83 zenon_H97 zenon_Hb. % 217.93/218.16 elim (classic ((e12) = (e12))); [ zenon_intro zenon_H31 | zenon_intro zenon_Ha ]. % 217.93/218.16 cut (((e12) = (e12)) = ((e10) = (e12))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hb. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H31. % 217.93/218.16 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.16 cut (((e12) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H32]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((op1 (e14) (e14)) = (e10)) = ((e12) = (e10))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H32. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H6f. % 217.93/218.16 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (e12))); [idtac | apply NNPP; zenon_intro zenon_H98]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((e12) = (e12))); [ zenon_intro zenon_H31 | zenon_intro zenon_Ha ]. % 217.93/218.16 cut (((e12) = (e12)) = ((op1 (e14) (e14)) = (e12))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H98. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H31. % 217.93/218.16 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.16 cut (((e12) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H99]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((op1 (e14) (e14)) = (op1 (e14) (e14)))); [ zenon_intro zenon_H80 | zenon_intro zenon_H81 ]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14))) = ((e12) = (op1 (e14) (e14)))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H99. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H80. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H81]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (e12))); [idtac | apply NNPP; zenon_intro zenon_H98]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((j (e24)) = (e12)) = ((op1 (e14) (e14)) = (e12))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H98. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H97. % 217.93/218.16 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.16 cut (((j (e24)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H90]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((op1 (e14) (e14)) = (op1 (e14) (e14)))); [ zenon_intro zenon_H80 | zenon_intro zenon_H81 ]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14))) = ((j (e24)) = (op1 (e14) (e14)))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H90. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H80. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H81]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (j (e24)))); [idtac | apply NNPP; zenon_intro zenon_H8d]. % 217.93/218.16 congruence. % 217.93/218.16 apply (zenon_L110_); trivial. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_Ha. apply refl_equal. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_Ha. apply refl_equal. % 217.93/218.16 apply zenon_Ha. apply refl_equal. % 217.93/218.16 apply zenon_H9. apply refl_equal. % 217.93/218.16 apply zenon_Ha. apply refl_equal. % 217.93/218.16 apply zenon_Ha. apply refl_equal. % 217.93/218.16 (* end of lemma zenon_L112_ *) % 217.93/218.16 assert (zenon_L113_ : (~((e13) = (e14))) -> ((j (h (e14))) = (e14)) -> ((h (e14)) = (e24)) -> ((j (e24)) = (e13)) -> False). % 217.93/218.16 do 0 intro. intros zenon_H5b zenon_Hc2 zenon_He1 zenon_H9a. % 217.93/218.16 cut (((j (h (e14))) = (e14)) = ((e13) = (e14))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H5b. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hc2. % 217.93/218.16 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.16 cut (((j (h (e14))) = (e13))); [idtac | apply NNPP; zenon_intro zenon_Hcd]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((e13) = (e13))); [ zenon_intro zenon_H20 | zenon_intro zenon_H1d ]. % 217.93/218.16 cut (((e13) = (e13)) = ((j (h (e14))) = (e13))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hcd. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H20. % 217.93/218.16 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.16 cut (((e13) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hce]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((j (h (e14))) = (j (h (e14))))); [ zenon_intro zenon_Hc5 | zenon_intro zenon_Hc6 ]. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14)))) = ((e13) = (j (h (e14))))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hce. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hc5. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hc6]. % 217.93/218.16 cut (((j (h (e14))) = (e13))); [idtac | apply NNPP; zenon_intro zenon_Hcd]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((j (e24)) = (e13)) = ((j (h (e14))) = (e13))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hcd. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H9a. % 217.93/218.16 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.16 cut (((j (e24)) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_He3]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((j (h (e14))) = (j (h (e14))))); [ zenon_intro zenon_Hc5 | zenon_intro zenon_Hc6 ]. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14)))) = ((j (e24)) = (j (h (e14))))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_He3. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hc5. % 217.93/218.16 cut (((j (h (e14))) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hc6]. % 217.93/218.16 cut (((j (h (e14))) = (j (e24)))); [idtac | apply NNPP; zenon_intro zenon_He0]. % 217.93/218.16 congruence. % 217.93/218.16 apply (zenon_L90_); trivial. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_H1d. apply refl_equal. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_Hc6. apply refl_equal. % 217.93/218.16 apply zenon_H1d. apply refl_equal. % 217.93/218.16 apply zenon_H1d. apply refl_equal. % 217.93/218.16 apply zenon_H24. apply refl_equal. % 217.93/218.16 (* end of lemma zenon_L113_ *) % 217.93/218.16 assert (zenon_L114_ : (~((e10) = (e13))) -> ((j (h (e13))) = (e13)) -> ((h (e13)) = (e23)) -> ((j (e23)) = (e10)) -> False). % 217.93/218.16 do 0 intro. intros zenon_H3b zenon_H3c zenon_Hdd zenon_H86. % 217.93/218.16 cut (((j (h (e13))) = (e13)) = ((e10) = (e13))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H3b. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H3c. % 217.93/218.16 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.16 cut (((j (h (e13))) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H3d]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((e10) = (e10))); [ zenon_intro zenon_Hf | zenon_intro zenon_H9 ]. % 217.93/218.16 cut (((e10) = (e10)) = ((j (h (e13))) = (e10))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H3d. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hf. % 217.93/218.16 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.16 cut (((e10) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H3e]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((j (h (e13))) = (j (h (e13))))); [ zenon_intro zenon_H3f | zenon_intro zenon_H40 ]. % 217.93/218.16 cut (((j (h (e13))) = (j (h (e13)))) = ((e10) = (j (h (e13))))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H3e. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H3f. % 217.93/218.16 cut (((j (h (e13))) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H40]. % 217.93/218.16 cut (((j (h (e13))) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H3d]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((j (e23)) = (e10)) = ((j (h (e13))) = (e10))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H3d. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H86. % 217.93/218.16 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.16 cut (((j (e23)) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_Hdf]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((j (h (e13))) = (j (h (e13))))); [ zenon_intro zenon_H3f | zenon_intro zenon_H40 ]. % 217.93/218.16 cut (((j (h (e13))) = (j (h (e13)))) = ((j (e23)) = (j (h (e13))))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hdf. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H3f. % 217.93/218.16 cut (((j (h (e13))) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H40]. % 217.93/218.16 cut (((j (h (e13))) = (j (e23)))); [idtac | apply NNPP; zenon_intro zenon_Hdc]. % 217.93/218.16 congruence. % 217.93/218.16 apply (zenon_L87_); trivial. % 217.93/218.16 apply zenon_H40. apply refl_equal. % 217.93/218.16 apply zenon_H40. apply refl_equal. % 217.93/218.16 apply zenon_H9. apply refl_equal. % 217.93/218.16 apply zenon_H40. apply refl_equal. % 217.93/218.16 apply zenon_H40. apply refl_equal. % 217.93/218.16 apply zenon_H9. apply refl_equal. % 217.93/218.16 apply zenon_H9. apply refl_equal. % 217.93/218.16 apply zenon_H1d. apply refl_equal. % 217.93/218.16 (* end of lemma zenon_L114_ *) % 217.93/218.16 assert (zenon_L115_ : (~((op1 (j (e22)) (j (e22))) = (op1 (e12) (e12)))) -> ((j (e22)) = (e12)) -> False). % 217.93/218.16 do 0 intro. intros zenon_Hee zenon_H69. % 217.93/218.16 cut (((j (e22)) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Hef]. % 217.93/218.16 cut (((j (e22)) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Hef]. % 217.93/218.16 congruence. % 217.93/218.16 exact (zenon_Hef zenon_H69). % 217.93/218.16 exact (zenon_Hef zenon_H69). % 217.93/218.16 (* end of lemma zenon_L115_ *) % 217.93/218.16 assert (zenon_L116_ : (~((op1 (j (e22)) (j (e22))) = (op1 (e14) (e14)))) -> ((op1 (e12) (e12)) = (e10)) -> ((j (e22)) = (e12)) -> ((op1 (e14) (e14)) = (e10)) -> False). % 217.93/218.16 do 0 intro. intros zenon_Ha7 zenon_He9 zenon_H69 zenon_H6f. % 217.93/218.16 cut (((op1 (e12) (e12)) = (e10)) = ((op1 (j (e22)) (j (e22))) = (op1 (e14) (e14)))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Ha7. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_He9. % 217.93/218.16 cut (((e10) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H70]. % 217.93/218.16 cut (((op1 (e12) (e12)) = (op1 (j (e22)) (j (e22))))); [idtac | apply NNPP; zenon_intro zenon_Hf0]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((op1 (j (e22)) (j (e22))) = (op1 (j (e22)) (j (e22))))); [ zenon_intro zenon_Haa | zenon_intro zenon_Hab ]. % 217.93/218.16 cut (((op1 (j (e22)) (j (e22))) = (op1 (j (e22)) (j (e22)))) = ((op1 (e12) (e12)) = (op1 (j (e22)) (j (e22))))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hf0. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Haa. % 217.93/218.16 cut (((op1 (j (e22)) (j (e22))) = (op1 (j (e22)) (j (e22))))); [idtac | apply NNPP; zenon_intro zenon_Hab]. % 217.93/218.16 cut (((op1 (j (e22)) (j (e22))) = (op1 (e12) (e12)))); [idtac | apply NNPP; zenon_intro zenon_Hee]. % 217.93/218.16 congruence. % 217.93/218.16 apply (zenon_L115_); trivial. % 217.93/218.16 apply zenon_Hab. apply refl_equal. % 217.93/218.16 apply zenon_Hab. apply refl_equal. % 217.93/218.16 apply zenon_H70. apply sym_equal. exact zenon_H6f. % 217.93/218.16 (* end of lemma zenon_L116_ *) % 217.93/218.16 assert (zenon_L117_ : ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((op2 (e22) (e22)) = (e23)) -> ((op1 (e12) (e12)) = (e10)) -> ((op1 (e14) (e14)) = (e10)) -> ((j (e22)) = (e12)) -> (~((op1 (e14) (e14)) = (j (e23)))) -> False). % 217.93/218.16 do 0 intro. intros zenon_Hac zenon_Ha3 zenon_He9 zenon_H6f zenon_H69 zenon_Had. % 217.93/218.16 elim (classic ((j (e23)) = (j (e23)))); [ zenon_intro zenon_Hae | zenon_intro zenon_Haf ]. % 217.93/218.16 cut (((j (e23)) = (j (e23))) = ((op1 (e14) (e14)) = (j (e23)))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Had. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hae. % 217.93/218.16 cut (((j (e23)) = (j (e23)))); [idtac | apply NNPP; zenon_intro zenon_Haf]. % 217.93/218.16 cut (((j (e23)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_Hb0]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) = ((j (e23)) = (op1 (e14) (e14)))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hb0. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hac. % 217.93/218.16 cut (((op1 (j (e22)) (j (e22))) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_Ha7]. % 217.93/218.16 cut (((j (op2 (e22) (e22))) = (j (e23)))); [idtac | apply NNPP; zenon_intro zenon_Hb1]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((j (e23)) = (j (e23)))); [ zenon_intro zenon_Hae | zenon_intro zenon_Haf ]. % 217.93/218.16 cut (((j (e23)) = (j (e23))) = ((j (op2 (e22) (e22))) = (j (e23)))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hb1. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hae. % 217.93/218.16 cut (((j (e23)) = (j (e23)))); [idtac | apply NNPP; zenon_intro zenon_Haf]. % 217.93/218.16 cut (((j (e23)) = (j (op2 (e22) (e22))))); [idtac | apply NNPP; zenon_intro zenon_Ha2]. % 217.93/218.16 congruence. % 217.93/218.16 apply (zenon_L44_); trivial. % 217.93/218.16 apply zenon_Haf. apply refl_equal. % 217.93/218.16 apply zenon_Haf. apply refl_equal. % 217.93/218.16 apply (zenon_L116_); trivial. % 217.93/218.16 apply zenon_Haf. apply refl_equal. % 217.93/218.16 apply zenon_Haf. apply refl_equal. % 217.93/218.16 (* end of lemma zenon_L117_ *) % 217.93/218.16 assert (zenon_L118_ : ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((j (e22)) = (e12)) -> ((op1 (e14) (e14)) = (e10)) -> ((op1 (e12) (e12)) = (e10)) -> ((op2 (e22) (e22)) = (e23)) -> ((j (e23)) = (e11)) -> (~((e10) = (e11))) -> False). % 217.93/218.16 do 0 intro. intros zenon_Hac zenon_H69 zenon_H6f zenon_He9 zenon_Ha3 zenon_Hb2 zenon_H93. % 217.93/218.16 elim (classic ((e11) = (e11))); [ zenon_intro zenon_H18 | zenon_intro zenon_H14 ]. % 217.93/218.16 cut (((e11) = (e11)) = ((e10) = (e11))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H93. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H18. % 217.93/218.16 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.16 cut (((e11) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H94]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((op1 (e14) (e14)) = (e10)) = ((e11) = (e10))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H94. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H6f. % 217.93/218.16 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H95]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((e11) = (e11))); [ zenon_intro zenon_H18 | zenon_intro zenon_H14 ]. % 217.93/218.16 cut (((e11) = (e11)) = ((op1 (e14) (e14)) = (e11))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H95. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H18. % 217.93/218.16 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.16 cut (((e11) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H96]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((op1 (e14) (e14)) = (op1 (e14) (e14)))); [ zenon_intro zenon_H80 | zenon_intro zenon_H81 ]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14))) = ((e11) = (op1 (e14) (e14)))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H96. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H80. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H81]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H95]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((j (e23)) = (e11)) = ((op1 (e14) (e14)) = (e11))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H95. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hb2. % 217.93/218.16 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.16 cut (((j (e23)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_Hb0]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((op1 (e14) (e14)) = (op1 (e14) (e14)))); [ zenon_intro zenon_H80 | zenon_intro zenon_H81 ]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14))) = ((j (e23)) = (op1 (e14) (e14)))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hb0. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H80. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H81]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (j (e23)))); [idtac | apply NNPP; zenon_intro zenon_Had]. % 217.93/218.16 congruence. % 217.93/218.16 apply (zenon_L117_); trivial. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H14. apply refl_equal. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H14. apply refl_equal. % 217.93/218.16 apply zenon_H14. apply refl_equal. % 217.93/218.16 apply zenon_H9. apply refl_equal. % 217.93/218.16 apply zenon_H14. apply refl_equal. % 217.93/218.16 apply zenon_H14. apply refl_equal. % 217.93/218.16 (* end of lemma zenon_L118_ *) % 217.93/218.16 assert (zenon_L119_ : ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((j (e22)) = (e12)) -> ((op1 (e14) (e14)) = (e10)) -> ((op1 (e12) (e12)) = (e10)) -> ((op2 (e22) (e22)) = (e23)) -> ((j (e23)) = (e12)) -> (~((e10) = (e12))) -> False). % 217.93/218.16 do 0 intro. intros zenon_Hac zenon_H69 zenon_H6f zenon_He9 zenon_Ha3 zenon_Hb3 zenon_Hb. % 217.93/218.16 elim (classic ((e12) = (e12))); [ zenon_intro zenon_H31 | zenon_intro zenon_Ha ]. % 217.93/218.16 cut (((e12) = (e12)) = ((e10) = (e12))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hb. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H31. % 217.93/218.16 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.16 cut (((e12) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H32]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((op1 (e14) (e14)) = (e10)) = ((e12) = (e10))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H32. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H6f. % 217.93/218.16 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (e12))); [idtac | apply NNPP; zenon_intro zenon_H98]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((e12) = (e12))); [ zenon_intro zenon_H31 | zenon_intro zenon_Ha ]. % 217.93/218.16 cut (((e12) = (e12)) = ((op1 (e14) (e14)) = (e12))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H98. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H31. % 217.93/218.16 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.16 cut (((e12) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H99]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((op1 (e14) (e14)) = (op1 (e14) (e14)))); [ zenon_intro zenon_H80 | zenon_intro zenon_H81 ]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14))) = ((e12) = (op1 (e14) (e14)))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H99. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H80. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H81]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (e12))); [idtac | apply NNPP; zenon_intro zenon_H98]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((j (e23)) = (e12)) = ((op1 (e14) (e14)) = (e12))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H98. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_Hb3. % 217.93/218.16 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.16 cut (((j (e23)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_Hb0]. % 217.93/218.16 congruence. % 217.93/218.16 elim (classic ((op1 (e14) (e14)) = (op1 (e14) (e14)))); [ zenon_intro zenon_H80 | zenon_intro zenon_H81 ]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14))) = ((j (e23)) = (op1 (e14) (e14)))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_Hb0. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H80. % 217.93/218.16 cut (((op1 (e14) (e14)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H81]. % 217.93/218.16 cut (((op1 (e14) (e14)) = (j (e23)))); [idtac | apply NNPP; zenon_intro zenon_Had]. % 217.93/218.16 congruence. % 217.93/218.16 apply (zenon_L117_); trivial. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_Ha. apply refl_equal. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_H81. apply refl_equal. % 217.93/218.16 apply zenon_Ha. apply refl_equal. % 217.93/218.16 apply zenon_Ha. apply refl_equal. % 217.93/218.16 apply zenon_H9. apply refl_equal. % 217.93/218.16 apply zenon_Ha. apply refl_equal. % 217.93/218.16 apply zenon_Ha. apply refl_equal. % 217.93/218.16 (* end of lemma zenon_L119_ *) % 217.93/218.16 assert (zenon_L120_ : ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((j (e22)) = (e12)) -> ((op1 (e14) (e14)) = (e10)) -> ((op1 (e12) (e12)) = (e10)) -> ((op2 (e22) (e22)) = (e23)) -> ((j (e23)) = (e13)) -> (~((e10) = (e13))) -> False). % 217.93/218.16 do 0 intro. intros zenon_Hac zenon_H69 zenon_H6f zenon_He9 zenon_Ha3 zenon_Hb4 zenon_H3b. % 217.93/218.16 elim (classic ((e13) = (e13))); [ zenon_intro zenon_H20 | zenon_intro zenon_H1d ]. % 217.93/218.16 cut (((e13) = (e13)) = ((e10) = (e13))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H3b. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H20. % 217.93/218.16 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.16 cut (((e13) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H4b]. % 217.93/218.16 congruence. % 217.93/218.16 cut (((op1 (e14) (e14)) = (e10)) = ((e13) = (e10))). % 217.93/218.16 intro zenon_D_pnotp. % 217.93/218.16 apply zenon_H4b. % 217.93/218.16 rewrite <- zenon_D_pnotp. % 217.93/218.16 exact zenon_H6f. % 217.93/218.16 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.17 cut (((op1 (e14) (e14)) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H7e]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((e13) = (e13))); [ zenon_intro zenon_H20 | zenon_intro zenon_H1d ]. % 217.93/218.17 cut (((e13) = (e13)) = ((op1 (e14) (e14)) = (e13))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H7e. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H20. % 217.93/218.17 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.17 cut (((e13) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H7f]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((op1 (e14) (e14)) = (op1 (e14) (e14)))); [ zenon_intro zenon_H80 | zenon_intro zenon_H81 ]. % 217.93/218.17 cut (((op1 (e14) (e14)) = (op1 (e14) (e14))) = ((e13) = (op1 (e14) (e14)))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H7f. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H80. % 217.93/218.17 cut (((op1 (e14) (e14)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H81]. % 217.93/218.17 cut (((op1 (e14) (e14)) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H7e]. % 217.93/218.17 congruence. % 217.93/218.17 cut (((j (e23)) = (e13)) = ((op1 (e14) (e14)) = (e13))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H7e. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_Hb4. % 217.93/218.17 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.17 cut (((j (e23)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_Hb0]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((op1 (e14) (e14)) = (op1 (e14) (e14)))); [ zenon_intro zenon_H80 | zenon_intro zenon_H81 ]. % 217.93/218.17 cut (((op1 (e14) (e14)) = (op1 (e14) (e14))) = ((j (e23)) = (op1 (e14) (e14)))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_Hb0. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H80. % 217.93/218.17 cut (((op1 (e14) (e14)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H81]. % 217.93/218.17 cut (((op1 (e14) (e14)) = (j (e23)))); [idtac | apply NNPP; zenon_intro zenon_Had]. % 217.93/218.17 congruence. % 217.93/218.17 apply (zenon_L117_); trivial. % 217.93/218.17 apply zenon_H81. apply refl_equal. % 217.93/218.17 apply zenon_H81. apply refl_equal. % 217.93/218.17 apply zenon_H1d. apply refl_equal. % 217.93/218.17 apply zenon_H81. apply refl_equal. % 217.93/218.17 apply zenon_H81. apply refl_equal. % 217.93/218.17 apply zenon_H1d. apply refl_equal. % 217.93/218.17 apply zenon_H1d. apply refl_equal. % 217.93/218.17 apply zenon_H9. apply refl_equal. % 217.93/218.17 apply zenon_H1d. apply refl_equal. % 217.93/218.17 apply zenon_H1d. apply refl_equal. % 217.93/218.17 (* end of lemma zenon_L120_ *) % 217.93/218.17 assert (zenon_L121_ : (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> (~((e10) = (e11))) -> (~((e10) = (e12))) -> (~((e10) = (e13))) -> ((op2 (e22) (e22)) = (e23)) -> ((op1 (e12) (e12)) = (e10)) -> ((op1 (e14) (e14)) = (e10)) -> ((j (e22)) = (e12)) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((j (h (e13))) = (e13)) -> ((h (e13)) = (e23)) -> (~((e13) = (e14))) -> False). % 217.93/218.17 do 0 intro. intros zenon_Hb6 zenon_H93 zenon_Hb zenon_H3b zenon_Ha3 zenon_He9 zenon_H6f zenon_H69 zenon_Hac zenon_H3c zenon_Hdd zenon_H5b. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb6); [ zenon_intro zenon_H86 | zenon_intro zenon_Hb7 ]. % 217.93/218.17 apply (zenon_L114_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb7); [ zenon_intro zenon_Hb2 | zenon_intro zenon_Hb8 ]. % 217.93/218.17 apply (zenon_L118_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb8); [ zenon_intro zenon_Hb3 | zenon_intro zenon_Hb9 ]. % 217.93/218.17 apply (zenon_L119_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb9); [ zenon_intro zenon_Hb4 | zenon_intro zenon_Hb5 ]. % 217.93/218.17 apply (zenon_L120_); trivial. % 217.93/218.17 apply (zenon_L88_); trivial. % 217.93/218.17 (* end of lemma zenon_L121_ *) % 217.93/218.17 assert (zenon_L122_ : (~((e11) = (e14))) -> ((j (h (e14))) = (e14)) -> ((h (e14)) = (e24)) -> ((j (e24)) = (e11)) -> False). % 217.93/218.17 do 0 intro. intros zenon_Hc8 zenon_Hc2 zenon_He1 zenon_H92. % 217.93/218.17 cut (((j (h (e14))) = (e14)) = ((e11) = (e14))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_Hc8. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_Hc2. % 217.93/218.17 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.17 cut (((j (h (e14))) = (e11))); [idtac | apply NNPP; zenon_intro zenon_Hc9]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((e11) = (e11))); [ zenon_intro zenon_H18 | zenon_intro zenon_H14 ]. % 217.93/218.17 cut (((e11) = (e11)) = ((j (h (e14))) = (e11))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_Hc9. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H18. % 217.93/218.17 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.17 cut (((e11) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hca]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((j (h (e14))) = (j (h (e14))))); [ zenon_intro zenon_Hc5 | zenon_intro zenon_Hc6 ]. % 217.93/218.17 cut (((j (h (e14))) = (j (h (e14)))) = ((e11) = (j (h (e14))))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_Hca. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_Hc5. % 217.93/218.17 cut (((j (h (e14))) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hc6]. % 217.93/218.17 cut (((j (h (e14))) = (e11))); [idtac | apply NNPP; zenon_intro zenon_Hc9]. % 217.93/218.17 congruence. % 217.93/218.17 cut (((j (e24)) = (e11)) = ((j (h (e14))) = (e11))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_Hc9. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H92. % 217.93/218.17 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.17 cut (((j (e24)) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_He3]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((j (h (e14))) = (j (h (e14))))); [ zenon_intro zenon_Hc5 | zenon_intro zenon_Hc6 ]. % 217.93/218.17 cut (((j (h (e14))) = (j (h (e14)))) = ((j (e24)) = (j (h (e14))))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_He3. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_Hc5. % 217.93/218.17 cut (((j (h (e14))) = (j (h (e14))))); [idtac | apply NNPP; zenon_intro zenon_Hc6]. % 217.93/218.17 cut (((j (h (e14))) = (j (e24)))); [idtac | apply NNPP; zenon_intro zenon_He0]. % 217.93/218.17 congruence. % 217.93/218.17 apply (zenon_L90_); trivial. % 217.93/218.17 apply zenon_Hc6. apply refl_equal. % 217.93/218.17 apply zenon_Hc6. apply refl_equal. % 217.93/218.17 apply zenon_H14. apply refl_equal. % 217.93/218.17 apply zenon_Hc6. apply refl_equal. % 217.93/218.17 apply zenon_Hc6. apply refl_equal. % 217.93/218.17 apply zenon_H14. apply refl_equal. % 217.93/218.17 apply zenon_H14. apply refl_equal. % 217.93/218.17 apply zenon_H24. apply refl_equal. % 217.93/218.17 (* end of lemma zenon_L122_ *) % 217.93/218.17 assert (zenon_L123_ : (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> ((op2 (e23) (e23)) = (e24)) -> ((op1 (e10) (e10)) = (e10)) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> (~((e13) = (e14))) -> ((j (h (e14))) = (e14)) -> ((h (e14)) = (e24)) -> (~((e12) = (e14))) -> (~((e11) = (e14))) -> ((j (op2 (e24) (e24))) = (op1 (j (e24)) (j (e24)))) -> ((op2 (e24) (e24)) = (e22)) -> (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> (~((e10) = (e11))) -> (~((e10) = (e12))) -> (~((e10) = (e13))) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((j (e22)) = (e13)) -> ((op1 (e14) (e14)) = (e10)) -> ((op1 (e13) (e13)) = (e10)) -> ((op2 (e22) (e22)) = (e23)) -> (~((e10) = (e14))) -> False). % 217.93/218.17 do 0 intro. intros zenon_Hb6 zenon_H83 zenon_H6e zenon_H8c zenon_H5b zenon_Hc2 zenon_He1 zenon_H26 zenon_Hc8 zenon_H74 zenon_H75 zenon_H9e zenon_H93 zenon_Hb zenon_H3b zenon_Hac zenon_H7d zenon_H6f zenon_Ha8 zenon_Ha3 zenon_H47. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb6); [ zenon_intro zenon_H86 | zenon_intro zenon_Hb7 ]. % 217.93/218.17 apply (zenon_or_s _ _ zenon_H9e); [ zenon_intro zenon_H6b | zenon_intro zenon_H9f ]. % 217.93/218.17 apply (zenon_L34_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_H9f); [ zenon_intro zenon_H92 | zenon_intro zenon_Ha0 ]. % 217.93/218.17 apply (zenon_L122_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Ha0); [ zenon_intro zenon_H97 | zenon_intro zenon_Ha1 ]. % 217.93/218.17 apply (zenon_L105_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Ha1); [ zenon_intro zenon_H9a | zenon_intro zenon_H9b ]. % 217.93/218.17 apply (zenon_L113_); trivial. % 217.93/218.17 apply (zenon_L42_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb7); [ zenon_intro zenon_Hb2 | zenon_intro zenon_Hb8 ]. % 217.93/218.17 apply (zenon_L48_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb8); [ zenon_intro zenon_Hb3 | zenon_intro zenon_Hb9 ]. % 217.93/218.17 apply (zenon_L49_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb9); [ zenon_intro zenon_Hb4 | zenon_intro zenon_Hb5 ]. % 217.93/218.17 apply (zenon_L50_); trivial. % 217.93/218.17 apply (zenon_L51_); trivial. % 217.93/218.17 (* end of lemma zenon_L123_ *) % 217.93/218.17 assert (zenon_L124_ : (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> (~((e10) = (e11))) -> (~((e10) = (e12))) -> (~((e10) = (e13))) -> ((op2 (e22) (e22)) = (e23)) -> ((j (e22)) = (e14)) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((op1 (e14) (e14)) = (e10)) -> ((j (h (e13))) = (e13)) -> ((h (e13)) = (e23)) -> (~((e13) = (e14))) -> False). % 217.93/218.17 do 0 intro. intros zenon_Hb6 zenon_H93 zenon_Hb zenon_H3b zenon_Ha3 zenon_Hba zenon_Hac zenon_H6f zenon_H3c zenon_Hdd zenon_H5b. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb6); [ zenon_intro zenon_H86 | zenon_intro zenon_Hb7 ]. % 217.93/218.17 apply (zenon_L114_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb7); [ zenon_intro zenon_Hb2 | zenon_intro zenon_Hb8 ]. % 217.93/218.17 apply (zenon_L76_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb8); [ zenon_intro zenon_Hb3 | zenon_intro zenon_Hb9 ]. % 217.93/218.17 apply (zenon_L77_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb9); [ zenon_intro zenon_Hb4 | zenon_intro zenon_Hb5 ]. % 217.93/218.17 apply (zenon_L78_); trivial. % 217.93/218.17 apply (zenon_L88_); trivial. % 217.93/218.17 (* end of lemma zenon_L124_ *) % 217.93/218.17 assert (zenon_L125_ : (((j (e22)) = (e10))\/(((j (e22)) = (e11))\/(((j (e22)) = (e12))\/(((j (e22)) = (e13))\/((j (e22)) = (e14)))))) -> (~((e11) = (e13))) -> ((op1 (e12) (e12)) = (e10)) -> (~((e10) = (e14))) -> ((op1 (e13) (e13)) = (e10)) -> (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> ((op2 (e24) (e24)) = (e22)) -> ((j (op2 (e24) (e24))) = (op1 (j (e24)) (j (e24)))) -> (~((e11) = (e14))) -> (~((e12) = (e14))) -> ((h (e14)) = (e24)) -> ((j (h (e14))) = (e14)) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((op1 (e10) (e10)) = (e10)) -> ((op2 (e23) (e23)) = (e24)) -> (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> (~((e10) = (e11))) -> (~((e10) = (e12))) -> (~((e10) = (e13))) -> ((op2 (e22) (e22)) = (e23)) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((op1 (e14) (e14)) = (e10)) -> ((j (h (e13))) = (e13)) -> ((h (e13)) = (e23)) -> (~((e13) = (e14))) -> False). % 217.93/218.17 do 0 intro. intros zenon_Hbb zenon_H42 zenon_He9 zenon_H47 zenon_Ha8 zenon_H9e zenon_H75 zenon_H74 zenon_Hc8 zenon_H26 zenon_He1 zenon_Hc2 zenon_H8c zenon_H6e zenon_H83 zenon_Hb6 zenon_H93 zenon_Hb zenon_H3b zenon_Ha3 zenon_Hac zenon_H6f zenon_H3c zenon_Hdd zenon_H5b. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hbb); [ zenon_intro zenon_H66 | zenon_intro zenon_Hbc ]. % 217.93/218.17 apply (zenon_L98_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hbc); [ zenon_intro zenon_H68 | zenon_intro zenon_Hbd ]. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb6); [ zenon_intro zenon_H86 | zenon_intro zenon_Hb7 ]. % 217.93/218.17 apply (zenon_L92_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb7); [ zenon_intro zenon_Hb2 | zenon_intro zenon_Hb8 ]. % 217.93/218.17 apply (zenon_L99_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb8); [ zenon_intro zenon_Hb3 | zenon_intro zenon_Hb9 ]. % 217.93/218.17 apply (zenon_L107_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb9); [ zenon_intro zenon_Hb4 | zenon_intro zenon_Hb5 ]. % 217.93/218.17 apply (zenon_or_s _ _ zenon_H9e); [ zenon_intro zenon_H6b | zenon_intro zenon_H9f ]. % 217.93/218.17 apply (zenon_L100_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_H9f); [ zenon_intro zenon_H92 | zenon_intro zenon_Ha0 ]. % 217.93/218.17 apply (zenon_L111_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Ha0); [ zenon_intro zenon_H97 | zenon_intro zenon_Ha1 ]. % 217.93/218.17 apply (zenon_L112_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Ha1); [ zenon_intro zenon_H9a | zenon_intro zenon_H9b ]. % 217.93/218.17 apply (zenon_L113_); trivial. % 217.93/218.17 elim (classic ((e14) = (e14))); [ zenon_intro zenon_H27 | zenon_intro zenon_H24 ]. % 217.93/218.17 cut (((e14) = (e14)) = ((e10) = (e14))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H47. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H27. % 217.93/218.17 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.17 cut (((e14) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H48]. % 217.93/218.17 congruence. % 217.93/218.17 cut (((op1 (e14) (e14)) = (e10)) = ((e14) = (e10))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H48. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H6f. % 217.93/218.17 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.17 cut (((op1 (e14) (e14)) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H9c]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((e14) = (e14))); [ zenon_intro zenon_H27 | zenon_intro zenon_H24 ]. % 217.93/218.17 cut (((e14) = (e14)) = ((op1 (e14) (e14)) = (e14))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H9c. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H27. % 217.93/218.17 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.17 cut (((e14) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H9d]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((op1 (e14) (e14)) = (op1 (e14) (e14)))); [ zenon_intro zenon_H80 | zenon_intro zenon_H81 ]. % 217.93/218.17 cut (((op1 (e14) (e14)) = (op1 (e14) (e14))) = ((e14) = (op1 (e14) (e14)))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H9d. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H80. % 217.93/218.17 cut (((op1 (e14) (e14)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H81]. % 217.93/218.17 cut (((op1 (e14) (e14)) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H9c]. % 217.93/218.17 congruence. % 217.93/218.17 cut (((j (e24)) = (e14)) = ((op1 (e14) (e14)) = (e14))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H9c. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H9b. % 217.93/218.17 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.17 cut (((j (e24)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H90]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((op1 (e14) (e14)) = (op1 (e14) (e14)))); [ zenon_intro zenon_H80 | zenon_intro zenon_H81 ]. % 217.93/218.17 cut (((op1 (e14) (e14)) = (op1 (e14) (e14))) = ((j (e24)) = (op1 (e14) (e14)))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H90. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H80. % 217.93/218.17 cut (((op1 (e14) (e14)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H81]. % 217.93/218.17 cut (((op1 (e14) (e14)) = (j (e24)))); [idtac | apply NNPP; zenon_intro zenon_H8d]. % 217.93/218.17 congruence. % 217.93/218.17 apply (zenon_L110_); trivial. % 217.93/218.17 apply zenon_H81. apply refl_equal. % 217.93/218.17 apply zenon_H81. apply refl_equal. % 217.93/218.17 apply zenon_H24. apply refl_equal. % 217.93/218.17 apply zenon_H81. apply refl_equal. % 217.93/218.17 apply zenon_H81. apply refl_equal. % 217.93/218.17 apply zenon_H24. apply refl_equal. % 217.93/218.17 apply zenon_H24. apply refl_equal. % 217.93/218.17 apply zenon_H9. apply refl_equal. % 217.93/218.17 apply zenon_H24. apply refl_equal. % 217.93/218.17 apply zenon_H24. apply refl_equal. % 217.93/218.17 apply (zenon_L88_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hbd); [ zenon_intro zenon_H69 | zenon_intro zenon_Hbe ]. % 217.93/218.17 apply (zenon_L121_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hbe); [ zenon_intro zenon_H7d | zenon_intro zenon_Hba ]. % 217.93/218.17 apply (zenon_L123_); trivial. % 217.93/218.17 apply (zenon_L124_); trivial. % 217.93/218.17 (* end of lemma zenon_L125_ *) % 217.93/218.17 assert (zenon_L126_ : (~((j (h (e13))) = (j (e24)))) -> ((h (e13)) = (e24)) -> False). % 217.93/218.17 do 0 intro. intros zenon_Hf1 zenon_Hf2. % 217.93/218.17 cut (((h (e13)) = (e24))); [idtac | apply NNPP; zenon_intro zenon_Hf3]. % 217.93/218.17 congruence. % 217.93/218.17 exact (zenon_Hf3 zenon_Hf2). % 217.93/218.17 (* end of lemma zenon_L126_ *) % 217.93/218.17 assert (zenon_L127_ : (~((e10) = (e13))) -> ((j (h (e13))) = (e13)) -> ((h (e13)) = (e24)) -> ((j (e24)) = (e10)) -> False). % 217.93/218.17 do 0 intro. intros zenon_H3b zenon_H3c zenon_Hf2 zenon_H6b. % 217.93/218.17 cut (((j (h (e13))) = (e13)) = ((e10) = (e13))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H3b. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H3c. % 217.93/218.17 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.17 cut (((j (h (e13))) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H3d]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((e10) = (e10))); [ zenon_intro zenon_Hf | zenon_intro zenon_H9 ]. % 217.93/218.17 cut (((e10) = (e10)) = ((j (h (e13))) = (e10))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H3d. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_Hf. % 217.93/218.17 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.17 cut (((e10) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H3e]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((j (h (e13))) = (j (h (e13))))); [ zenon_intro zenon_H3f | zenon_intro zenon_H40 ]. % 217.93/218.17 cut (((j (h (e13))) = (j (h (e13)))) = ((e10) = (j (h (e13))))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H3e. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H3f. % 217.93/218.17 cut (((j (h (e13))) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H40]. % 217.93/218.17 cut (((j (h (e13))) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H3d]. % 217.93/218.17 congruence. % 217.93/218.17 cut (((j (e24)) = (e10)) = ((j (h (e13))) = (e10))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H3d. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H6b. % 217.93/218.17 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.17 cut (((j (e24)) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_Hf4]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((j (h (e13))) = (j (h (e13))))); [ zenon_intro zenon_H3f | zenon_intro zenon_H40 ]. % 217.93/218.17 cut (((j (h (e13))) = (j (h (e13)))) = ((j (e24)) = (j (h (e13))))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_Hf4. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H3f. % 217.93/218.17 cut (((j (h (e13))) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H40]. % 217.93/218.17 cut (((j (h (e13))) = (j (e24)))); [idtac | apply NNPP; zenon_intro zenon_Hf1]. % 217.93/218.17 congruence. % 217.93/218.17 apply (zenon_L126_); trivial. % 217.93/218.17 apply zenon_H40. apply refl_equal. % 217.93/218.17 apply zenon_H40. apply refl_equal. % 217.93/218.17 apply zenon_H9. apply refl_equal. % 217.93/218.17 apply zenon_H40. apply refl_equal. % 217.93/218.17 apply zenon_H40. apply refl_equal. % 217.93/218.17 apply zenon_H9. apply refl_equal. % 217.93/218.17 apply zenon_H9. apply refl_equal. % 217.93/218.17 apply zenon_H1d. apply refl_equal. % 217.93/218.17 (* end of lemma zenon_L127_ *) % 217.93/218.17 assert (zenon_L128_ : (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> ((h (e13)) = (e24)) -> ((j (h (e13))) = (e13)) -> (~((e10) = (e11))) -> (~((e10) = (e12))) -> (~((e10) = (e13))) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((j (e23)) = (e10)) -> ((op1 (e14) (e14)) = (e10)) -> ((op1 (e10) (e10)) = (e10)) -> ((op2 (e23) (e23)) = (e24)) -> (~((e10) = (e14))) -> False). % 217.93/218.17 do 0 intro. intros zenon_H9e zenon_Hf2 zenon_H3c zenon_H93 zenon_Hb zenon_H3b zenon_H8c zenon_H86 zenon_H6f zenon_H6e zenon_H83 zenon_H47. % 217.93/218.17 apply (zenon_or_s _ _ zenon_H9e); [ zenon_intro zenon_H6b | zenon_intro zenon_H9f ]. % 217.93/218.17 apply (zenon_L127_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_H9f); [ zenon_intro zenon_H92 | zenon_intro zenon_Ha0 ]. % 217.93/218.17 apply (zenon_L39_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Ha0); [ zenon_intro zenon_H97 | zenon_intro zenon_Ha1 ]. % 217.93/218.17 apply (zenon_L40_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Ha1); [ zenon_intro zenon_H9a | zenon_intro zenon_H9b ]. % 217.93/218.17 apply (zenon_L41_); trivial. % 217.93/218.17 apply (zenon_L42_); trivial. % 217.93/218.17 (* end of lemma zenon_L128_ *) % 217.93/218.17 assert (zenon_L129_ : (~((e11) = (e13))) -> ((j (h (e13))) = (e13)) -> ((h (e13)) = (e24)) -> ((j (e24)) = (e11)) -> False). % 217.93/218.17 do 0 intro. intros zenon_H42 zenon_H3c zenon_Hf2 zenon_H92. % 217.93/218.17 cut (((j (h (e13))) = (e13)) = ((e11) = (e13))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H42. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H3c. % 217.93/218.17 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.17 cut (((j (h (e13))) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H43]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((e11) = (e11))); [ zenon_intro zenon_H18 | zenon_intro zenon_H14 ]. % 217.93/218.17 cut (((e11) = (e11)) = ((j (h (e13))) = (e11))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H43. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H18. % 217.93/218.17 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.17 cut (((e11) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H44]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((j (h (e13))) = (j (h (e13))))); [ zenon_intro zenon_H3f | zenon_intro zenon_H40 ]. % 217.93/218.17 cut (((j (h (e13))) = (j (h (e13)))) = ((e11) = (j (h (e13))))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H44. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H3f. % 217.93/218.17 cut (((j (h (e13))) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H40]. % 217.93/218.17 cut (((j (h (e13))) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H43]. % 217.93/218.17 congruence. % 217.93/218.17 cut (((j (e24)) = (e11)) = ((j (h (e13))) = (e11))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H43. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H92. % 217.93/218.17 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.17 cut (((j (e24)) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_Hf4]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((j (h (e13))) = (j (h (e13))))); [ zenon_intro zenon_H3f | zenon_intro zenon_H40 ]. % 217.93/218.17 cut (((j (h (e13))) = (j (h (e13)))) = ((j (e24)) = (j (h (e13))))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_Hf4. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H3f. % 217.93/218.17 cut (((j (h (e13))) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H40]. % 217.93/218.17 cut (((j (h (e13))) = (j (e24)))); [idtac | apply NNPP; zenon_intro zenon_Hf1]. % 217.93/218.17 congruence. % 217.93/218.17 apply (zenon_L126_); trivial. % 217.93/218.17 apply zenon_H40. apply refl_equal. % 217.93/218.17 apply zenon_H40. apply refl_equal. % 217.93/218.17 apply zenon_H14. apply refl_equal. % 217.93/218.17 apply zenon_H40. apply refl_equal. % 217.93/218.17 apply zenon_H40. apply refl_equal. % 217.93/218.17 apply zenon_H14. apply refl_equal. % 217.93/218.17 apply zenon_H14. apply refl_equal. % 217.93/218.17 apply zenon_H1d. apply refl_equal. % 217.93/218.17 (* end of lemma zenon_L129_ *) % 217.93/218.17 assert (zenon_L130_ : (~((e12) = (e13))) -> ((j (h (e13))) = (e13)) -> ((h (e13)) = (e24)) -> ((j (e24)) = (e12)) -> False). % 217.93/218.17 do 0 intro. intros zenon_H1f zenon_H3c zenon_Hf2 zenon_H97. % 217.93/218.17 cut (((j (h (e13))) = (e13)) = ((e12) = (e13))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H1f. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H3c. % 217.93/218.17 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.17 cut (((j (h (e13))) = (e12))); [idtac | apply NNPP; zenon_intro zenon_H45]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((e12) = (e12))); [ zenon_intro zenon_H31 | zenon_intro zenon_Ha ]. % 217.93/218.17 cut (((e12) = (e12)) = ((j (h (e13))) = (e12))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H45. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H31. % 217.93/218.17 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.17 cut (((e12) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H46]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((j (h (e13))) = (j (h (e13))))); [ zenon_intro zenon_H3f | zenon_intro zenon_H40 ]. % 217.93/218.17 cut (((j (h (e13))) = (j (h (e13)))) = ((e12) = (j (h (e13))))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H46. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H3f. % 217.93/218.17 cut (((j (h (e13))) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H40]. % 217.93/218.17 cut (((j (h (e13))) = (e12))); [idtac | apply NNPP; zenon_intro zenon_H45]. % 217.93/218.17 congruence. % 217.93/218.17 cut (((j (e24)) = (e12)) = ((j (h (e13))) = (e12))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H45. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H97. % 217.93/218.17 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.17 cut (((j (e24)) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_Hf4]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((j (h (e13))) = (j (h (e13))))); [ zenon_intro zenon_H3f | zenon_intro zenon_H40 ]. % 217.93/218.17 cut (((j (h (e13))) = (j (h (e13)))) = ((j (e24)) = (j (h (e13))))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_Hf4. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H3f. % 217.93/218.17 cut (((j (h (e13))) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H40]. % 217.93/218.17 cut (((j (h (e13))) = (j (e24)))); [idtac | apply NNPP; zenon_intro zenon_Hf1]. % 217.93/218.17 congruence. % 217.93/218.17 apply (zenon_L126_); trivial. % 217.93/218.17 apply zenon_H40. apply refl_equal. % 217.93/218.17 apply zenon_H40. apply refl_equal. % 217.93/218.17 apply zenon_Ha. apply refl_equal. % 217.93/218.17 apply zenon_H40. apply refl_equal. % 217.93/218.17 apply zenon_H40. apply refl_equal. % 217.93/218.17 apply zenon_Ha. apply refl_equal. % 217.93/218.17 apply zenon_Ha. apply refl_equal. % 217.93/218.17 apply zenon_H1d. apply refl_equal. % 217.93/218.17 (* end of lemma zenon_L130_ *) % 217.93/218.17 assert (zenon_L131_ : ((j (h (e13))) = (e13)) -> ((h (e13)) = (e24)) -> ((j (e24)) = (e14)) -> (~((e13) = (e14))) -> False). % 217.93/218.17 do 0 intro. intros zenon_H3c zenon_Hf2 zenon_H9b zenon_H5b. % 217.93/218.17 elim (classic ((e14) = (e14))); [ zenon_intro zenon_H27 | zenon_intro zenon_H24 ]. % 217.93/218.17 cut (((e14) = (e14)) = ((e13) = (e14))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H5b. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H27. % 217.93/218.17 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.17 cut (((e14) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H5c]. % 217.93/218.17 congruence. % 217.93/218.17 cut (((j (h (e13))) = (e13)) = ((e14) = (e13))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H5c. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H3c. % 217.93/218.17 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.17 cut (((j (h (e13))) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H5d]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((e14) = (e14))); [ zenon_intro zenon_H27 | zenon_intro zenon_H24 ]. % 217.93/218.17 cut (((e14) = (e14)) = ((j (h (e13))) = (e14))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H5d. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H27. % 217.93/218.17 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.17 cut (((e14) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H5e]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((j (h (e13))) = (j (h (e13))))); [ zenon_intro zenon_H3f | zenon_intro zenon_H40 ]. % 217.93/218.17 cut (((j (h (e13))) = (j (h (e13)))) = ((e14) = (j (h (e13))))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H5e. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H3f. % 217.93/218.17 cut (((j (h (e13))) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H40]. % 217.93/218.17 cut (((j (h (e13))) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H5d]. % 217.93/218.17 congruence. % 217.93/218.17 cut (((j (e24)) = (e14)) = ((j (h (e13))) = (e14))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H5d. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H9b. % 217.93/218.17 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.17 cut (((j (e24)) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_Hf4]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((j (h (e13))) = (j (h (e13))))); [ zenon_intro zenon_H3f | zenon_intro zenon_H40 ]. % 217.93/218.17 cut (((j (h (e13))) = (j (h (e13)))) = ((j (e24)) = (j (h (e13))))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_Hf4. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H3f. % 217.93/218.17 cut (((j (h (e13))) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H40]. % 217.93/218.17 cut (((j (h (e13))) = (j (e24)))); [idtac | apply NNPP; zenon_intro zenon_Hf1]. % 217.93/218.17 congruence. % 217.93/218.17 apply (zenon_L126_); trivial. % 217.93/218.17 apply zenon_H40. apply refl_equal. % 217.93/218.17 apply zenon_H40. apply refl_equal. % 217.93/218.17 apply zenon_H24. apply refl_equal. % 217.93/218.17 apply zenon_H40. apply refl_equal. % 217.93/218.17 apply zenon_H40. apply refl_equal. % 217.93/218.17 apply zenon_H24. apply refl_equal. % 217.93/218.17 apply zenon_H24. apply refl_equal. % 217.93/218.17 apply zenon_H1d. apply refl_equal. % 217.93/218.17 apply zenon_H24. apply refl_equal. % 217.93/218.17 apply zenon_H24. apply refl_equal. % 217.93/218.17 (* end of lemma zenon_L131_ *) % 217.93/218.17 assert (zenon_L132_ : (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> (~((e11) = (e13))) -> (~((e12) = (e13))) -> (~((e10) = (e13))) -> ((op2 (e23) (e23)) = (e24)) -> ((op1 (e12) (e12)) = (e10)) -> ((op1 (e14) (e14)) = (e10)) -> ((j (e23)) = (e12)) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((j (h (e13))) = (e13)) -> ((h (e13)) = (e24)) -> (~((e13) = (e14))) -> False). % 217.93/218.17 do 0 intro. intros zenon_H9e zenon_H42 zenon_H1f zenon_H3b zenon_H83 zenon_He9 zenon_H6f zenon_Hb3 zenon_H8c zenon_H3c zenon_Hf2 zenon_H5b. % 217.93/218.17 apply (zenon_or_s _ _ zenon_H9e); [ zenon_intro zenon_H6b | zenon_intro zenon_H9f ]. % 217.93/218.17 apply (zenon_L127_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_H9f); [ zenon_intro zenon_H92 | zenon_intro zenon_Ha0 ]. % 217.93/218.17 apply (zenon_L129_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Ha0); [ zenon_intro zenon_H97 | zenon_intro zenon_Ha1 ]. % 217.93/218.17 apply (zenon_L130_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Ha1); [ zenon_intro zenon_H9a | zenon_intro zenon_H9b ]. % 217.93/218.17 apply (zenon_L106_); trivial. % 217.93/218.17 apply (zenon_L131_); trivial. % 217.93/218.17 (* end of lemma zenon_L132_ *) % 217.93/218.17 assert (zenon_L133_ : (~((op1 (j (e23)) (j (e23))) = (op1 (e14) (e14)))) -> ((j (e23)) = (e14)) -> False). % 217.93/218.17 do 0 intro. intros zenon_H88 zenon_Hb5. % 217.93/218.17 cut (((j (e23)) = (e14))); [idtac | apply NNPP; zenon_intro zenon_Hf5]. % 217.93/218.17 cut (((j (e23)) = (e14))); [idtac | apply NNPP; zenon_intro zenon_Hf5]. % 217.93/218.17 congruence. % 217.93/218.17 exact (zenon_Hf5 zenon_Hb5). % 217.93/218.17 exact (zenon_Hf5 zenon_Hb5). % 217.93/218.17 (* end of lemma zenon_L133_ *) % 217.93/218.17 assert (zenon_L134_ : ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((op2 (e23) (e23)) = (e24)) -> ((j (e23)) = (e14)) -> (~((op1 (e14) (e14)) = (j (e24)))) -> False). % 217.93/218.17 do 0 intro. intros zenon_H8c zenon_H83 zenon_Hb5 zenon_H8d. % 217.93/218.17 elim (classic ((j (e24)) = (j (e24)))); [ zenon_intro zenon_H8e | zenon_intro zenon_H8f ]. % 217.93/218.17 cut (((j (e24)) = (j (e24))) = ((op1 (e14) (e14)) = (j (e24)))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H8d. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H8e. % 217.93/218.17 cut (((j (e24)) = (j (e24)))); [idtac | apply NNPP; zenon_intro zenon_H8f]. % 217.93/218.17 cut (((j (e24)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H90]. % 217.93/218.17 congruence. % 217.93/218.17 cut (((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) = ((j (e24)) = (op1 (e14) (e14)))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H90. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H8c. % 217.93/218.17 cut (((op1 (j (e23)) (j (e23))) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H88]. % 217.93/218.17 cut (((j (op2 (e23) (e23))) = (j (e24)))); [idtac | apply NNPP; zenon_intro zenon_H91]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((j (e24)) = (j (e24)))); [ zenon_intro zenon_H8e | zenon_intro zenon_H8f ]. % 217.93/218.17 cut (((j (e24)) = (j (e24))) = ((j (op2 (e23) (e23))) = (j (e24)))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H91. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H8e. % 217.93/218.17 cut (((j (e24)) = (j (e24)))); [idtac | apply NNPP; zenon_intro zenon_H8f]. % 217.93/218.17 cut (((j (e24)) = (j (op2 (e23) (e23))))); [idtac | apply NNPP; zenon_intro zenon_H82]. % 217.93/218.17 congruence. % 217.93/218.17 apply (zenon_L35_); trivial. % 217.93/218.17 apply zenon_H8f. apply refl_equal. % 217.93/218.17 apply zenon_H8f. apply refl_equal. % 217.93/218.17 apply (zenon_L133_); trivial. % 217.93/218.17 apply zenon_H8f. apply refl_equal. % 217.93/218.17 apply zenon_H8f. apply refl_equal. % 217.93/218.17 (* end of lemma zenon_L134_ *) % 217.93/218.17 assert (zenon_L135_ : ((op1 (e14) (e14)) = (e10)) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((j (e23)) = (e14)) -> ((op2 (e23) (e23)) = (e24)) -> ((j (e24)) = (e11)) -> (~((e10) = (e11))) -> False). % 217.93/218.17 do 0 intro. intros zenon_H6f zenon_H8c zenon_Hb5 zenon_H83 zenon_H92 zenon_H93. % 217.93/218.17 elim (classic ((e11) = (e11))); [ zenon_intro zenon_H18 | zenon_intro zenon_H14 ]. % 217.93/218.17 cut (((e11) = (e11)) = ((e10) = (e11))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H93. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H18. % 217.93/218.17 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.17 cut (((e11) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H94]. % 217.93/218.17 congruence. % 217.93/218.17 cut (((op1 (e14) (e14)) = (e10)) = ((e11) = (e10))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H94. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H6f. % 217.93/218.17 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.17 cut (((op1 (e14) (e14)) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H95]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((e11) = (e11))); [ zenon_intro zenon_H18 | zenon_intro zenon_H14 ]. % 217.93/218.17 cut (((e11) = (e11)) = ((op1 (e14) (e14)) = (e11))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H95. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H18. % 217.93/218.17 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.17 cut (((e11) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H96]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((op1 (e14) (e14)) = (op1 (e14) (e14)))); [ zenon_intro zenon_H80 | zenon_intro zenon_H81 ]. % 217.93/218.17 cut (((op1 (e14) (e14)) = (op1 (e14) (e14))) = ((e11) = (op1 (e14) (e14)))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H96. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H80. % 217.93/218.17 cut (((op1 (e14) (e14)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H81]. % 217.93/218.17 cut (((op1 (e14) (e14)) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H95]. % 217.93/218.17 congruence. % 217.93/218.17 cut (((j (e24)) = (e11)) = ((op1 (e14) (e14)) = (e11))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H95. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H92. % 217.93/218.17 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.17 cut (((j (e24)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H90]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((op1 (e14) (e14)) = (op1 (e14) (e14)))); [ zenon_intro zenon_H80 | zenon_intro zenon_H81 ]. % 217.93/218.17 cut (((op1 (e14) (e14)) = (op1 (e14) (e14))) = ((j (e24)) = (op1 (e14) (e14)))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H90. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H80. % 217.93/218.17 cut (((op1 (e14) (e14)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H81]. % 217.93/218.17 cut (((op1 (e14) (e14)) = (j (e24)))); [idtac | apply NNPP; zenon_intro zenon_H8d]. % 217.93/218.17 congruence. % 217.93/218.17 apply (zenon_L134_); trivial. % 217.93/218.17 apply zenon_H81. apply refl_equal. % 217.93/218.17 apply zenon_H81. apply refl_equal. % 217.93/218.17 apply zenon_H14. apply refl_equal. % 217.93/218.17 apply zenon_H81. apply refl_equal. % 217.93/218.17 apply zenon_H81. apply refl_equal. % 217.93/218.17 apply zenon_H14. apply refl_equal. % 217.93/218.17 apply zenon_H14. apply refl_equal. % 217.93/218.17 apply zenon_H9. apply refl_equal. % 217.93/218.17 apply zenon_H14. apply refl_equal. % 217.93/218.17 apply zenon_H14. apply refl_equal. % 217.93/218.17 (* end of lemma zenon_L135_ *) % 217.93/218.17 assert (zenon_L136_ : ((op1 (e14) (e14)) = (e10)) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((j (e23)) = (e14)) -> ((op2 (e23) (e23)) = (e24)) -> ((j (e24)) = (e12)) -> (~((e10) = (e12))) -> False). % 217.93/218.17 do 0 intro. intros zenon_H6f zenon_H8c zenon_Hb5 zenon_H83 zenon_H97 zenon_Hb. % 217.93/218.17 elim (classic ((e12) = (e12))); [ zenon_intro zenon_H31 | zenon_intro zenon_Ha ]. % 217.93/218.17 cut (((e12) = (e12)) = ((e10) = (e12))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_Hb. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H31. % 217.93/218.17 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.17 cut (((e12) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H32]. % 217.93/218.17 congruence. % 217.93/218.17 cut (((op1 (e14) (e14)) = (e10)) = ((e12) = (e10))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H32. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H6f. % 217.93/218.17 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.17 cut (((op1 (e14) (e14)) = (e12))); [idtac | apply NNPP; zenon_intro zenon_H98]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((e12) = (e12))); [ zenon_intro zenon_H31 | zenon_intro zenon_Ha ]. % 217.93/218.17 cut (((e12) = (e12)) = ((op1 (e14) (e14)) = (e12))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H98. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H31. % 217.93/218.17 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.17 cut (((e12) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H99]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((op1 (e14) (e14)) = (op1 (e14) (e14)))); [ zenon_intro zenon_H80 | zenon_intro zenon_H81 ]. % 217.93/218.17 cut (((op1 (e14) (e14)) = (op1 (e14) (e14))) = ((e12) = (op1 (e14) (e14)))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H99. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H80. % 217.93/218.17 cut (((op1 (e14) (e14)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H81]. % 217.93/218.17 cut (((op1 (e14) (e14)) = (e12))); [idtac | apply NNPP; zenon_intro zenon_H98]. % 217.93/218.17 congruence. % 217.93/218.17 cut (((j (e24)) = (e12)) = ((op1 (e14) (e14)) = (e12))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H98. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H97. % 217.93/218.17 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.17 cut (((j (e24)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H90]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((op1 (e14) (e14)) = (op1 (e14) (e14)))); [ zenon_intro zenon_H80 | zenon_intro zenon_H81 ]. % 217.93/218.17 cut (((op1 (e14) (e14)) = (op1 (e14) (e14))) = ((j (e24)) = (op1 (e14) (e14)))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H90. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H80. % 217.93/218.17 cut (((op1 (e14) (e14)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H81]. % 217.93/218.17 cut (((op1 (e14) (e14)) = (j (e24)))); [idtac | apply NNPP; zenon_intro zenon_H8d]. % 217.93/218.17 congruence. % 217.93/218.17 apply (zenon_L134_); trivial. % 217.93/218.17 apply zenon_H81. apply refl_equal. % 217.93/218.17 apply zenon_H81. apply refl_equal. % 217.93/218.17 apply zenon_Ha. apply refl_equal. % 217.93/218.17 apply zenon_H81. apply refl_equal. % 217.93/218.17 apply zenon_H81. apply refl_equal. % 217.93/218.17 apply zenon_Ha. apply refl_equal. % 217.93/218.17 apply zenon_Ha. apply refl_equal. % 217.93/218.17 apply zenon_H9. apply refl_equal. % 217.93/218.17 apply zenon_Ha. apply refl_equal. % 217.93/218.17 apply zenon_Ha. apply refl_equal. % 217.93/218.17 (* end of lemma zenon_L136_ *) % 217.93/218.17 assert (zenon_L137_ : (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> (~((e10) = (e11))) -> (~((e10) = (e12))) -> (~((e10) = (e13))) -> ((op2 (e23) (e23)) = (e24)) -> ((j (e23)) = (e14)) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((op1 (e14) (e14)) = (e10)) -> ((j (h (e13))) = (e13)) -> ((h (e13)) = (e24)) -> (~((e13) = (e14))) -> False). % 217.93/218.17 do 0 intro. intros zenon_H9e zenon_H93 zenon_Hb zenon_H3b zenon_H83 zenon_Hb5 zenon_H8c zenon_H6f zenon_H3c zenon_Hf2 zenon_H5b. % 217.93/218.17 apply (zenon_or_s _ _ zenon_H9e); [ zenon_intro zenon_H6b | zenon_intro zenon_H9f ]. % 217.93/218.17 apply (zenon_L127_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_H9f); [ zenon_intro zenon_H92 | zenon_intro zenon_Ha0 ]. % 217.93/218.17 apply (zenon_L135_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Ha0); [ zenon_intro zenon_H97 | zenon_intro zenon_Ha1 ]. % 217.93/218.17 apply (zenon_L136_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Ha1); [ zenon_intro zenon_H9a | zenon_intro zenon_H9b ]. % 217.93/218.17 elim (classic ((e13) = (e13))); [ zenon_intro zenon_H20 | zenon_intro zenon_H1d ]. % 217.93/218.17 cut (((e13) = (e13)) = ((e10) = (e13))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H3b. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H20. % 217.93/218.17 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.17 cut (((e13) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H4b]. % 217.93/218.17 congruence. % 217.93/218.17 cut (((op1 (e14) (e14)) = (e10)) = ((e13) = (e10))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H4b. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H6f. % 217.93/218.17 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.17 cut (((op1 (e14) (e14)) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H7e]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((e13) = (e13))); [ zenon_intro zenon_H20 | zenon_intro zenon_H1d ]. % 217.93/218.17 cut (((e13) = (e13)) = ((op1 (e14) (e14)) = (e13))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H7e. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H20. % 217.93/218.17 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.17 cut (((e13) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H7f]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((op1 (e14) (e14)) = (op1 (e14) (e14)))); [ zenon_intro zenon_H80 | zenon_intro zenon_H81 ]. % 217.93/218.17 cut (((op1 (e14) (e14)) = (op1 (e14) (e14))) = ((e13) = (op1 (e14) (e14)))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H7f. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H80. % 217.93/218.17 cut (((op1 (e14) (e14)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H81]. % 217.93/218.17 cut (((op1 (e14) (e14)) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H7e]. % 217.93/218.17 congruence. % 217.93/218.17 cut (((j (e24)) = (e13)) = ((op1 (e14) (e14)) = (e13))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H7e. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H9a. % 217.93/218.17 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.17 cut (((j (e24)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H90]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((op1 (e14) (e14)) = (op1 (e14) (e14)))); [ zenon_intro zenon_H80 | zenon_intro zenon_H81 ]. % 217.93/218.17 cut (((op1 (e14) (e14)) = (op1 (e14) (e14))) = ((j (e24)) = (op1 (e14) (e14)))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H90. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H80. % 217.93/218.17 cut (((op1 (e14) (e14)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H81]. % 217.93/218.17 cut (((op1 (e14) (e14)) = (j (e24)))); [idtac | apply NNPP; zenon_intro zenon_H8d]. % 217.93/218.17 congruence. % 217.93/218.17 apply (zenon_L134_); trivial. % 217.93/218.17 apply zenon_H81. apply refl_equal. % 217.93/218.17 apply zenon_H81. apply refl_equal. % 217.93/218.17 apply zenon_H1d. apply refl_equal. % 217.93/218.17 apply zenon_H81. apply refl_equal. % 217.93/218.17 apply zenon_H81. apply refl_equal. % 217.93/218.17 apply zenon_H1d. apply refl_equal. % 217.93/218.17 apply zenon_H1d. apply refl_equal. % 217.93/218.17 apply zenon_H9. apply refl_equal. % 217.93/218.17 apply zenon_H1d. apply refl_equal. % 217.93/218.17 apply zenon_H1d. apply refl_equal. % 217.93/218.17 apply (zenon_L131_); trivial. % 217.93/218.17 (* end of lemma zenon_L137_ *) % 217.93/218.17 assert (zenon_L138_ : (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> (~((e10) = (e14))) -> ((op1 (e10) (e10)) = (e10)) -> (~((e11) = (e14))) -> ((op1 (e12) (e12)) = (e10)) -> (~((e12) = (e13))) -> (~((e11) = (e13))) -> ((h (e14)) = (e23)) -> ((j (h (e14))) = (e14)) -> (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> (~((e10) = (e11))) -> (~((e10) = (e12))) -> (~((e10) = (e13))) -> ((op2 (e23) (e23)) = (e24)) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((op1 (e14) (e14)) = (e10)) -> ((j (h (e13))) = (e13)) -> ((h (e13)) = (e24)) -> (~((e13) = (e14))) -> False). % 217.93/218.17 do 0 intro. intros zenon_Hb6 zenon_H47 zenon_H6e zenon_Hc8 zenon_He9 zenon_H1f zenon_H42 zenon_Hd9 zenon_Hc2 zenon_H9e zenon_H93 zenon_Hb zenon_H3b zenon_H83 zenon_H8c zenon_H6f zenon_H3c zenon_Hf2 zenon_H5b. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb6); [ zenon_intro zenon_H86 | zenon_intro zenon_Hb7 ]. % 217.93/218.17 apply (zenon_L128_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb7); [ zenon_intro zenon_Hb2 | zenon_intro zenon_Hb8 ]. % 217.93/218.17 apply (zenon_L84_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb8); [ zenon_intro zenon_Hb3 | zenon_intro zenon_Hb9 ]. % 217.93/218.17 apply (zenon_L132_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb9); [ zenon_intro zenon_Hb4 | zenon_intro zenon_Hb5 ]. % 217.93/218.17 apply (zenon_L86_); trivial. % 217.93/218.17 apply (zenon_L137_); trivial. % 217.93/218.17 (* end of lemma zenon_L138_ *) % 217.93/218.17 assert (zenon_L139_ : (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> (~((e10) = (e14))) -> (~((e11) = (e14))) -> (~((e12) = (e14))) -> ((h (e14)) = (e24)) -> ((j (h (e14))) = (e14)) -> ((j (h (e13))) = (e13)) -> ((h (e13)) = (e24)) -> (~((e13) = (e14))) -> False). % 217.93/218.17 do 0 intro. intros zenon_H9e zenon_H47 zenon_Hc8 zenon_H26 zenon_He1 zenon_Hc2 zenon_H3c zenon_Hf2 zenon_H5b. % 217.93/218.17 apply (zenon_or_s _ _ zenon_H9e); [ zenon_intro zenon_H6b | zenon_intro zenon_H9f ]. % 217.93/218.17 apply (zenon_L91_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_H9f); [ zenon_intro zenon_H92 | zenon_intro zenon_Ha0 ]. % 217.93/218.17 apply (zenon_L122_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Ha0); [ zenon_intro zenon_H97 | zenon_intro zenon_Ha1 ]. % 217.93/218.17 apply (zenon_L105_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Ha1); [ zenon_intro zenon_H9a | zenon_intro zenon_H9b ]. % 217.93/218.17 apply (zenon_L113_); trivial. % 217.93/218.17 apply (zenon_L131_); trivial. % 217.93/218.17 (* end of lemma zenon_L139_ *) % 217.93/218.17 assert (zenon_L140_ : (((h (e13)) = (e20))\/(((h (e13)) = (e21))\/(((h (e13)) = (e22))\/(((h (e13)) = (e23))\/((h (e13)) = (e24)))))) -> ((op1 (e13) (e13)) = (e10)) -> (((h (e14)) = (e20))\/(((h (e14)) = (e21))\/(((h (e14)) = (e22))\/(((h (e14)) = (e23))\/((h (e14)) = (e24)))))) -> ((h (e10)) = (e20)) -> ((j (h (e10))) = (e10)) -> (((j (e20)) = (e10))\/(((j (e20)) = (e11))\/(((j (e20)) = (e12))\/(((j (e20)) = (e13))\/((j (e20)) = (e14)))))) -> ((h (e12)) = (e21)) -> ((j (h (e12))) = (e12)) -> (((j (e21)) = (e10))\/(((j (e21)) = (e11))\/(((j (e21)) = (e12))\/(((j (e21)) = (e13))\/((j (e21)) = (e14)))))) -> ((op2 (e22) (e22)) = (e23)) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((op2 (e24) (e24)) = (e22)) -> ((j (op2 (e24) (e24))) = (op1 (j (e24)) (j (e24)))) -> (((j (e22)) = (e10))\/(((j (e22)) = (e11))\/(((j (e22)) = (e12))\/(((j (e22)) = (e13))\/((j (e22)) = (e14)))))) -> ((op1 (e14) (e14)) = (e10)) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((op2 (e23) (e23)) = (e24)) -> (~((e10) = (e13))) -> (~((e10) = (e12))) -> (~((e10) = (e11))) -> (~((e11) = (e13))) -> (~((e12) = (e13))) -> ((op1 (e12) (e12)) = (e10)) -> ((op1 (e10) (e10)) = (e10)) -> (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> (~((e10) = (e14))) -> (~((e11) = (e14))) -> (~((e12) = (e14))) -> ((j (h (e14))) = (e14)) -> ((j (h (e13))) = (e13)) -> (~((e13) = (e14))) -> False). % 217.93/218.17 do 0 intro. intros zenon_Hf6 zenon_Ha8 zenon_Hf7 zenon_H1b zenon_H2c zenon_H2b zenon_H56 zenon_Hc zenon_H5f zenon_Ha3 zenon_Hac zenon_H75 zenon_H74 zenon_Hbb zenon_H6f zenon_H8c zenon_H83 zenon_H3b zenon_Hb zenon_H93 zenon_H42 zenon_H1f zenon_He9 zenon_H6e zenon_Hb6 zenon_H9e zenon_H47 zenon_Hc8 zenon_H26 zenon_Hc2 zenon_H3c zenon_H5b. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hf6); [ zenon_intro zenon_H39 | zenon_intro zenon_Hf8 ]. % 217.93/218.17 apply (zenon_L18_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hf8); [ zenon_intro zenon_H4f | zenon_intro zenon_Hf9 ]. % 217.93/218.17 apply (zenon_L26_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hf9); [ zenon_intro zenon_H64 | zenon_intro zenon_Hfa ]. % 217.93/218.17 apply (zenon_L54_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hfa); [ zenon_intro zenon_Hdd | zenon_intro zenon_Hf2 ]. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hf7); [ zenon_intro zenon_Hc0 | zenon_intro zenon_Hfb ]. % 217.93/218.17 apply (zenon_L60_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hfb); [ zenon_intro zenon_Hd0 | zenon_intro zenon_Hfc ]. % 217.93/218.17 apply (zenon_L67_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hfc); [ zenon_intro zenon_Hd4 | zenon_intro zenon_Hfd ]. % 217.93/218.17 apply (zenon_L81_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hfd); [ zenon_intro zenon_Hd9 | zenon_intro zenon_He1 ]. % 217.93/218.17 apply (zenon_L89_); trivial. % 217.93/218.17 apply (zenon_L125_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hf7); [ zenon_intro zenon_Hc0 | zenon_intro zenon_Hfb ]. % 217.93/218.17 apply (zenon_L60_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hfb); [ zenon_intro zenon_Hd0 | zenon_intro zenon_Hfc ]. % 217.93/218.17 apply (zenon_L67_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hfc); [ zenon_intro zenon_Hd4 | zenon_intro zenon_Hfd ]. % 217.93/218.17 apply (zenon_L81_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hfd); [ zenon_intro zenon_Hd9 | zenon_intro zenon_He1 ]. % 217.93/218.17 apply (zenon_L138_); trivial. % 217.93/218.17 apply (zenon_L139_); trivial. % 217.93/218.17 (* end of lemma zenon_L140_ *) % 217.93/218.17 assert (zenon_L141_ : (~((j (h (e12))) = (j (e22)))) -> ((h (e12)) = (e22)) -> False). % 217.93/218.17 do 0 intro. intros zenon_Hfe zenon_Hff. % 217.93/218.17 cut (((h (e12)) = (e22))); [idtac | apply NNPP; zenon_intro zenon_H100]. % 217.93/218.17 congruence. % 217.93/218.17 exact (zenon_H100 zenon_Hff). % 217.93/218.17 (* end of lemma zenon_L141_ *) % 217.93/218.17 assert (zenon_L142_ : (~((e10) = (e12))) -> ((j (h (e12))) = (e12)) -> ((h (e12)) = (e22)) -> ((j (e22)) = (e10)) -> False). % 217.93/218.17 do 0 intro. intros zenon_Hb zenon_Hc zenon_Hff zenon_H66. % 217.93/218.17 cut (((j (h (e12))) = (e12)) = ((e10) = (e12))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_Hb. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_Hc. % 217.93/218.17 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.17 cut (((j (h (e12))) = (e10))); [idtac | apply NNPP; zenon_intro zenon_He]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((e10) = (e10))); [ zenon_intro zenon_Hf | zenon_intro zenon_H9 ]. % 217.93/218.17 cut (((e10) = (e10)) = ((j (h (e12))) = (e10))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_He. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_Hf. % 217.93/218.17 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.17 cut (((e10) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H10]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((j (h (e12))) = (j (h (e12))))); [ zenon_intro zenon_H11 | zenon_intro zenon_H12 ]. % 217.93/218.17 cut (((j (h (e12))) = (j (h (e12)))) = ((e10) = (j (h (e12))))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H10. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H11. % 217.93/218.17 cut (((j (h (e12))) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H12]. % 217.93/218.17 cut (((j (h (e12))) = (e10))); [idtac | apply NNPP; zenon_intro zenon_He]. % 217.93/218.17 congruence. % 217.93/218.17 cut (((j (e22)) = (e10)) = ((j (h (e12))) = (e10))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_He. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H66. % 217.93/218.17 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.17 cut (((j (e22)) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H101]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((j (h (e12))) = (j (h (e12))))); [ zenon_intro zenon_H11 | zenon_intro zenon_H12 ]. % 217.93/218.17 cut (((j (h (e12))) = (j (h (e12)))) = ((j (e22)) = (j (h (e12))))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H101. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H11. % 217.93/218.17 cut (((j (h (e12))) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H12]. % 217.93/218.17 cut (((j (h (e12))) = (j (e22)))); [idtac | apply NNPP; zenon_intro zenon_Hfe]. % 217.93/218.17 congruence. % 217.93/218.17 apply (zenon_L141_); trivial. % 217.93/218.17 apply zenon_H12. apply refl_equal. % 217.93/218.17 apply zenon_H12. apply refl_equal. % 217.93/218.17 apply zenon_H9. apply refl_equal. % 217.93/218.17 apply zenon_H12. apply refl_equal. % 217.93/218.17 apply zenon_H12. apply refl_equal. % 217.93/218.17 apply zenon_H9. apply refl_equal. % 217.93/218.17 apply zenon_H9. apply refl_equal. % 217.93/218.17 apply zenon_Ha. apply refl_equal. % 217.93/218.17 (* end of lemma zenon_L142_ *) % 217.93/218.17 assert (zenon_L143_ : (~((e11) = (e12))) -> ((j (h (e12))) = (e12)) -> ((h (e12)) = (e22)) -> ((j (e22)) = (e11)) -> False). % 217.93/218.17 do 0 intro. intros zenon_H15 zenon_Hc zenon_Hff zenon_H68. % 217.93/218.17 cut (((j (h (e12))) = (e12)) = ((e11) = (e12))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H15. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_Hc. % 217.93/218.17 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.17 cut (((j (h (e12))) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H17]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((e11) = (e11))); [ zenon_intro zenon_H18 | zenon_intro zenon_H14 ]. % 217.93/218.17 cut (((e11) = (e11)) = ((j (h (e12))) = (e11))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H17. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H18. % 217.93/218.17 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.17 cut (((e11) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H19]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((j (h (e12))) = (j (h (e12))))); [ zenon_intro zenon_H11 | zenon_intro zenon_H12 ]. % 217.93/218.17 cut (((j (h (e12))) = (j (h (e12)))) = ((e11) = (j (h (e12))))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H19. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H11. % 217.93/218.17 cut (((j (h (e12))) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H12]. % 217.93/218.17 cut (((j (h (e12))) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H17]. % 217.93/218.17 congruence. % 217.93/218.17 cut (((j (e22)) = (e11)) = ((j (h (e12))) = (e11))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H17. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H68. % 217.93/218.17 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.17 cut (((j (e22)) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H101]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((j (h (e12))) = (j (h (e12))))); [ zenon_intro zenon_H11 | zenon_intro zenon_H12 ]. % 217.93/218.17 cut (((j (h (e12))) = (j (h (e12)))) = ((j (e22)) = (j (h (e12))))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H101. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H11. % 217.93/218.17 cut (((j (h (e12))) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H12]. % 217.93/218.17 cut (((j (h (e12))) = (j (e22)))); [idtac | apply NNPP; zenon_intro zenon_Hfe]. % 217.93/218.17 congruence. % 217.93/218.17 apply (zenon_L141_); trivial. % 217.93/218.17 apply zenon_H12. apply refl_equal. % 217.93/218.17 apply zenon_H12. apply refl_equal. % 217.93/218.17 apply zenon_H14. apply refl_equal. % 217.93/218.17 apply zenon_H12. apply refl_equal. % 217.93/218.17 apply zenon_H12. apply refl_equal. % 217.93/218.17 apply zenon_H14. apply refl_equal. % 217.93/218.17 apply zenon_H14. apply refl_equal. % 217.93/218.17 apply zenon_Ha. apply refl_equal. % 217.93/218.17 (* end of lemma zenon_L143_ *) % 217.93/218.17 assert (zenon_L144_ : ((j (op2 (e24) (e24))) = (op1 (j (e24)) (j (e24)))) -> ((j (e24)) = (e10)) -> ((op1 (e14) (e14)) = (e10)) -> ((op1 (e10) (e10)) = (e10)) -> ((op2 (e24) (e24)) = (e22)) -> ((j (e22)) = (e12)) -> (~((e10) = (e12))) -> False). % 217.93/218.17 do 0 intro. intros zenon_H74 zenon_H6b zenon_H6f zenon_H6e zenon_H75 zenon_H69 zenon_Hb. % 217.93/218.17 elim (classic ((e12) = (e12))); [ zenon_intro zenon_H31 | zenon_intro zenon_Ha ]. % 217.93/218.17 cut (((e12) = (e12)) = ((e10) = (e12))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_Hb. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H31. % 217.93/218.17 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.17 cut (((e12) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H32]. % 217.93/218.17 congruence. % 217.93/218.17 cut (((op1 (e14) (e14)) = (e10)) = ((e12) = (e10))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H32. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H6f. % 217.93/218.17 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.17 cut (((op1 (e14) (e14)) = (e12))); [idtac | apply NNPP; zenon_intro zenon_H98]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((e12) = (e12))); [ zenon_intro zenon_H31 | zenon_intro zenon_Ha ]. % 217.93/218.17 cut (((e12) = (e12)) = ((op1 (e14) (e14)) = (e12))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H98. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H31. % 217.93/218.17 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.17 cut (((e12) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H99]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((op1 (e14) (e14)) = (op1 (e14) (e14)))); [ zenon_intro zenon_H80 | zenon_intro zenon_H81 ]. % 217.93/218.17 cut (((op1 (e14) (e14)) = (op1 (e14) (e14))) = ((e12) = (op1 (e14) (e14)))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H99. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H80. % 217.93/218.17 cut (((op1 (e14) (e14)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H81]. % 217.93/218.17 cut (((op1 (e14) (e14)) = (e12))); [idtac | apply NNPP; zenon_intro zenon_H98]. % 217.93/218.17 congruence. % 217.93/218.17 cut (((j (e22)) = (e12)) = ((op1 (e14) (e14)) = (e12))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H98. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H69. % 217.93/218.17 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.17 cut (((j (e22)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H79]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((op1 (e14) (e14)) = (op1 (e14) (e14)))); [ zenon_intro zenon_H80 | zenon_intro zenon_H81 ]. % 217.93/218.17 cut (((op1 (e14) (e14)) = (op1 (e14) (e14))) = ((j (e22)) = (op1 (e14) (e14)))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H79. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H80. % 217.93/218.17 cut (((op1 (e14) (e14)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H81]. % 217.93/218.17 cut (((op1 (e14) (e14)) = (j (e22)))); [idtac | apply NNPP; zenon_intro zenon_H76]. % 217.93/218.17 congruence. % 217.93/218.17 apply (zenon_L33_); trivial. % 217.93/218.17 apply zenon_H81. apply refl_equal. % 217.93/218.17 apply zenon_H81. apply refl_equal. % 217.93/218.17 apply zenon_Ha. apply refl_equal. % 217.93/218.17 apply zenon_H81. apply refl_equal. % 217.93/218.17 apply zenon_H81. apply refl_equal. % 217.93/218.17 apply zenon_Ha. apply refl_equal. % 217.93/218.17 apply zenon_Ha. apply refl_equal. % 217.93/218.17 apply zenon_H9. apply refl_equal. % 217.93/218.17 apply zenon_Ha. apply refl_equal. % 217.93/218.17 apply zenon_Ha. apply refl_equal. % 217.93/218.17 (* end of lemma zenon_L144_ *) % 217.93/218.17 assert (zenon_L145_ : (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> ((j (e22)) = (e12)) -> ((op2 (e24) (e24)) = (e22)) -> ((j (op2 (e24) (e24))) = (op1 (j (e24)) (j (e24)))) -> (~((e10) = (e11))) -> (~((e10) = (e12))) -> (~((e10) = (e13))) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((j (e23)) = (e10)) -> ((op1 (e14) (e14)) = (e10)) -> ((op1 (e10) (e10)) = (e10)) -> ((op2 (e23) (e23)) = (e24)) -> (~((e10) = (e14))) -> False). % 217.93/218.17 do 0 intro. intros zenon_H9e zenon_H69 zenon_H75 zenon_H74 zenon_H93 zenon_Hb zenon_H3b zenon_H8c zenon_H86 zenon_H6f zenon_H6e zenon_H83 zenon_H47. % 217.93/218.17 apply (zenon_or_s _ _ zenon_H9e); [ zenon_intro zenon_H6b | zenon_intro zenon_H9f ]. % 217.93/218.17 apply (zenon_L144_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_H9f); [ zenon_intro zenon_H92 | zenon_intro zenon_Ha0 ]. % 217.93/218.17 apply (zenon_L39_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Ha0); [ zenon_intro zenon_H97 | zenon_intro zenon_Ha1 ]. % 217.93/218.17 apply (zenon_L40_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Ha1); [ zenon_intro zenon_H9a | zenon_intro zenon_H9b ]. % 217.93/218.17 apply (zenon_L41_); trivial. % 217.93/218.17 apply (zenon_L42_); trivial. % 217.93/218.17 (* end of lemma zenon_L145_ *) % 217.93/218.17 assert (zenon_L146_ : ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((j (e22)) = (e12)) -> ((op1 (e14) (e14)) = (e10)) -> ((op1 (e12) (e12)) = (e10)) -> ((op2 (e22) (e22)) = (e23)) -> ((j (e23)) = (e14)) -> (~((e10) = (e14))) -> False). % 217.93/218.17 do 0 intro. intros zenon_Hac zenon_H69 zenon_H6f zenon_He9 zenon_Ha3 zenon_Hb5 zenon_H47. % 217.93/218.17 elim (classic ((e14) = (e14))); [ zenon_intro zenon_H27 | zenon_intro zenon_H24 ]. % 217.93/218.17 cut (((e14) = (e14)) = ((e10) = (e14))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H47. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H27. % 217.93/218.17 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.17 cut (((e14) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H48]. % 217.93/218.17 congruence. % 217.93/218.17 cut (((op1 (e14) (e14)) = (e10)) = ((e14) = (e10))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H48. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H6f. % 217.93/218.17 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.17 cut (((op1 (e14) (e14)) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H9c]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((e14) = (e14))); [ zenon_intro zenon_H27 | zenon_intro zenon_H24 ]. % 217.93/218.17 cut (((e14) = (e14)) = ((op1 (e14) (e14)) = (e14))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H9c. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H27. % 217.93/218.17 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.17 cut (((e14) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H9d]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((op1 (e14) (e14)) = (op1 (e14) (e14)))); [ zenon_intro zenon_H80 | zenon_intro zenon_H81 ]. % 217.93/218.17 cut (((op1 (e14) (e14)) = (op1 (e14) (e14))) = ((e14) = (op1 (e14) (e14)))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H9d. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H80. % 217.93/218.17 cut (((op1 (e14) (e14)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H81]. % 217.93/218.17 cut (((op1 (e14) (e14)) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H9c]. % 217.93/218.17 congruence. % 217.93/218.17 cut (((j (e23)) = (e14)) = ((op1 (e14) (e14)) = (e14))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H9c. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_Hb5. % 217.93/218.17 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.17 cut (((j (e23)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_Hb0]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((op1 (e14) (e14)) = (op1 (e14) (e14)))); [ zenon_intro zenon_H80 | zenon_intro zenon_H81 ]. % 217.93/218.17 cut (((op1 (e14) (e14)) = (op1 (e14) (e14))) = ((j (e23)) = (op1 (e14) (e14)))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_Hb0. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H80. % 217.93/218.17 cut (((op1 (e14) (e14)) = (op1 (e14) (e14)))); [idtac | apply NNPP; zenon_intro zenon_H81]. % 217.93/218.17 cut (((op1 (e14) (e14)) = (j (e23)))); [idtac | apply NNPP; zenon_intro zenon_Had]. % 217.93/218.17 congruence. % 217.93/218.17 apply (zenon_L117_); trivial. % 217.93/218.17 apply zenon_H81. apply refl_equal. % 217.93/218.17 apply zenon_H81. apply refl_equal. % 217.93/218.17 apply zenon_H24. apply refl_equal. % 217.93/218.17 apply zenon_H81. apply refl_equal. % 217.93/218.17 apply zenon_H81. apply refl_equal. % 217.93/218.17 apply zenon_H24. apply refl_equal. % 217.93/218.17 apply zenon_H24. apply refl_equal. % 217.93/218.17 apply zenon_H9. apply refl_equal. % 217.93/218.17 apply zenon_H24. apply refl_equal. % 217.93/218.17 apply zenon_H24. apply refl_equal. % 217.93/218.17 (* end of lemma zenon_L146_ *) % 217.93/218.17 assert (zenon_L147_ : (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> ((op2 (e23) (e23)) = (e24)) -> ((op1 (e10) (e10)) = (e10)) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((j (op2 (e24) (e24))) = (op1 (j (e24)) (j (e24)))) -> ((op2 (e24) (e24)) = (e22)) -> (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> (~((e10) = (e11))) -> (~((e10) = (e12))) -> (~((e10) = (e13))) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((j (e22)) = (e12)) -> ((op1 (e14) (e14)) = (e10)) -> ((op1 (e12) (e12)) = (e10)) -> ((op2 (e22) (e22)) = (e23)) -> (~((e10) = (e14))) -> False). % 217.93/218.17 do 0 intro. intros zenon_Hb6 zenon_H83 zenon_H6e zenon_H8c zenon_H74 zenon_H75 zenon_H9e zenon_H93 zenon_Hb zenon_H3b zenon_Hac zenon_H69 zenon_H6f zenon_He9 zenon_Ha3 zenon_H47. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb6); [ zenon_intro zenon_H86 | zenon_intro zenon_Hb7 ]. % 217.93/218.17 apply (zenon_L145_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb7); [ zenon_intro zenon_Hb2 | zenon_intro zenon_Hb8 ]. % 217.93/218.17 apply (zenon_L118_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb8); [ zenon_intro zenon_Hb3 | zenon_intro zenon_Hb9 ]. % 217.93/218.17 apply (zenon_L119_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb9); [ zenon_intro zenon_Hb4 | zenon_intro zenon_Hb5 ]. % 217.93/218.17 apply (zenon_L120_); trivial. % 217.93/218.17 apply (zenon_L146_); trivial. % 217.93/218.17 (* end of lemma zenon_L147_ *) % 217.93/218.17 assert (zenon_L148_ : ((j (h (e12))) = (e12)) -> ((h (e12)) = (e22)) -> ((j (e22)) = (e13)) -> (~((e12) = (e13))) -> False). % 217.93/218.17 do 0 intro. intros zenon_Hc zenon_Hff zenon_H7d zenon_H1f. % 217.93/218.17 elim (classic ((e13) = (e13))); [ zenon_intro zenon_H20 | zenon_intro zenon_H1d ]. % 217.93/218.17 cut (((e13) = (e13)) = ((e12) = (e13))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H1f. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H20. % 217.93/218.17 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.17 cut (((e13) = (e12))); [idtac | apply NNPP; zenon_intro zenon_H21]. % 217.93/218.17 congruence. % 217.93/218.17 cut (((j (h (e12))) = (e12)) = ((e13) = (e12))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H21. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_Hc. % 217.93/218.17 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.17 cut (((j (h (e12))) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H22]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((e13) = (e13))); [ zenon_intro zenon_H20 | zenon_intro zenon_H1d ]. % 217.93/218.17 cut (((e13) = (e13)) = ((j (h (e12))) = (e13))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H22. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H20. % 217.93/218.17 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.17 cut (((e13) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H23]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((j (h (e12))) = (j (h (e12))))); [ zenon_intro zenon_H11 | zenon_intro zenon_H12 ]. % 217.93/218.17 cut (((j (h (e12))) = (j (h (e12)))) = ((e13) = (j (h (e12))))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H23. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H11. % 217.93/218.17 cut (((j (h (e12))) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H12]. % 217.93/218.17 cut (((j (h (e12))) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H22]. % 217.93/218.17 congruence. % 217.93/218.17 cut (((j (e22)) = (e13)) = ((j (h (e12))) = (e13))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H22. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H7d. % 217.93/218.17 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.17 cut (((j (e22)) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H101]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((j (h (e12))) = (j (h (e12))))); [ zenon_intro zenon_H11 | zenon_intro zenon_H12 ]. % 217.93/218.17 cut (((j (h (e12))) = (j (h (e12)))) = ((j (e22)) = (j (h (e12))))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H101. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H11. % 217.93/218.17 cut (((j (h (e12))) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H12]. % 217.93/218.17 cut (((j (h (e12))) = (j (e22)))); [idtac | apply NNPP; zenon_intro zenon_Hfe]. % 217.93/218.17 congruence. % 217.93/218.17 apply (zenon_L141_); trivial. % 217.93/218.17 apply zenon_H12. apply refl_equal. % 217.93/218.17 apply zenon_H12. apply refl_equal. % 217.93/218.17 apply zenon_H1d. apply refl_equal. % 217.93/218.17 apply zenon_H12. apply refl_equal. % 217.93/218.17 apply zenon_H12. apply refl_equal. % 217.93/218.17 apply zenon_H1d. apply refl_equal. % 217.93/218.17 apply zenon_H1d. apply refl_equal. % 217.93/218.17 apply zenon_Ha. apply refl_equal. % 217.93/218.17 apply zenon_H1d. apply refl_equal. % 217.93/218.17 apply zenon_H1d. apply refl_equal. % 217.93/218.17 (* end of lemma zenon_L148_ *) % 217.93/218.17 assert (zenon_L149_ : ((j (h (e12))) = (e12)) -> ((h (e12)) = (e22)) -> ((j (e22)) = (e14)) -> (~((e12) = (e14))) -> False). % 217.93/218.17 do 0 intro. intros zenon_Hc zenon_Hff zenon_Hba zenon_H26. % 217.93/218.17 elim (classic ((e14) = (e14))); [ zenon_intro zenon_H27 | zenon_intro zenon_H24 ]. % 217.93/218.17 cut (((e14) = (e14)) = ((e12) = (e14))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H26. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H27. % 217.93/218.17 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.17 cut (((e14) = (e12))); [idtac | apply NNPP; zenon_intro zenon_H28]. % 217.93/218.17 congruence. % 217.93/218.17 cut (((j (h (e12))) = (e12)) = ((e14) = (e12))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H28. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_Hc. % 217.93/218.17 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.17 cut (((j (h (e12))) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H29]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((e14) = (e14))); [ zenon_intro zenon_H27 | zenon_intro zenon_H24 ]. % 217.93/218.17 cut (((e14) = (e14)) = ((j (h (e12))) = (e14))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H29. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H27. % 217.93/218.17 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.17 cut (((e14) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H2a]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((j (h (e12))) = (j (h (e12))))); [ zenon_intro zenon_H11 | zenon_intro zenon_H12 ]. % 217.93/218.17 cut (((j (h (e12))) = (j (h (e12)))) = ((e14) = (j (h (e12))))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H2a. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H11. % 217.93/218.17 cut (((j (h (e12))) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H12]. % 217.93/218.17 cut (((j (h (e12))) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H29]. % 217.93/218.17 congruence. % 217.93/218.17 cut (((j (e22)) = (e14)) = ((j (h (e12))) = (e14))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H29. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_Hba. % 217.93/218.17 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.17 cut (((j (e22)) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H101]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((j (h (e12))) = (j (h (e12))))); [ zenon_intro zenon_H11 | zenon_intro zenon_H12 ]. % 217.93/218.17 cut (((j (h (e12))) = (j (h (e12)))) = ((j (e22)) = (j (h (e12))))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H101. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H11. % 217.93/218.17 cut (((j (h (e12))) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H12]. % 217.93/218.17 cut (((j (h (e12))) = (j (e22)))); [idtac | apply NNPP; zenon_intro zenon_Hfe]. % 217.93/218.17 congruence. % 217.93/218.17 apply (zenon_L141_); trivial. % 217.93/218.17 apply zenon_H12. apply refl_equal. % 217.93/218.17 apply zenon_H12. apply refl_equal. % 217.93/218.17 apply zenon_H24. apply refl_equal. % 217.93/218.17 apply zenon_H12. apply refl_equal. % 217.93/218.17 apply zenon_H12. apply refl_equal. % 217.93/218.17 apply zenon_H24. apply refl_equal. % 217.93/218.17 apply zenon_H24. apply refl_equal. % 217.93/218.17 apply zenon_Ha. apply refl_equal. % 217.93/218.17 apply zenon_H24. apply refl_equal. % 217.93/218.17 apply zenon_H24. apply refl_equal. % 217.93/218.17 (* end of lemma zenon_L149_ *) % 217.93/218.17 assert (zenon_L150_ : (((j (e22)) = (e10))\/(((j (e22)) = (e11))\/(((j (e22)) = (e12))\/(((j (e22)) = (e13))\/((j (e22)) = (e14)))))) -> (~((e11) = (e12))) -> (~((e10) = (e14))) -> ((op2 (e22) (e22)) = (e23)) -> ((op1 (e12) (e12)) = (e10)) -> ((op1 (e14) (e14)) = (e10)) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> (~((e10) = (e13))) -> (~((e10) = (e12))) -> (~((e10) = (e11))) -> (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> ((op2 (e24) (e24)) = (e22)) -> ((j (op2 (e24) (e24))) = (op1 (j (e24)) (j (e24)))) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((op1 (e10) (e10)) = (e10)) -> ((op2 (e23) (e23)) = (e24)) -> (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> (~((e12) = (e13))) -> ((j (h (e12))) = (e12)) -> ((h (e12)) = (e22)) -> (~((e12) = (e14))) -> False). % 217.93/218.17 do 0 intro. intros zenon_Hbb zenon_H15 zenon_H47 zenon_Ha3 zenon_He9 zenon_H6f zenon_Hac zenon_H3b zenon_Hb zenon_H93 zenon_H9e zenon_H75 zenon_H74 zenon_H8c zenon_H6e zenon_H83 zenon_Hb6 zenon_H1f zenon_Hc zenon_Hff zenon_H26. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hbb); [ zenon_intro zenon_H66 | zenon_intro zenon_Hbc ]. % 217.93/218.17 apply (zenon_L142_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hbc); [ zenon_intro zenon_H68 | zenon_intro zenon_Hbd ]. % 217.93/218.17 apply (zenon_L143_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hbd); [ zenon_intro zenon_H69 | zenon_intro zenon_Hbe ]. % 217.93/218.17 apply (zenon_L147_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hbe); [ zenon_intro zenon_H7d | zenon_intro zenon_Hba ]. % 217.93/218.17 apply (zenon_L148_); trivial. % 217.93/218.17 apply (zenon_L149_); trivial. % 217.93/218.17 (* end of lemma zenon_L150_ *) % 217.93/218.17 assert (zenon_L151_ : (~((j (h (e11))) = (j (e20)))) -> ((h (e11)) = (e20)) -> False). % 217.93/218.17 do 0 intro. intros zenon_H102 zenon_H103. % 217.93/218.17 cut (((h (e11)) = (e20))); [idtac | apply NNPP; zenon_intro zenon_H104]. % 217.93/218.17 congruence. % 217.93/218.17 exact (zenon_H104 zenon_H103). % 217.93/218.17 (* end of lemma zenon_L151_ *) % 217.93/218.17 assert (zenon_L152_ : ((j (h (e11))) = (e11)) -> ((h (e11)) = (e20)) -> ((j (e20)) = (e14)) -> (~((e11) = (e14))) -> False). % 217.93/218.17 do 0 intro. intros zenon_H105 zenon_H103 zenon_H25 zenon_Hc8. % 217.93/218.17 elim (classic ((e14) = (e14))); [ zenon_intro zenon_H27 | zenon_intro zenon_H24 ]. % 217.93/218.17 cut (((e14) = (e14)) = ((e11) = (e14))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_Hc8. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H27. % 217.93/218.17 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.17 cut (((e14) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H106]. % 217.93/218.17 congruence. % 217.93/218.17 cut (((j (h (e11))) = (e11)) = ((e14) = (e11))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H106. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H105. % 217.93/218.17 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.17 cut (((j (h (e11))) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H107]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((e14) = (e14))); [ zenon_intro zenon_H27 | zenon_intro zenon_H24 ]. % 217.93/218.17 cut (((e14) = (e14)) = ((j (h (e11))) = (e14))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H107. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H27. % 217.93/218.17 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.17 cut (((e14) = (j (h (e11))))); [idtac | apply NNPP; zenon_intro zenon_H108]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((j (h (e11))) = (j (h (e11))))); [ zenon_intro zenon_H109 | zenon_intro zenon_H10a ]. % 217.93/218.17 cut (((j (h (e11))) = (j (h (e11)))) = ((e14) = (j (h (e11))))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H108. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H109. % 217.93/218.17 cut (((j (h (e11))) = (j (h (e11))))); [idtac | apply NNPP; zenon_intro zenon_H10a]. % 217.93/218.17 cut (((j (h (e11))) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H107]. % 217.93/218.17 congruence. % 217.93/218.17 cut (((j (e20)) = (e14)) = ((j (h (e11))) = (e14))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H107. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H25. % 217.93/218.17 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.17 cut (((j (e20)) = (j (h (e11))))); [idtac | apply NNPP; zenon_intro zenon_H10b]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((j (h (e11))) = (j (h (e11))))); [ zenon_intro zenon_H109 | zenon_intro zenon_H10a ]. % 217.93/218.17 cut (((j (h (e11))) = (j (h (e11)))) = ((j (e20)) = (j (h (e11))))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H10b. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H109. % 217.93/218.17 cut (((j (h (e11))) = (j (h (e11))))); [idtac | apply NNPP; zenon_intro zenon_H10a]. % 217.93/218.17 cut (((j (h (e11))) = (j (e20)))); [idtac | apply NNPP; zenon_intro zenon_H102]. % 217.93/218.17 congruence. % 217.93/218.17 apply (zenon_L151_); trivial. % 217.93/218.17 apply zenon_H10a. apply refl_equal. % 217.93/218.17 apply zenon_H10a. apply refl_equal. % 217.93/218.17 apply zenon_H24. apply refl_equal. % 217.93/218.17 apply zenon_H10a. apply refl_equal. % 217.93/218.17 apply zenon_H10a. apply refl_equal. % 217.93/218.17 apply zenon_H24. apply refl_equal. % 217.93/218.17 apply zenon_H24. apply refl_equal. % 217.93/218.17 apply zenon_H14. apply refl_equal. % 217.93/218.17 apply zenon_H24. apply refl_equal. % 217.93/218.17 apply zenon_H24. apply refl_equal. % 217.93/218.17 (* end of lemma zenon_L152_ *) % 217.93/218.17 assert (zenon_L153_ : (((j (e20)) = (e10))\/(((j (e20)) = (e11))\/(((j (e20)) = (e12))\/(((j (e20)) = (e13))\/((j (e20)) = (e14)))))) -> (~((e10) = (e14))) -> (~((e12) = (e14))) -> ((h (e14)) = (e20)) -> ((j (h (e14))) = (e14)) -> (~((e13) = (e14))) -> ((j (h (e11))) = (e11)) -> ((h (e11)) = (e20)) -> (~((e11) = (e14))) -> False). % 217.93/218.17 do 0 intro. intros zenon_H2b zenon_H47 zenon_H26 zenon_Hc0 zenon_Hc2 zenon_H5b zenon_H105 zenon_H103 zenon_Hc8. % 217.93/218.17 apply (zenon_or_s _ _ zenon_H2b); [ zenon_intro zenon_Hd | zenon_intro zenon_H2d ]. % 217.93/218.17 apply (zenon_L56_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_H2d); [ zenon_intro zenon_H16 | zenon_intro zenon_H2e ]. % 217.93/218.17 apply (zenon_L57_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_H2e); [ zenon_intro zenon_H30 | zenon_intro zenon_H2f ]. % 217.93/218.17 apply (zenon_L58_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_H2f); [ zenon_intro zenon_H1e | zenon_intro zenon_H25 ]. % 217.93/218.17 apply (zenon_L59_); trivial. % 217.93/218.17 apply (zenon_L152_); trivial. % 217.93/218.17 (* end of lemma zenon_L153_ *) % 217.93/218.17 assert (zenon_L154_ : (((j (e21)) = (e10))\/(((j (e21)) = (e11))\/(((j (e21)) = (e12))\/(((j (e21)) = (e13))\/((j (e21)) = (e14)))))) -> (~((e10) = (e14))) -> (~((e11) = (e14))) -> (~((e12) = (e14))) -> ((h (e14)) = (e21)) -> ((j (h (e14))) = (e14)) -> ((j (h (e13))) = (e13)) -> ((h (e13)) = (e21)) -> (~((e13) = (e14))) -> False). % 217.93/218.17 do 0 intro. intros zenon_H5f zenon_H47 zenon_Hc8 zenon_H26 zenon_Hd0 zenon_Hc2 zenon_H3c zenon_H4f zenon_H5b. % 217.93/218.17 apply (zenon_or_s _ _ zenon_H5f); [ zenon_intro zenon_H51 | zenon_intro zenon_H60 ]. % 217.93/218.17 apply (zenon_L62_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_H60); [ zenon_intro zenon_H53 | zenon_intro zenon_H61 ]. % 217.93/218.17 apply (zenon_L63_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_H61); [ zenon_intro zenon_H54 | zenon_intro zenon_H62 ]. % 217.93/218.17 apply (zenon_L64_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_H62); [ zenon_intro zenon_H58 | zenon_intro zenon_H5a ]. % 217.93/218.17 apply (zenon_L65_); trivial. % 217.93/218.17 apply (zenon_L25_); trivial. % 217.93/218.17 (* end of lemma zenon_L154_ *) % 217.93/218.17 assert (zenon_L155_ : (~((j (h (e12))) = (j (e23)))) -> ((h (e12)) = (e23)) -> False). % 217.93/218.17 do 0 intro. intros zenon_H10c zenon_H10d. % 217.93/218.17 cut (((h (e12)) = (e23))); [idtac | apply NNPP; zenon_intro zenon_H10e]. % 217.93/218.17 congruence. % 217.93/218.17 exact (zenon_H10e zenon_H10d). % 217.93/218.17 (* end of lemma zenon_L155_ *) % 217.93/218.17 assert (zenon_L156_ : (~((e10) = (e12))) -> ((j (h (e12))) = (e12)) -> ((h (e12)) = (e23)) -> ((j (e23)) = (e10)) -> False). % 217.93/218.17 do 0 intro. intros zenon_Hb zenon_Hc zenon_H10d zenon_H86. % 217.93/218.17 cut (((j (h (e12))) = (e12)) = ((e10) = (e12))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_Hb. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_Hc. % 217.93/218.17 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.17 cut (((j (h (e12))) = (e10))); [idtac | apply NNPP; zenon_intro zenon_He]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((e10) = (e10))); [ zenon_intro zenon_Hf | zenon_intro zenon_H9 ]. % 217.93/218.17 cut (((e10) = (e10)) = ((j (h (e12))) = (e10))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_He. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_Hf. % 217.93/218.17 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.17 cut (((e10) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H10]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((j (h (e12))) = (j (h (e12))))); [ zenon_intro zenon_H11 | zenon_intro zenon_H12 ]. % 217.93/218.17 cut (((j (h (e12))) = (j (h (e12)))) = ((e10) = (j (h (e12))))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H10. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H11. % 217.93/218.17 cut (((j (h (e12))) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H12]. % 217.93/218.17 cut (((j (h (e12))) = (e10))); [idtac | apply NNPP; zenon_intro zenon_He]. % 217.93/218.17 congruence. % 217.93/218.17 cut (((j (e23)) = (e10)) = ((j (h (e12))) = (e10))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_He. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H86. % 217.93/218.17 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.17 cut (((j (e23)) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H10f]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((j (h (e12))) = (j (h (e12))))); [ zenon_intro zenon_H11 | zenon_intro zenon_H12 ]. % 217.93/218.17 cut (((j (h (e12))) = (j (h (e12)))) = ((j (e23)) = (j (h (e12))))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H10f. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H11. % 217.93/218.17 cut (((j (h (e12))) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H12]. % 217.93/218.17 cut (((j (h (e12))) = (j (e23)))); [idtac | apply NNPP; zenon_intro zenon_H10c]. % 217.93/218.17 congruence. % 217.93/218.17 apply (zenon_L155_); trivial. % 217.93/218.17 apply zenon_H12. apply refl_equal. % 217.93/218.17 apply zenon_H12. apply refl_equal. % 217.93/218.17 apply zenon_H9. apply refl_equal. % 217.93/218.17 apply zenon_H12. apply refl_equal. % 217.93/218.17 apply zenon_H12. apply refl_equal. % 217.93/218.17 apply zenon_H9. apply refl_equal. % 217.93/218.17 apply zenon_H9. apply refl_equal. % 217.93/218.17 apply zenon_Ha. apply refl_equal. % 217.93/218.17 (* end of lemma zenon_L156_ *) % 217.93/218.17 assert (zenon_L157_ : ((j (h (e12))) = (e12)) -> ((h (e12)) = (e23)) -> ((j (e23)) = (e13)) -> (~((e12) = (e13))) -> False). % 217.93/218.17 do 0 intro. intros zenon_Hc zenon_H10d zenon_Hb4 zenon_H1f. % 217.93/218.17 elim (classic ((e13) = (e13))); [ zenon_intro zenon_H20 | zenon_intro zenon_H1d ]. % 217.93/218.17 cut (((e13) = (e13)) = ((e12) = (e13))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H1f. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H20. % 217.93/218.17 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.17 cut (((e13) = (e12))); [idtac | apply NNPP; zenon_intro zenon_H21]. % 217.93/218.17 congruence. % 217.93/218.17 cut (((j (h (e12))) = (e12)) = ((e13) = (e12))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H21. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_Hc. % 217.93/218.17 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.17 cut (((j (h (e12))) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H22]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((e13) = (e13))); [ zenon_intro zenon_H20 | zenon_intro zenon_H1d ]. % 217.93/218.17 cut (((e13) = (e13)) = ((j (h (e12))) = (e13))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H22. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H20. % 217.93/218.17 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.17 cut (((e13) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H23]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((j (h (e12))) = (j (h (e12))))); [ zenon_intro zenon_H11 | zenon_intro zenon_H12 ]. % 217.93/218.17 cut (((j (h (e12))) = (j (h (e12)))) = ((e13) = (j (h (e12))))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H23. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H11. % 217.93/218.17 cut (((j (h (e12))) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H12]. % 217.93/218.17 cut (((j (h (e12))) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H22]. % 217.93/218.17 congruence. % 217.93/218.17 cut (((j (e23)) = (e13)) = ((j (h (e12))) = (e13))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H22. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_Hb4. % 217.93/218.17 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.17 cut (((j (e23)) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H10f]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((j (h (e12))) = (j (h (e12))))); [ zenon_intro zenon_H11 | zenon_intro zenon_H12 ]. % 217.93/218.17 cut (((j (h (e12))) = (j (h (e12)))) = ((j (e23)) = (j (h (e12))))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H10f. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H11. % 217.93/218.17 cut (((j (h (e12))) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H12]. % 217.93/218.17 cut (((j (h (e12))) = (j (e23)))); [idtac | apply NNPP; zenon_intro zenon_H10c]. % 217.93/218.17 congruence. % 217.93/218.17 apply (zenon_L155_); trivial. % 217.93/218.17 apply zenon_H12. apply refl_equal. % 217.93/218.17 apply zenon_H12. apply refl_equal. % 217.93/218.17 apply zenon_H1d. apply refl_equal. % 217.93/218.17 apply zenon_H12. apply refl_equal. % 217.93/218.17 apply zenon_H12. apply refl_equal. % 217.93/218.17 apply zenon_H1d. apply refl_equal. % 217.93/218.17 apply zenon_H1d. apply refl_equal. % 217.93/218.17 apply zenon_Ha. apply refl_equal. % 217.93/218.17 apply zenon_H1d. apply refl_equal. % 217.93/218.17 apply zenon_H1d. apply refl_equal. % 217.93/218.17 (* end of lemma zenon_L157_ *) % 217.93/218.17 assert (zenon_L158_ : ((j (h (e12))) = (e12)) -> ((h (e12)) = (e23)) -> ((j (e23)) = (e14)) -> (~((e12) = (e14))) -> False). % 217.93/218.17 do 0 intro. intros zenon_Hc zenon_H10d zenon_Hb5 zenon_H26. % 217.93/218.17 elim (classic ((e14) = (e14))); [ zenon_intro zenon_H27 | zenon_intro zenon_H24 ]. % 217.93/218.17 cut (((e14) = (e14)) = ((e12) = (e14))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H26. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H27. % 217.93/218.17 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.17 cut (((e14) = (e12))); [idtac | apply NNPP; zenon_intro zenon_H28]. % 217.93/218.17 congruence. % 217.93/218.17 cut (((j (h (e12))) = (e12)) = ((e14) = (e12))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H28. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_Hc. % 217.93/218.17 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.17 cut (((j (h (e12))) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H29]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((e14) = (e14))); [ zenon_intro zenon_H27 | zenon_intro zenon_H24 ]. % 217.93/218.17 cut (((e14) = (e14)) = ((j (h (e12))) = (e14))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H29. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H27. % 217.93/218.17 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.17 cut (((e14) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H2a]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((j (h (e12))) = (j (h (e12))))); [ zenon_intro zenon_H11 | zenon_intro zenon_H12 ]. % 217.93/218.17 cut (((j (h (e12))) = (j (h (e12)))) = ((e14) = (j (h (e12))))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H2a. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H11. % 217.93/218.17 cut (((j (h (e12))) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H12]. % 217.93/218.17 cut (((j (h (e12))) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H29]. % 217.93/218.17 congruence. % 217.93/218.17 cut (((j (e23)) = (e14)) = ((j (h (e12))) = (e14))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H29. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_Hb5. % 217.93/218.17 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.17 cut (((j (e23)) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H10f]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((j (h (e12))) = (j (h (e12))))); [ zenon_intro zenon_H11 | zenon_intro zenon_H12 ]. % 217.93/218.17 cut (((j (h (e12))) = (j (h (e12)))) = ((j (e23)) = (j (h (e12))))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H10f. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H11. % 217.93/218.17 cut (((j (h (e12))) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H12]. % 217.93/218.17 cut (((j (h (e12))) = (j (e23)))); [idtac | apply NNPP; zenon_intro zenon_H10c]. % 217.93/218.17 congruence. % 217.93/218.17 apply (zenon_L155_); trivial. % 217.93/218.17 apply zenon_H12. apply refl_equal. % 217.93/218.17 apply zenon_H12. apply refl_equal. % 217.93/218.17 apply zenon_H24. apply refl_equal. % 217.93/218.17 apply zenon_H12. apply refl_equal. % 217.93/218.17 apply zenon_H12. apply refl_equal. % 217.93/218.17 apply zenon_H24. apply refl_equal. % 217.93/218.17 apply zenon_H24. apply refl_equal. % 217.93/218.17 apply zenon_Ha. apply refl_equal. % 217.93/218.17 apply zenon_H24. apply refl_equal. % 217.93/218.17 apply zenon_H24. apply refl_equal. % 217.93/218.17 (* end of lemma zenon_L158_ *) % 217.93/218.17 assert (zenon_L159_ : (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> (~((e10) = (e11))) -> (~((e10) = (e12))) -> ((op2 (e22) (e22)) = (e23)) -> ((j (e22)) = (e14)) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((op1 (e14) (e14)) = (e10)) -> (~((e12) = (e13))) -> ((j (h (e12))) = (e12)) -> ((h (e12)) = (e23)) -> (~((e12) = (e14))) -> False). % 217.93/218.17 do 0 intro. intros zenon_Hb6 zenon_H93 zenon_Hb zenon_Ha3 zenon_Hba zenon_Hac zenon_H6f zenon_H1f zenon_Hc zenon_H10d zenon_H26. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb6); [ zenon_intro zenon_H86 | zenon_intro zenon_Hb7 ]. % 217.93/218.17 apply (zenon_L156_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb7); [ zenon_intro zenon_Hb2 | zenon_intro zenon_Hb8 ]. % 217.93/218.17 apply (zenon_L76_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb8); [ zenon_intro zenon_Hb3 | zenon_intro zenon_Hb9 ]. % 217.93/218.17 apply (zenon_L77_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb9); [ zenon_intro zenon_Hb4 | zenon_intro zenon_Hb5 ]. % 217.93/218.17 apply (zenon_L157_); trivial. % 217.93/218.17 apply (zenon_L158_); trivial. % 217.93/218.17 (* end of lemma zenon_L159_ *) % 217.93/218.17 assert (zenon_L160_ : (((j (e22)) = (e10))\/(((j (e22)) = (e11))\/(((j (e22)) = (e12))\/(((j (e22)) = (e13))\/((j (e22)) = (e14)))))) -> (~((e10) = (e14))) -> (~((e11) = (e14))) -> ((h (e14)) = (e22)) -> ((j (h (e14))) = (e14)) -> (~((e13) = (e14))) -> (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> (~((e10) = (e11))) -> (~((e10) = (e12))) -> ((op2 (e22) (e22)) = (e23)) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((op1 (e14) (e14)) = (e10)) -> (~((e12) = (e13))) -> ((j (h (e12))) = (e12)) -> ((h (e12)) = (e23)) -> (~((e12) = (e14))) -> False). % 217.93/218.17 do 0 intro. intros zenon_Hbb zenon_H47 zenon_Hc8 zenon_Hd4 zenon_Hc2 zenon_H5b zenon_Hb6 zenon_H93 zenon_Hb zenon_Ha3 zenon_Hac zenon_H6f zenon_H1f zenon_Hc zenon_H10d zenon_H26. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hbb); [ zenon_intro zenon_H66 | zenon_intro zenon_Hbc ]. % 217.93/218.17 apply (zenon_L69_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hbc); [ zenon_intro zenon_H68 | zenon_intro zenon_Hbd ]. % 217.93/218.17 apply (zenon_L70_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hbd); [ zenon_intro zenon_H69 | zenon_intro zenon_Hbe ]. % 217.93/218.17 apply (zenon_L71_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hbe); [ zenon_intro zenon_H7d | zenon_intro zenon_Hba ]. % 217.93/218.17 apply (zenon_L72_); trivial. % 217.93/218.17 apply (zenon_L159_); trivial. % 217.93/218.17 (* end of lemma zenon_L160_ *) % 217.93/218.17 assert (zenon_L161_ : (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> (~((e10) = (e14))) -> (~((e11) = (e14))) -> ((h (e14)) = (e23)) -> ((j (h (e14))) = (e14)) -> (~((e13) = (e14))) -> ((j (h (e12))) = (e12)) -> ((h (e12)) = (e23)) -> (~((e12) = (e14))) -> False). % 217.93/218.17 do 0 intro. intros zenon_Hb6 zenon_H47 zenon_Hc8 zenon_Hd9 zenon_Hc2 zenon_H5b zenon_Hc zenon_H10d zenon_H26. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb6); [ zenon_intro zenon_H86 | zenon_intro zenon_Hb7 ]. % 217.93/218.17 apply (zenon_L83_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb7); [ zenon_intro zenon_Hb2 | zenon_intro zenon_Hb8 ]. % 217.93/218.17 apply (zenon_L84_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb8); [ zenon_intro zenon_Hb3 | zenon_intro zenon_Hb9 ]. % 217.93/218.17 apply (zenon_L85_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb9); [ zenon_intro zenon_Hb4 | zenon_intro zenon_Hb5 ]. % 217.93/218.17 apply (zenon_L86_); trivial. % 217.93/218.17 apply (zenon_L158_); trivial. % 217.93/218.17 (* end of lemma zenon_L161_ *) % 217.93/218.17 assert (zenon_L162_ : (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> (~((e10) = (e14))) -> ((op2 (e23) (e23)) = (e24)) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> (~((e10) = (e13))) -> ((j (h (e14))) = (e14)) -> ((h (e14)) = (e24)) -> (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> (~((e10) = (e11))) -> (~((e10) = (e12))) -> ((op2 (e22) (e22)) = (e23)) -> ((op1 (e10) (e10)) = (e10)) -> ((op1 (e14) (e14)) = (e10)) -> ((j (e22)) = (e10)) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> (~((e12) = (e13))) -> ((j (h (e12))) = (e12)) -> ((h (e12)) = (e23)) -> (~((e12) = (e14))) -> False). % 217.93/218.17 do 0 intro. intros zenon_Hb6 zenon_H47 zenon_H83 zenon_H8c zenon_H3b zenon_Hc2 zenon_He1 zenon_H9e zenon_H93 zenon_Hb zenon_Ha3 zenon_H6e zenon_H6f zenon_H66 zenon_Hac zenon_H1f zenon_Hc zenon_H10d zenon_H26. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb6); [ zenon_intro zenon_H86 | zenon_intro zenon_Hb7 ]. % 217.93/218.17 apply (zenon_L92_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb7); [ zenon_intro zenon_Hb2 | zenon_intro zenon_Hb8 ]. % 217.93/218.17 apply (zenon_L96_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb8); [ zenon_intro zenon_Hb3 | zenon_intro zenon_Hb9 ]. % 217.93/218.17 apply (zenon_L97_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb9); [ zenon_intro zenon_Hb4 | zenon_intro zenon_Hb5 ]. % 217.93/218.17 apply (zenon_L157_); trivial. % 217.93/218.17 apply (zenon_L158_); trivial. % 217.93/218.17 (* end of lemma zenon_L162_ *) % 217.93/218.17 assert (zenon_L163_ : (~((e11) = (e12))) -> ((j (h (e12))) = (e12)) -> ((h (e12)) = (e23)) -> ((j (e23)) = (e11)) -> False). % 217.93/218.17 do 0 intro. intros zenon_H15 zenon_Hc zenon_H10d zenon_Hb2. % 217.93/218.17 cut (((j (h (e12))) = (e12)) = ((e11) = (e12))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H15. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_Hc. % 217.93/218.17 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.17 cut (((j (h (e12))) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H17]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((e11) = (e11))); [ zenon_intro zenon_H18 | zenon_intro zenon_H14 ]. % 217.93/218.17 cut (((e11) = (e11)) = ((j (h (e12))) = (e11))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H17. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H18. % 217.93/218.17 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.17 cut (((e11) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H19]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((j (h (e12))) = (j (h (e12))))); [ zenon_intro zenon_H11 | zenon_intro zenon_H12 ]. % 217.93/218.17 cut (((j (h (e12))) = (j (h (e12)))) = ((e11) = (j (h (e12))))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H19. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H11. % 217.93/218.17 cut (((j (h (e12))) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H12]. % 217.93/218.17 cut (((j (h (e12))) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H17]. % 217.93/218.17 congruence. % 217.93/218.17 cut (((j (e23)) = (e11)) = ((j (h (e12))) = (e11))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H17. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_Hb2. % 217.93/218.17 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.17 cut (((j (e23)) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H10f]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((j (h (e12))) = (j (h (e12))))); [ zenon_intro zenon_H11 | zenon_intro zenon_H12 ]. % 217.93/218.17 cut (((j (h (e12))) = (j (h (e12)))) = ((j (e23)) = (j (h (e12))))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H10f. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H11. % 217.93/218.17 cut (((j (h (e12))) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H12]. % 217.93/218.17 cut (((j (h (e12))) = (j (e23)))); [idtac | apply NNPP; zenon_intro zenon_H10c]. % 217.93/218.17 congruence. % 217.93/218.17 apply (zenon_L155_); trivial. % 217.93/218.17 apply zenon_H12. apply refl_equal. % 217.93/218.17 apply zenon_H12. apply refl_equal. % 217.93/218.17 apply zenon_H14. apply refl_equal. % 217.93/218.17 apply zenon_H12. apply refl_equal. % 217.93/218.17 apply zenon_H12. apply refl_equal. % 217.93/218.17 apply zenon_H14. apply refl_equal. % 217.93/218.17 apply zenon_H14. apply refl_equal. % 217.93/218.17 apply zenon_Ha. apply refl_equal. % 217.93/218.17 (* end of lemma zenon_L163_ *) % 217.93/218.17 assert (zenon_L164_ : (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> (~((e10) = (e12))) -> (~((e11) = (e12))) -> (~((e10) = (e14))) -> ((op2 (e23) (e23)) = (e24)) -> ((op1 (e12) (e12)) = (e10)) -> ((op1 (e14) (e14)) = (e10)) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> (~((e10) = (e13))) -> ((j (h (e14))) = (e14)) -> ((h (e14)) = (e24)) -> (~((e10) = (e11))) -> ((j (op2 (e24) (e24))) = (op1 (j (e24)) (j (e24)))) -> ((op1 (e10) (e10)) = (e10)) -> ((op2 (e24) (e24)) = (e22)) -> ((j (e22)) = (e11)) -> (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> (~((e12) = (e13))) -> ((j (h (e12))) = (e12)) -> ((h (e12)) = (e23)) -> (~((e12) = (e14))) -> False). % 217.93/218.17 do 0 intro. intros zenon_Hb6 zenon_Hb zenon_H15 zenon_H47 zenon_H83 zenon_He9 zenon_H6f zenon_H8c zenon_H3b zenon_Hc2 zenon_He1 zenon_H93 zenon_H74 zenon_H6e zenon_H75 zenon_H68 zenon_H9e zenon_H1f zenon_Hc zenon_H10d zenon_H26. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb6); [ zenon_intro zenon_H86 | zenon_intro zenon_Hb7 ]. % 217.93/218.17 apply (zenon_L92_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb7); [ zenon_intro zenon_Hb2 | zenon_intro zenon_Hb8 ]. % 217.93/218.17 apply (zenon_L163_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb8); [ zenon_intro zenon_Hb3 | zenon_intro zenon_Hb9 ]. % 217.93/218.17 apply (zenon_L107_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb9); [ zenon_intro zenon_Hb4 | zenon_intro zenon_Hb5 ]. % 217.93/218.17 apply (zenon_L157_); trivial. % 217.93/218.17 apply (zenon_L158_); trivial. % 217.93/218.17 (* end of lemma zenon_L164_ *) % 217.93/218.17 assert (zenon_L165_ : (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> (~((e10) = (e11))) -> (~((e10) = (e12))) -> ((op2 (e22) (e22)) = (e23)) -> ((op1 (e12) (e12)) = (e10)) -> ((op1 (e14) (e14)) = (e10)) -> ((j (e22)) = (e12)) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> (~((e12) = (e13))) -> ((j (h (e12))) = (e12)) -> ((h (e12)) = (e23)) -> (~((e12) = (e14))) -> False). % 217.93/218.17 do 0 intro. intros zenon_Hb6 zenon_H93 zenon_Hb zenon_Ha3 zenon_He9 zenon_H6f zenon_H69 zenon_Hac zenon_H1f zenon_Hc zenon_H10d zenon_H26. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb6); [ zenon_intro zenon_H86 | zenon_intro zenon_Hb7 ]. % 217.93/218.17 apply (zenon_L156_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb7); [ zenon_intro zenon_Hb2 | zenon_intro zenon_Hb8 ]. % 217.93/218.17 apply (zenon_L118_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb8); [ zenon_intro zenon_Hb3 | zenon_intro zenon_Hb9 ]. % 217.93/218.17 apply (zenon_L119_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb9); [ zenon_intro zenon_Hb4 | zenon_intro zenon_Hb5 ]. % 217.93/218.17 apply (zenon_L157_); trivial. % 217.93/218.17 apply (zenon_L158_); trivial. % 217.93/218.17 (* end of lemma zenon_L165_ *) % 217.93/218.17 assert (zenon_L166_ : (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> (~((e10) = (e11))) -> (~((e10) = (e12))) -> ((op2 (e22) (e22)) = (e23)) -> ((op1 (e13) (e13)) = (e10)) -> ((op1 (e14) (e14)) = (e10)) -> ((j (e22)) = (e13)) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> (~((e12) = (e13))) -> ((j (h (e12))) = (e12)) -> ((h (e12)) = (e23)) -> (~((e12) = (e14))) -> False). % 217.93/218.17 do 0 intro. intros zenon_Hb6 zenon_H93 zenon_Hb zenon_Ha3 zenon_Ha8 zenon_H6f zenon_H7d zenon_Hac zenon_H1f zenon_Hc zenon_H10d zenon_H26. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb6); [ zenon_intro zenon_H86 | zenon_intro zenon_Hb7 ]. % 217.93/218.17 apply (zenon_L156_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb7); [ zenon_intro zenon_Hb2 | zenon_intro zenon_Hb8 ]. % 217.93/218.17 apply (zenon_L48_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb8); [ zenon_intro zenon_Hb3 | zenon_intro zenon_Hb9 ]. % 217.93/218.17 apply (zenon_L49_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb9); [ zenon_intro zenon_Hb4 | zenon_intro zenon_Hb5 ]. % 217.93/218.17 apply (zenon_L157_); trivial. % 217.93/218.17 apply (zenon_L158_); trivial. % 217.93/218.17 (* end of lemma zenon_L166_ *) % 217.93/218.17 assert (zenon_L167_ : (((j (e22)) = (e10))\/(((j (e22)) = (e11))\/(((j (e22)) = (e12))\/(((j (e22)) = (e13))\/((j (e22)) = (e14)))))) -> (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> ((op2 (e24) (e24)) = (e22)) -> ((op1 (e10) (e10)) = (e10)) -> ((j (op2 (e24) (e24))) = (op1 (j (e24)) (j (e24)))) -> ((h (e14)) = (e24)) -> ((j (h (e14))) = (e14)) -> (~((e10) = (e13))) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((op2 (e23) (e23)) = (e24)) -> (~((e10) = (e14))) -> (~((e11) = (e12))) -> ((op1 (e12) (e12)) = (e10)) -> ((op1 (e13) (e13)) = (e10)) -> (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> (~((e10) = (e11))) -> (~((e10) = (e12))) -> ((op2 (e22) (e22)) = (e23)) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((op1 (e14) (e14)) = (e10)) -> (~((e12) = (e13))) -> ((j (h (e12))) = (e12)) -> ((h (e12)) = (e23)) -> (~((e12) = (e14))) -> False). % 217.93/218.17 do 0 intro. intros zenon_Hbb zenon_H9e zenon_H75 zenon_H6e zenon_H74 zenon_He1 zenon_Hc2 zenon_H3b zenon_H8c zenon_H83 zenon_H47 zenon_H15 zenon_He9 zenon_Ha8 zenon_Hb6 zenon_H93 zenon_Hb zenon_Ha3 zenon_Hac zenon_H6f zenon_H1f zenon_Hc zenon_H10d zenon_H26. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hbb); [ zenon_intro zenon_H66 | zenon_intro zenon_Hbc ]. % 217.93/218.17 apply (zenon_L162_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hbc); [ zenon_intro zenon_H68 | zenon_intro zenon_Hbd ]. % 217.93/218.17 apply (zenon_L164_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hbd); [ zenon_intro zenon_H69 | zenon_intro zenon_Hbe ]. % 217.93/218.17 apply (zenon_L165_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hbe); [ zenon_intro zenon_H7d | zenon_intro zenon_Hba ]. % 217.93/218.17 apply (zenon_L166_); trivial. % 217.93/218.17 apply (zenon_L159_); trivial. % 217.93/218.17 (* end of lemma zenon_L167_ *) % 217.93/218.17 assert (zenon_L168_ : (((j (e22)) = (e10))\/(((j (e22)) = (e11))\/(((j (e22)) = (e12))\/(((j (e22)) = (e13))\/((j (e22)) = (e14)))))) -> (~((e10) = (e13))) -> (~((e11) = (e13))) -> (~((e12) = (e14))) -> ((h (e12)) = (e23)) -> ((j (h (e12))) = (e12)) -> (~((e12) = (e13))) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((op1 (e14) (e14)) = (e10)) -> ((op1 (e13) (e13)) = (e10)) -> ((op2 (e22) (e22)) = (e23)) -> (~((e10) = (e12))) -> (~((e10) = (e11))) -> (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> ((j (h (e13))) = (e13)) -> ((h (e13)) = (e22)) -> (~((e13) = (e14))) -> False). % 217.93/218.17 do 0 intro. intros zenon_Hbb zenon_H3b zenon_H42 zenon_H26 zenon_H10d zenon_Hc zenon_H1f zenon_Hac zenon_H6f zenon_Ha8 zenon_Ha3 zenon_Hb zenon_H93 zenon_Hb6 zenon_H3c zenon_H64 zenon_H5b. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hbb); [ zenon_intro zenon_H66 | zenon_intro zenon_Hbc ]. % 217.93/218.17 apply (zenon_L28_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hbc); [ zenon_intro zenon_H68 | zenon_intro zenon_Hbd ]. % 217.93/218.17 apply (zenon_L29_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hbd); [ zenon_intro zenon_H69 | zenon_intro zenon_Hbe ]. % 217.93/218.17 apply (zenon_L30_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hbe); [ zenon_intro zenon_H7d | zenon_intro zenon_Hba ]. % 217.93/218.17 apply (zenon_L166_); trivial. % 217.93/218.17 apply (zenon_L53_); trivial. % 217.93/218.17 (* end of lemma zenon_L168_ *) % 217.93/218.17 assert (zenon_L169_ : (~((e12) = (e13))) -> ((j (h (e13))) = (e13)) -> ((h (e13)) = (e23)) -> ((j (e23)) = (e12)) -> False). % 217.93/218.17 do 0 intro. intros zenon_H1f zenon_H3c zenon_Hdd zenon_Hb3. % 217.93/218.17 cut (((j (h (e13))) = (e13)) = ((e12) = (e13))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H1f. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H3c. % 217.93/218.17 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.17 cut (((j (h (e13))) = (e12))); [idtac | apply NNPP; zenon_intro zenon_H45]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((e12) = (e12))); [ zenon_intro zenon_H31 | zenon_intro zenon_Ha ]. % 217.93/218.17 cut (((e12) = (e12)) = ((j (h (e13))) = (e12))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H45. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H31. % 217.93/218.17 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.17 cut (((e12) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H46]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((j (h (e13))) = (j (h (e13))))); [ zenon_intro zenon_H3f | zenon_intro zenon_H40 ]. % 217.93/218.17 cut (((j (h (e13))) = (j (h (e13)))) = ((e12) = (j (h (e13))))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H46. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H3f. % 217.93/218.17 cut (((j (h (e13))) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H40]. % 217.93/218.17 cut (((j (h (e13))) = (e12))); [idtac | apply NNPP; zenon_intro zenon_H45]. % 217.93/218.17 congruence. % 217.93/218.17 cut (((j (e23)) = (e12)) = ((j (h (e13))) = (e12))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H45. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_Hb3. % 217.93/218.17 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.17 cut (((j (e23)) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_Hdf]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((j (h (e13))) = (j (h (e13))))); [ zenon_intro zenon_H3f | zenon_intro zenon_H40 ]. % 217.93/218.17 cut (((j (h (e13))) = (j (h (e13)))) = ((j (e23)) = (j (h (e13))))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_Hdf. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H3f. % 217.93/218.17 cut (((j (h (e13))) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H40]. % 217.93/218.17 cut (((j (h (e13))) = (j (e23)))); [idtac | apply NNPP; zenon_intro zenon_Hdc]. % 217.93/218.17 congruence. % 217.93/218.17 apply (zenon_L87_); trivial. % 217.93/218.17 apply zenon_H40. apply refl_equal. % 217.93/218.17 apply zenon_H40. apply refl_equal. % 217.93/218.17 apply zenon_Ha. apply refl_equal. % 217.93/218.17 apply zenon_H40. apply refl_equal. % 217.93/218.17 apply zenon_H40. apply refl_equal. % 217.93/218.17 apply zenon_Ha. apply refl_equal. % 217.93/218.17 apply zenon_Ha. apply refl_equal. % 217.93/218.17 apply zenon_H1d. apply refl_equal. % 217.93/218.17 (* end of lemma zenon_L169_ *) % 217.93/218.17 assert (zenon_L170_ : (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> (~((e10) = (e13))) -> (~((e11) = (e13))) -> (~((e12) = (e13))) -> ((h (e12)) = (e23)) -> ((j (h (e12))) = (e12)) -> ((j (h (e13))) = (e13)) -> ((h (e13)) = (e23)) -> (~((e13) = (e14))) -> False). % 217.93/218.17 do 0 intro. intros zenon_Hb6 zenon_H3b zenon_H42 zenon_H1f zenon_H10d zenon_Hc zenon_H3c zenon_Hdd zenon_H5b. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb6); [ zenon_intro zenon_H86 | zenon_intro zenon_Hb7 ]. % 217.93/218.17 apply (zenon_L114_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb7); [ zenon_intro zenon_Hb2 | zenon_intro zenon_Hb8 ]. % 217.93/218.17 apply (zenon_L99_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb8); [ zenon_intro zenon_Hb3 | zenon_intro zenon_Hb9 ]. % 217.93/218.17 apply (zenon_L169_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb9); [ zenon_intro zenon_Hb4 | zenon_intro zenon_Hb5 ]. % 217.93/218.17 apply (zenon_L157_); trivial. % 217.93/218.17 apply (zenon_L88_); trivial. % 217.93/218.17 (* end of lemma zenon_L170_ *) % 217.93/218.17 assert (zenon_L171_ : (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> (~((e10) = (e14))) -> ((op1 (e10) (e10)) = (e10)) -> (~((e11) = (e12))) -> ((op1 (e12) (e12)) = (e10)) -> (~((e11) = (e13))) -> (~((e12) = (e13))) -> ((h (e12)) = (e23)) -> ((j (h (e12))) = (e12)) -> (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> (~((e10) = (e11))) -> (~((e10) = (e12))) -> (~((e10) = (e13))) -> ((op2 (e23) (e23)) = (e24)) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((op1 (e14) (e14)) = (e10)) -> ((j (h (e13))) = (e13)) -> ((h (e13)) = (e24)) -> (~((e13) = (e14))) -> False). % 217.93/218.17 do 0 intro. intros zenon_Hb6 zenon_H47 zenon_H6e zenon_H15 zenon_He9 zenon_H42 zenon_H1f zenon_H10d zenon_Hc zenon_H9e zenon_H93 zenon_Hb zenon_H3b zenon_H83 zenon_H8c zenon_H6f zenon_H3c zenon_Hf2 zenon_H5b. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb6); [ zenon_intro zenon_H86 | zenon_intro zenon_Hb7 ]. % 217.93/218.17 apply (zenon_L128_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb7); [ zenon_intro zenon_Hb2 | zenon_intro zenon_Hb8 ]. % 217.93/218.17 apply (zenon_L163_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb8); [ zenon_intro zenon_Hb3 | zenon_intro zenon_Hb9 ]. % 217.93/218.17 apply (zenon_L132_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb9); [ zenon_intro zenon_Hb4 | zenon_intro zenon_Hb5 ]. % 217.93/218.17 apply (zenon_L157_); trivial. % 217.93/218.17 apply (zenon_L137_); trivial. % 217.93/218.17 (* end of lemma zenon_L171_ *) % 217.93/218.17 assert (zenon_L172_ : (~((j (h (e12))) = (j (e24)))) -> ((h (e12)) = (e24)) -> False). % 217.93/218.17 do 0 intro. intros zenon_H110 zenon_H111. % 217.93/218.17 cut (((h (e12)) = (e24))); [idtac | apply NNPP; zenon_intro zenon_H112]. % 217.93/218.17 congruence. % 217.93/218.17 exact (zenon_H112 zenon_H111). % 217.93/218.17 (* end of lemma zenon_L172_ *) % 217.93/218.17 assert (zenon_L173_ : ((j (h (e12))) = (e12)) -> ((h (e12)) = (e24)) -> ((j (e24)) = (e13)) -> (~((e12) = (e13))) -> False). % 217.93/218.17 do 0 intro. intros zenon_Hc zenon_H111 zenon_H9a zenon_H1f. % 217.93/218.17 elim (classic ((e13) = (e13))); [ zenon_intro zenon_H20 | zenon_intro zenon_H1d ]. % 217.93/218.17 cut (((e13) = (e13)) = ((e12) = (e13))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H1f. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H20. % 217.93/218.17 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.17 cut (((e13) = (e12))); [idtac | apply NNPP; zenon_intro zenon_H21]. % 217.93/218.17 congruence. % 217.93/218.17 cut (((j (h (e12))) = (e12)) = ((e13) = (e12))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H21. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_Hc. % 217.93/218.17 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.17 cut (((j (h (e12))) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H22]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((e13) = (e13))); [ zenon_intro zenon_H20 | zenon_intro zenon_H1d ]. % 217.93/218.17 cut (((e13) = (e13)) = ((j (h (e12))) = (e13))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H22. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H20. % 217.93/218.17 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.17 cut (((e13) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H23]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((j (h (e12))) = (j (h (e12))))); [ zenon_intro zenon_H11 | zenon_intro zenon_H12 ]. % 217.93/218.17 cut (((j (h (e12))) = (j (h (e12)))) = ((e13) = (j (h (e12))))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H23. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H11. % 217.93/218.17 cut (((j (h (e12))) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H12]. % 217.93/218.17 cut (((j (h (e12))) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H22]. % 217.93/218.17 congruence. % 217.93/218.17 cut (((j (e24)) = (e13)) = ((j (h (e12))) = (e13))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H22. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H9a. % 217.93/218.17 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.17 cut (((j (e24)) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H113]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((j (h (e12))) = (j (h (e12))))); [ zenon_intro zenon_H11 | zenon_intro zenon_H12 ]. % 217.93/218.17 cut (((j (h (e12))) = (j (h (e12)))) = ((j (e24)) = (j (h (e12))))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H113. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H11. % 217.93/218.17 cut (((j (h (e12))) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H12]. % 217.93/218.17 cut (((j (h (e12))) = (j (e24)))); [idtac | apply NNPP; zenon_intro zenon_H110]. % 217.93/218.17 congruence. % 217.93/218.17 apply (zenon_L172_); trivial. % 217.93/218.17 apply zenon_H12. apply refl_equal. % 217.93/218.17 apply zenon_H12. apply refl_equal. % 217.93/218.17 apply zenon_H1d. apply refl_equal. % 217.93/218.17 apply zenon_H12. apply refl_equal. % 217.93/218.17 apply zenon_H12. apply refl_equal. % 217.93/218.17 apply zenon_H1d. apply refl_equal. % 217.93/218.17 apply zenon_H1d. apply refl_equal. % 217.93/218.17 apply zenon_Ha. apply refl_equal. % 217.93/218.17 apply zenon_H1d. apply refl_equal. % 217.93/218.17 apply zenon_H1d. apply refl_equal. % 217.93/218.17 (* end of lemma zenon_L173_ *) % 217.93/218.17 assert (zenon_L174_ : ((j (h (e12))) = (e12)) -> ((h (e12)) = (e24)) -> ((j (e24)) = (e14)) -> (~((e12) = (e14))) -> False). % 217.93/218.17 do 0 intro. intros zenon_Hc zenon_H111 zenon_H9b zenon_H26. % 217.93/218.17 elim (classic ((e14) = (e14))); [ zenon_intro zenon_H27 | zenon_intro zenon_H24 ]. % 217.93/218.17 cut (((e14) = (e14)) = ((e12) = (e14))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H26. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H27. % 217.93/218.17 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.17 cut (((e14) = (e12))); [idtac | apply NNPP; zenon_intro zenon_H28]. % 217.93/218.17 congruence. % 217.93/218.17 cut (((j (h (e12))) = (e12)) = ((e14) = (e12))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H28. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_Hc. % 217.93/218.17 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.17 cut (((j (h (e12))) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H29]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((e14) = (e14))); [ zenon_intro zenon_H27 | zenon_intro zenon_H24 ]. % 217.93/218.17 cut (((e14) = (e14)) = ((j (h (e12))) = (e14))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H29. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H27. % 217.93/218.17 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.17 cut (((e14) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H2a]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((j (h (e12))) = (j (h (e12))))); [ zenon_intro zenon_H11 | zenon_intro zenon_H12 ]. % 217.93/218.17 cut (((j (h (e12))) = (j (h (e12)))) = ((e14) = (j (h (e12))))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H2a. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H11. % 217.93/218.17 cut (((j (h (e12))) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H12]. % 217.93/218.17 cut (((j (h (e12))) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H29]. % 217.93/218.17 congruence. % 217.93/218.17 cut (((j (e24)) = (e14)) = ((j (h (e12))) = (e14))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H29. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H9b. % 217.93/218.17 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.17 cut (((j (e24)) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H113]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((j (h (e12))) = (j (h (e12))))); [ zenon_intro zenon_H11 | zenon_intro zenon_H12 ]. % 217.93/218.17 cut (((j (h (e12))) = (j (h (e12)))) = ((j (e24)) = (j (h (e12))))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H113. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H11. % 217.93/218.17 cut (((j (h (e12))) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H12]. % 217.93/218.17 cut (((j (h (e12))) = (j (e24)))); [idtac | apply NNPP; zenon_intro zenon_H110]. % 217.93/218.17 congruence. % 217.93/218.17 apply (zenon_L172_); trivial. % 217.93/218.17 apply zenon_H12. apply refl_equal. % 217.93/218.17 apply zenon_H12. apply refl_equal. % 217.93/218.17 apply zenon_H24. apply refl_equal. % 217.93/218.17 apply zenon_H12. apply refl_equal. % 217.93/218.17 apply zenon_H12. apply refl_equal. % 217.93/218.17 apply zenon_H24. apply refl_equal. % 217.93/218.17 apply zenon_H24. apply refl_equal. % 217.93/218.17 apply zenon_Ha. apply refl_equal. % 217.93/218.17 apply zenon_H24. apply refl_equal. % 217.93/218.17 apply zenon_H24. apply refl_equal. % 217.93/218.17 (* end of lemma zenon_L174_ *) % 217.93/218.17 assert (zenon_L175_ : (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> (~((e12) = (e14))) -> ((h (e12)) = (e24)) -> ((j (h (e12))) = (e12)) -> (~((e12) = (e13))) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((op1 (e10) (e10)) = (e10)) -> ((op2 (e23) (e23)) = (e24)) -> ((j (op2 (e24) (e24))) = (op1 (j (e24)) (j (e24)))) -> ((op2 (e24) (e24)) = (e22)) -> (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> (~((e10) = (e11))) -> (~((e10) = (e12))) -> (~((e10) = (e13))) -> ((op1 (e14) (e14)) = (e10)) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((j (e22)) = (e14)) -> ((op2 (e22) (e22)) = (e23)) -> (~((e10) = (e14))) -> False). % 217.93/218.17 do 0 intro. intros zenon_Hb6 zenon_H26 zenon_H111 zenon_Hc zenon_H1f zenon_H8c zenon_H6e zenon_H83 zenon_H74 zenon_H75 zenon_H9e zenon_H93 zenon_Hb zenon_H3b zenon_H6f zenon_Hac zenon_Hba zenon_Ha3 zenon_H47. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb6); [ zenon_intro zenon_H86 | zenon_intro zenon_Hb7 ]. % 217.93/218.17 apply (zenon_or_s _ _ zenon_H9e); [ zenon_intro zenon_H6b | zenon_intro zenon_H9f ]. % 217.93/218.17 apply (zenon_L73_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_H9f); [ zenon_intro zenon_H92 | zenon_intro zenon_Ha0 ]. % 217.93/218.17 apply (zenon_L39_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Ha0); [ zenon_intro zenon_H97 | zenon_intro zenon_Ha1 ]. % 217.93/218.17 apply (zenon_L40_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Ha1); [ zenon_intro zenon_H9a | zenon_intro zenon_H9b ]. % 217.93/218.17 apply (zenon_L173_); trivial. % 217.93/218.17 apply (zenon_L174_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb7); [ zenon_intro zenon_Hb2 | zenon_intro zenon_Hb8 ]. % 217.93/218.17 apply (zenon_L76_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb8); [ zenon_intro zenon_Hb3 | zenon_intro zenon_Hb9 ]. % 217.93/218.17 apply (zenon_L77_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb9); [ zenon_intro zenon_Hb4 | zenon_intro zenon_Hb5 ]. % 217.93/218.17 apply (zenon_L78_); trivial. % 217.93/218.17 apply (zenon_L79_); trivial. % 217.93/218.17 (* end of lemma zenon_L175_ *) % 217.93/218.17 assert (zenon_L176_ : (((j (e22)) = (e10))\/(((j (e22)) = (e11))\/(((j (e22)) = (e12))\/(((j (e22)) = (e13))\/((j (e22)) = (e14)))))) -> (~((e11) = (e14))) -> ((h (e14)) = (e22)) -> ((j (h (e14))) = (e14)) -> (~((e13) = (e14))) -> (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> (~((e12) = (e14))) -> ((h (e12)) = (e24)) -> ((j (h (e12))) = (e12)) -> (~((e12) = (e13))) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((op1 (e10) (e10)) = (e10)) -> ((op2 (e23) (e23)) = (e24)) -> ((j (op2 (e24) (e24))) = (op1 (j (e24)) (j (e24)))) -> ((op2 (e24) (e24)) = (e22)) -> (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> (~((e10) = (e11))) -> (~((e10) = (e12))) -> (~((e10) = (e13))) -> ((op1 (e14) (e14)) = (e10)) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((op2 (e22) (e22)) = (e23)) -> (~((e10) = (e14))) -> False). % 217.93/218.17 do 0 intro. intros zenon_Hbb zenon_Hc8 zenon_Hd4 zenon_Hc2 zenon_H5b zenon_Hb6 zenon_H26 zenon_H111 zenon_Hc zenon_H1f zenon_H8c zenon_H6e zenon_H83 zenon_H74 zenon_H75 zenon_H9e zenon_H93 zenon_Hb zenon_H3b zenon_H6f zenon_Hac zenon_Ha3 zenon_H47. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hbb); [ zenon_intro zenon_H66 | zenon_intro zenon_Hbc ]. % 217.93/218.17 apply (zenon_L69_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hbc); [ zenon_intro zenon_H68 | zenon_intro zenon_Hbd ]. % 217.93/218.17 apply (zenon_L70_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hbd); [ zenon_intro zenon_H69 | zenon_intro zenon_Hbe ]. % 217.93/218.17 apply (zenon_L71_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hbe); [ zenon_intro zenon_H7d | zenon_intro zenon_Hba ]. % 217.93/218.17 apply (zenon_L72_); trivial. % 217.93/218.17 apply (zenon_L175_); trivial. % 217.93/218.17 (* end of lemma zenon_L176_ *) % 217.93/218.17 assert (zenon_L177_ : (~((e10) = (e12))) -> ((j (h (e12))) = (e12)) -> ((h (e12)) = (e24)) -> ((j (e24)) = (e10)) -> False). % 217.93/218.17 do 0 intro. intros zenon_Hb zenon_Hc zenon_H111 zenon_H6b. % 217.93/218.17 cut (((j (h (e12))) = (e12)) = ((e10) = (e12))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_Hb. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_Hc. % 217.93/218.17 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.17 cut (((j (h (e12))) = (e10))); [idtac | apply NNPP; zenon_intro zenon_He]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((e10) = (e10))); [ zenon_intro zenon_Hf | zenon_intro zenon_H9 ]. % 217.93/218.17 cut (((e10) = (e10)) = ((j (h (e12))) = (e10))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_He. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_Hf. % 217.93/218.17 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.17 cut (((e10) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H10]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((j (h (e12))) = (j (h (e12))))); [ zenon_intro zenon_H11 | zenon_intro zenon_H12 ]. % 217.93/218.17 cut (((j (h (e12))) = (j (h (e12)))) = ((e10) = (j (h (e12))))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H10. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H11. % 217.93/218.17 cut (((j (h (e12))) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H12]. % 217.93/218.17 cut (((j (h (e12))) = (e10))); [idtac | apply NNPP; zenon_intro zenon_He]. % 217.93/218.17 congruence. % 217.93/218.17 cut (((j (e24)) = (e10)) = ((j (h (e12))) = (e10))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_He. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H6b. % 217.93/218.17 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.17 cut (((j (e24)) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H113]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((j (h (e12))) = (j (h (e12))))); [ zenon_intro zenon_H11 | zenon_intro zenon_H12 ]. % 217.93/218.17 cut (((j (h (e12))) = (j (h (e12)))) = ((j (e24)) = (j (h (e12))))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H113. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H11. % 217.93/218.17 cut (((j (h (e12))) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H12]. % 217.93/218.17 cut (((j (h (e12))) = (j (e24)))); [idtac | apply NNPP; zenon_intro zenon_H110]. % 217.93/218.17 congruence. % 217.93/218.17 apply (zenon_L172_); trivial. % 217.93/218.17 apply zenon_H12. apply refl_equal. % 217.93/218.17 apply zenon_H12. apply refl_equal. % 217.93/218.17 apply zenon_H9. apply refl_equal. % 217.93/218.17 apply zenon_H12. apply refl_equal. % 217.93/218.17 apply zenon_H12. apply refl_equal. % 217.93/218.17 apply zenon_H9. apply refl_equal. % 217.93/218.17 apply zenon_H9. apply refl_equal. % 217.93/218.17 apply zenon_Ha. apply refl_equal. % 217.93/218.17 (* end of lemma zenon_L177_ *) % 217.93/218.17 assert (zenon_L178_ : (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> (~((e10) = (e11))) -> (~((e10) = (e12))) -> ((op2 (e23) (e23)) = (e24)) -> ((op1 (e10) (e10)) = (e10)) -> ((op1 (e14) (e14)) = (e10)) -> ((j (e23)) = (e10)) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> (~((e12) = (e13))) -> ((j (h (e12))) = (e12)) -> ((h (e12)) = (e24)) -> (~((e12) = (e14))) -> False). % 217.93/218.17 do 0 intro. intros zenon_H9e zenon_H93 zenon_Hb zenon_H83 zenon_H6e zenon_H6f zenon_H86 zenon_H8c zenon_H1f zenon_Hc zenon_H111 zenon_H26. % 217.93/218.17 apply (zenon_or_s _ _ zenon_H9e); [ zenon_intro zenon_H6b | zenon_intro zenon_H9f ]. % 217.93/218.17 apply (zenon_L177_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_H9f); [ zenon_intro zenon_H92 | zenon_intro zenon_Ha0 ]. % 217.93/218.17 apply (zenon_L39_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Ha0); [ zenon_intro zenon_H97 | zenon_intro zenon_Ha1 ]. % 217.93/218.17 apply (zenon_L40_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Ha1); [ zenon_intro zenon_H9a | zenon_intro zenon_H9b ]. % 217.93/218.17 apply (zenon_L173_); trivial. % 217.93/218.17 apply (zenon_L174_); trivial. % 217.93/218.17 (* end of lemma zenon_L178_ *) % 217.93/218.17 assert (zenon_L179_ : (~((e11) = (e12))) -> ((j (h (e12))) = (e12)) -> ((h (e12)) = (e24)) -> ((j (e24)) = (e11)) -> False). % 217.93/218.17 do 0 intro. intros zenon_H15 zenon_Hc zenon_H111 zenon_H92. % 217.93/218.17 cut (((j (h (e12))) = (e12)) = ((e11) = (e12))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H15. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_Hc. % 217.93/218.17 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.17 cut (((j (h (e12))) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H17]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((e11) = (e11))); [ zenon_intro zenon_H18 | zenon_intro zenon_H14 ]. % 217.93/218.17 cut (((e11) = (e11)) = ((j (h (e12))) = (e11))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H17. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H18. % 217.93/218.17 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.17 cut (((e11) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H19]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((j (h (e12))) = (j (h (e12))))); [ zenon_intro zenon_H11 | zenon_intro zenon_H12 ]. % 217.93/218.17 cut (((j (h (e12))) = (j (h (e12)))) = ((e11) = (j (h (e12))))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H19. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H11. % 217.93/218.17 cut (((j (h (e12))) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H12]. % 217.93/218.17 cut (((j (h (e12))) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H17]. % 217.93/218.17 congruence. % 217.93/218.17 cut (((j (e24)) = (e11)) = ((j (h (e12))) = (e11))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H17. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H92. % 217.93/218.17 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.17 cut (((j (e24)) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H113]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((j (h (e12))) = (j (h (e12))))); [ zenon_intro zenon_H11 | zenon_intro zenon_H12 ]. % 217.93/218.17 cut (((j (h (e12))) = (j (h (e12)))) = ((j (e24)) = (j (h (e12))))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H113. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H11. % 217.93/218.17 cut (((j (h (e12))) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H12]. % 217.93/218.17 cut (((j (h (e12))) = (j (e24)))); [idtac | apply NNPP; zenon_intro zenon_H110]. % 217.93/218.17 congruence. % 217.93/218.17 apply (zenon_L172_); trivial. % 217.93/218.17 apply zenon_H12. apply refl_equal. % 217.93/218.17 apply zenon_H12. apply refl_equal. % 217.93/218.17 apply zenon_H14. apply refl_equal. % 217.93/218.17 apply zenon_H12. apply refl_equal. % 217.93/218.17 apply zenon_H12. apply refl_equal. % 217.93/218.17 apply zenon_H14. apply refl_equal. % 217.93/218.17 apply zenon_H14. apply refl_equal. % 217.93/218.17 apply zenon_Ha. apply refl_equal. % 217.93/218.17 (* end of lemma zenon_L179_ *) % 217.93/218.17 assert (zenon_L180_ : (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> (~((e11) = (e12))) -> (~((e10) = (e12))) -> ((op2 (e23) (e23)) = (e24)) -> ((op1 (e13) (e13)) = (e10)) -> ((op1 (e14) (e14)) = (e10)) -> ((j (e23)) = (e13)) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> (~((e12) = (e13))) -> ((j (h (e12))) = (e12)) -> ((h (e12)) = (e24)) -> (~((e12) = (e14))) -> False). % 217.93/218.17 do 0 intro. intros zenon_H9e zenon_H15 zenon_Hb zenon_H83 zenon_Ha8 zenon_H6f zenon_Hb4 zenon_H8c zenon_H1f zenon_Hc zenon_H111 zenon_H26. % 217.93/218.17 apply (zenon_or_s _ _ zenon_H9e); [ zenon_intro zenon_H6b | zenon_intro zenon_H9f ]. % 217.93/218.17 apply (zenon_L177_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_H9f); [ zenon_intro zenon_H92 | zenon_intro zenon_Ha0 ]. % 217.93/218.17 apply (zenon_L179_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Ha0); [ zenon_intro zenon_H97 | zenon_intro zenon_Ha1 ]. % 217.93/218.17 apply (zenon_L112_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Ha1); [ zenon_intro zenon_H9a | zenon_intro zenon_H9b ]. % 217.93/218.17 apply (zenon_L173_); trivial. % 217.93/218.17 apply (zenon_L174_); trivial. % 217.93/218.17 (* end of lemma zenon_L180_ *) % 217.93/218.17 assert (zenon_L181_ : (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> (~((e10) = (e11))) -> (~((e10) = (e12))) -> ((op2 (e23) (e23)) = (e24)) -> ((j (e23)) = (e14)) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((op1 (e14) (e14)) = (e10)) -> (~((e12) = (e13))) -> ((j (h (e12))) = (e12)) -> ((h (e12)) = (e24)) -> (~((e12) = (e14))) -> False). % 217.93/218.17 do 0 intro. intros zenon_H9e zenon_H93 zenon_Hb zenon_H83 zenon_Hb5 zenon_H8c zenon_H6f zenon_H1f zenon_Hc zenon_H111 zenon_H26. % 217.93/218.17 apply (zenon_or_s _ _ zenon_H9e); [ zenon_intro zenon_H6b | zenon_intro zenon_H9f ]. % 217.93/218.17 apply (zenon_L177_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_H9f); [ zenon_intro zenon_H92 | zenon_intro zenon_Ha0 ]. % 217.93/218.17 apply (zenon_L135_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Ha0); [ zenon_intro zenon_H97 | zenon_intro zenon_Ha1 ]. % 217.93/218.17 apply (zenon_L136_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Ha1); [ zenon_intro zenon_H9a | zenon_intro zenon_H9b ]. % 217.93/218.17 apply (zenon_L173_); trivial. % 217.93/218.17 apply (zenon_L174_); trivial. % 217.93/218.17 (* end of lemma zenon_L181_ *) % 217.93/218.17 assert (zenon_L182_ : (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> ((op1 (e10) (e10)) = (e10)) -> (~((e11) = (e14))) -> ((h (e14)) = (e23)) -> ((j (h (e14))) = (e14)) -> ((op1 (e13) (e13)) = (e10)) -> (~((e11) = (e12))) -> (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> (~((e10) = (e11))) -> (~((e10) = (e12))) -> ((op2 (e23) (e23)) = (e24)) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((op1 (e14) (e14)) = (e10)) -> (~((e12) = (e13))) -> ((j (h (e12))) = (e12)) -> ((h (e12)) = (e24)) -> (~((e12) = (e14))) -> False). % 217.93/218.17 do 0 intro. intros zenon_Hb6 zenon_H6e zenon_Hc8 zenon_Hd9 zenon_Hc2 zenon_Ha8 zenon_H15 zenon_H9e zenon_H93 zenon_Hb zenon_H83 zenon_H8c zenon_H6f zenon_H1f zenon_Hc zenon_H111 zenon_H26. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb6); [ zenon_intro zenon_H86 | zenon_intro zenon_Hb7 ]. % 217.93/218.17 apply (zenon_L178_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb7); [ zenon_intro zenon_Hb2 | zenon_intro zenon_Hb8 ]. % 217.93/218.17 apply (zenon_L84_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb8); [ zenon_intro zenon_Hb3 | zenon_intro zenon_Hb9 ]. % 217.93/218.17 apply (zenon_L85_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb9); [ zenon_intro zenon_Hb4 | zenon_intro zenon_Hb5 ]. % 217.93/218.17 apply (zenon_L180_); trivial. % 217.93/218.17 apply (zenon_L181_); trivial. % 217.93/218.17 (* end of lemma zenon_L182_ *) % 217.93/218.17 assert (zenon_L183_ : (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> (~((e10) = (e14))) -> (~((e11) = (e14))) -> ((h (e14)) = (e24)) -> ((j (h (e14))) = (e14)) -> (~((e13) = (e14))) -> ((j (h (e12))) = (e12)) -> ((h (e12)) = (e24)) -> (~((e12) = (e14))) -> False). % 217.93/218.17 do 0 intro. intros zenon_H9e zenon_H47 zenon_Hc8 zenon_He1 zenon_Hc2 zenon_H5b zenon_Hc zenon_H111 zenon_H26. % 217.93/218.17 apply (zenon_or_s _ _ zenon_H9e); [ zenon_intro zenon_H6b | zenon_intro zenon_H9f ]. % 217.93/218.17 apply (zenon_L91_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_H9f); [ zenon_intro zenon_H92 | zenon_intro zenon_Ha0 ]. % 217.93/218.17 apply (zenon_L122_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Ha0); [ zenon_intro zenon_H97 | zenon_intro zenon_Ha1 ]. % 217.93/218.17 apply (zenon_L105_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Ha1); [ zenon_intro zenon_H9a | zenon_intro zenon_H9b ]. % 217.93/218.17 apply (zenon_L113_); trivial. % 217.93/218.17 apply (zenon_L174_); trivial. % 217.93/218.17 (* end of lemma zenon_L183_ *) % 217.93/218.17 assert (zenon_L184_ : (((h (e14)) = (e20))\/(((h (e14)) = (e21))\/(((h (e14)) = (e22))\/(((h (e14)) = (e23))\/((h (e14)) = (e24)))))) -> ((h (e10)) = (e20)) -> ((j (h (e10))) = (e10)) -> (((j (e20)) = (e10))\/(((j (e20)) = (e11))\/(((j (e20)) = (e12))\/(((j (e20)) = (e13))\/((j (e20)) = (e14)))))) -> ((h (e13)) = (e21)) -> ((j (h (e13))) = (e13)) -> (((j (e21)) = (e10))\/(((j (e21)) = (e11))\/(((j (e21)) = (e12))\/(((j (e21)) = (e13))\/((j (e21)) = (e14)))))) -> ((op2 (e22) (e22)) = (e23)) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> (~((e10) = (e13))) -> ((op2 (e24) (e24)) = (e22)) -> ((j (op2 (e24) (e24))) = (op1 (j (e24)) (j (e24)))) -> (((j (e22)) = (e10))\/(((j (e22)) = (e11))\/(((j (e22)) = (e12))\/(((j (e22)) = (e13))\/((j (e22)) = (e14)))))) -> (~((e12) = (e13))) -> ((op1 (e14) (e14)) = (e10)) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((op2 (e23) (e23)) = (e24)) -> (~((e10) = (e12))) -> (~((e10) = (e11))) -> (~((e11) = (e12))) -> ((op1 (e13) (e13)) = (e10)) -> ((op1 (e10) (e10)) = (e10)) -> (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> (~((e10) = (e14))) -> (~((e11) = (e14))) -> ((j (h (e14))) = (e14)) -> (~((e13) = (e14))) -> ((j (h (e12))) = (e12)) -> ((h (e12)) = (e24)) -> (~((e12) = (e14))) -> False). % 217.93/218.17 do 0 intro. intros zenon_Hf7 zenon_H1b zenon_H2c zenon_H2b zenon_H4f zenon_H3c zenon_H5f zenon_Ha3 zenon_Hac zenon_H3b zenon_H75 zenon_H74 zenon_Hbb zenon_H1f zenon_H6f zenon_H8c zenon_H83 zenon_Hb zenon_H93 zenon_H15 zenon_Ha8 zenon_H6e zenon_Hb6 zenon_H9e zenon_H47 zenon_Hc8 zenon_Hc2 zenon_H5b zenon_Hc zenon_H111 zenon_H26. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hf7); [ zenon_intro zenon_Hc0 | zenon_intro zenon_Hfb ]. % 217.93/218.17 apply (zenon_L60_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hfb); [ zenon_intro zenon_Hd0 | zenon_intro zenon_Hfc ]. % 217.93/218.17 apply (zenon_L154_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hfc); [ zenon_intro zenon_Hd4 | zenon_intro zenon_Hfd ]. % 217.93/218.17 apply (zenon_L176_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hfd); [ zenon_intro zenon_Hd9 | zenon_intro zenon_He1 ]. % 217.93/218.17 apply (zenon_L182_); trivial. % 217.93/218.17 apply (zenon_L183_); trivial. % 217.93/218.17 (* end of lemma zenon_L184_ *) % 217.93/218.17 assert (zenon_L185_ : (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> (~((e10) = (e13))) -> (~((e11) = (e13))) -> (~((e12) = (e14))) -> ((h (e12)) = (e24)) -> ((j (h (e12))) = (e12)) -> (~((e12) = (e13))) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((op1 (e14) (e14)) = (e10)) -> ((op1 (e13) (e13)) = (e10)) -> ((op2 (e23) (e23)) = (e24)) -> (~((e10) = (e12))) -> (~((e11) = (e12))) -> (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> ((j (h (e13))) = (e13)) -> ((h (e13)) = (e23)) -> (~((e13) = (e14))) -> False). % 217.93/218.17 do 0 intro. intros zenon_Hb6 zenon_H3b zenon_H42 zenon_H26 zenon_H111 zenon_Hc zenon_H1f zenon_H8c zenon_H6f zenon_Ha8 zenon_H83 zenon_Hb zenon_H15 zenon_H9e zenon_H3c zenon_Hdd zenon_H5b. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb6); [ zenon_intro zenon_H86 | zenon_intro zenon_Hb7 ]. % 217.93/218.17 apply (zenon_L114_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb7); [ zenon_intro zenon_Hb2 | zenon_intro zenon_Hb8 ]. % 217.93/218.17 apply (zenon_L99_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb8); [ zenon_intro zenon_Hb3 | zenon_intro zenon_Hb9 ]. % 217.93/218.17 apply (zenon_L169_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb9); [ zenon_intro zenon_Hb4 | zenon_intro zenon_Hb5 ]. % 217.93/218.17 apply (zenon_L180_); trivial. % 217.93/218.17 apply (zenon_L88_); trivial. % 217.93/218.17 (* end of lemma zenon_L185_ *) % 217.93/218.17 assert (zenon_L186_ : (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> (~((e10) = (e13))) -> (~((e11) = (e13))) -> (~((e12) = (e13))) -> ((h (e12)) = (e24)) -> ((j (h (e12))) = (e12)) -> ((j (h (e13))) = (e13)) -> ((h (e13)) = (e24)) -> (~((e13) = (e14))) -> False). % 217.93/218.17 do 0 intro. intros zenon_H9e zenon_H3b zenon_H42 zenon_H1f zenon_H111 zenon_Hc zenon_H3c zenon_Hf2 zenon_H5b. % 217.93/218.17 apply (zenon_or_s _ _ zenon_H9e); [ zenon_intro zenon_H6b | zenon_intro zenon_H9f ]. % 217.93/218.17 apply (zenon_L127_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_H9f); [ zenon_intro zenon_H92 | zenon_intro zenon_Ha0 ]. % 217.93/218.17 apply (zenon_L129_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Ha0); [ zenon_intro zenon_H97 | zenon_intro zenon_Ha1 ]. % 217.93/218.17 apply (zenon_L130_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Ha1); [ zenon_intro zenon_H9a | zenon_intro zenon_H9b ]. % 217.93/218.17 apply (zenon_L173_); trivial. % 217.93/218.17 apply (zenon_L131_); trivial. % 217.93/218.17 (* end of lemma zenon_L186_ *) % 217.93/218.17 assert (zenon_L187_ : (((h (e13)) = (e20))\/(((h (e13)) = (e21))\/(((h (e13)) = (e22))\/(((h (e13)) = (e23))\/((h (e13)) = (e24)))))) -> ((j (h (e14))) = (e14)) -> (~((e11) = (e14))) -> (((j (e21)) = (e10))\/(((j (e21)) = (e11))\/(((j (e21)) = (e12))\/(((j (e21)) = (e13))\/((j (e21)) = (e14)))))) -> (((j (e20)) = (e10))\/(((j (e20)) = (e11))\/(((j (e20)) = (e12))\/(((j (e20)) = (e13))\/((j (e20)) = (e14)))))) -> ((j (h (e10))) = (e10)) -> ((h (e10)) = (e20)) -> (((h (e14)) = (e20))\/(((h (e14)) = (e21))\/(((h (e14)) = (e22))\/(((h (e14)) = (e23))\/((h (e14)) = (e24)))))) -> ((op1 (e10) (e10)) = (e10)) -> ((j (op2 (e24) (e24))) = (op1 (j (e24)) (j (e24)))) -> ((op2 (e24) (e24)) = (e22)) -> (~((e10) = (e11))) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((op2 (e22) (e22)) = (e23)) -> (~((e10) = (e14))) -> (((j (e22)) = (e10))\/(((j (e22)) = (e11))\/(((j (e22)) = (e12))\/(((j (e22)) = (e13))\/((j (e22)) = (e14)))))) -> (~((e11) = (e12))) -> (~((e10) = (e12))) -> ((op2 (e23) (e23)) = (e24)) -> ((op1 (e13) (e13)) = (e10)) -> ((op1 (e14) (e14)) = (e10)) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> (~((e12) = (e14))) -> (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> (~((e10) = (e13))) -> (~((e11) = (e13))) -> (~((e12) = (e13))) -> ((h (e12)) = (e24)) -> ((j (h (e12))) = (e12)) -> ((j (h (e13))) = (e13)) -> (~((e13) = (e14))) -> False). % 217.93/218.17 do 0 intro. intros zenon_Hf6 zenon_Hc2 zenon_Hc8 zenon_H5f zenon_H2b zenon_H2c zenon_H1b zenon_Hf7 zenon_H6e zenon_H74 zenon_H75 zenon_H93 zenon_Hac zenon_Ha3 zenon_H47 zenon_Hbb zenon_H15 zenon_Hb zenon_H83 zenon_Ha8 zenon_H6f zenon_H8c zenon_H26 zenon_Hb6 zenon_H9e zenon_H3b zenon_H42 zenon_H1f zenon_H111 zenon_Hc zenon_H3c zenon_H5b. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hf6); [ zenon_intro zenon_H39 | zenon_intro zenon_Hf8 ]. % 217.93/218.17 apply (zenon_L18_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hf8); [ zenon_intro zenon_H4f | zenon_intro zenon_Hf9 ]. % 217.93/218.17 apply (zenon_L184_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hf9); [ zenon_intro zenon_H64 | zenon_intro zenon_Hfa ]. % 217.93/218.17 apply (zenon_L54_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hfa); [ zenon_intro zenon_Hdd | zenon_intro zenon_Hf2 ]. % 217.93/218.17 apply (zenon_L185_); trivial. % 217.93/218.17 apply (zenon_L186_); trivial. % 217.93/218.17 (* end of lemma zenon_L187_ *) % 217.93/218.17 assert (zenon_L188_ : (~((j (h (e11))) = (j (e21)))) -> ((h (e11)) = (e21)) -> False). % 217.93/218.17 do 0 intro. intros zenon_H114 zenon_H115. % 217.93/218.17 cut (((h (e11)) = (e21))); [idtac | apply NNPP; zenon_intro zenon_H116]. % 217.93/218.17 congruence. % 217.93/218.17 exact (zenon_H116 zenon_H115). % 217.93/218.17 (* end of lemma zenon_L188_ *) % 217.93/218.17 assert (zenon_L189_ : ((j (h (e11))) = (e11)) -> ((h (e11)) = (e21)) -> ((j (e21)) = (e13)) -> (~((e11) = (e13))) -> False). % 217.93/218.17 do 0 intro. intros zenon_H105 zenon_H115 zenon_H58 zenon_H42. % 217.93/218.17 elim (classic ((e13) = (e13))); [ zenon_intro zenon_H20 | zenon_intro zenon_H1d ]. % 217.93/218.17 cut (((e13) = (e13)) = ((e11) = (e13))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H42. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H20. % 217.93/218.17 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.17 cut (((e13) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H117]. % 217.93/218.17 congruence. % 217.93/218.17 cut (((j (h (e11))) = (e11)) = ((e13) = (e11))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H117. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H105. % 217.93/218.17 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.17 cut (((j (h (e11))) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H118]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((e13) = (e13))); [ zenon_intro zenon_H20 | zenon_intro zenon_H1d ]. % 217.93/218.17 cut (((e13) = (e13)) = ((j (h (e11))) = (e13))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H118. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H20. % 217.93/218.17 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.17 cut (((e13) = (j (h (e11))))); [idtac | apply NNPP; zenon_intro zenon_H119]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((j (h (e11))) = (j (h (e11))))); [ zenon_intro zenon_H109 | zenon_intro zenon_H10a ]. % 217.93/218.17 cut (((j (h (e11))) = (j (h (e11)))) = ((e13) = (j (h (e11))))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H119. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H109. % 217.93/218.17 cut (((j (h (e11))) = (j (h (e11))))); [idtac | apply NNPP; zenon_intro zenon_H10a]. % 217.93/218.17 cut (((j (h (e11))) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H118]. % 217.93/218.17 congruence. % 217.93/218.17 cut (((j (e21)) = (e13)) = ((j (h (e11))) = (e13))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H118. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H58. % 217.93/218.17 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.17 cut (((j (e21)) = (j (h (e11))))); [idtac | apply NNPP; zenon_intro zenon_H11a]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((j (h (e11))) = (j (h (e11))))); [ zenon_intro zenon_H109 | zenon_intro zenon_H10a ]. % 217.93/218.17 cut (((j (h (e11))) = (j (h (e11)))) = ((j (e21)) = (j (h (e11))))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H11a. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H109. % 217.93/218.17 cut (((j (h (e11))) = (j (h (e11))))); [idtac | apply NNPP; zenon_intro zenon_H10a]. % 217.93/218.17 cut (((j (h (e11))) = (j (e21)))); [idtac | apply NNPP; zenon_intro zenon_H114]. % 217.93/218.17 congruence. % 217.93/218.17 apply (zenon_L188_); trivial. % 217.93/218.17 apply zenon_H10a. apply refl_equal. % 217.93/218.17 apply zenon_H10a. apply refl_equal. % 217.93/218.17 apply zenon_H1d. apply refl_equal. % 217.93/218.17 apply zenon_H10a. apply refl_equal. % 217.93/218.17 apply zenon_H10a. apply refl_equal. % 217.93/218.17 apply zenon_H1d. apply refl_equal. % 217.93/218.17 apply zenon_H1d. apply refl_equal. % 217.93/218.17 apply zenon_H14. apply refl_equal. % 217.93/218.17 apply zenon_H1d. apply refl_equal. % 217.93/218.17 apply zenon_H1d. apply refl_equal. % 217.93/218.17 (* end of lemma zenon_L189_ *) % 217.93/218.17 assert (zenon_L190_ : (((j (e21)) = (e10))\/(((j (e21)) = (e11))\/(((j (e21)) = (e12))\/(((j (e21)) = (e13))\/((j (e21)) = (e14)))))) -> (~((e10) = (e13))) -> (~((e12) = (e13))) -> (~((e11) = (e13))) -> ((h (e11)) = (e21)) -> ((j (h (e11))) = (e11)) -> ((j (h (e13))) = (e13)) -> ((h (e13)) = (e21)) -> (~((e13) = (e14))) -> False). % 217.93/218.17 do 0 intro. intros zenon_H5f zenon_H3b zenon_H1f zenon_H42 zenon_H115 zenon_H105 zenon_H3c zenon_H4f zenon_H5b. % 217.93/218.17 apply (zenon_or_s _ _ zenon_H5f); [ zenon_intro zenon_H51 | zenon_intro zenon_H60 ]. % 217.93/218.17 apply (zenon_L20_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_H60); [ zenon_intro zenon_H53 | zenon_intro zenon_H61 ]. % 217.93/218.17 apply (zenon_L21_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_H61); [ zenon_intro zenon_H54 | zenon_intro zenon_H62 ]. % 217.93/218.17 apply (zenon_L22_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_H62); [ zenon_intro zenon_H58 | zenon_intro zenon_H5a ]. % 217.93/218.17 apply (zenon_L189_); trivial. % 217.93/218.17 apply (zenon_L25_); trivial. % 217.93/218.17 (* end of lemma zenon_L190_ *) % 217.93/218.17 assert (zenon_L191_ : (~((e10) = (e11))) -> ((j (h (e11))) = (e11)) -> ((h (e11)) = (e22)) -> ((j (e22)) = (e10)) -> False). % 217.93/218.17 do 0 intro. intros zenon_H93 zenon_H105 zenon_H11b zenon_H66. % 217.93/218.17 cut (((j (h (e11))) = (e11)) = ((e10) = (e11))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H93. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H105. % 217.93/218.17 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.17 cut (((j (h (e11))) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H11c]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((e10) = (e10))); [ zenon_intro zenon_Hf | zenon_intro zenon_H9 ]. % 217.93/218.17 cut (((e10) = (e10)) = ((j (h (e11))) = (e10))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H11c. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_Hf. % 217.93/218.17 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.17 cut (((e10) = (j (h (e11))))); [idtac | apply NNPP; zenon_intro zenon_H11d]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((j (h (e11))) = (j (h (e11))))); [ zenon_intro zenon_H109 | zenon_intro zenon_H10a ]. % 217.93/218.17 cut (((j (h (e11))) = (j (h (e11)))) = ((e10) = (j (h (e11))))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H11d. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H109. % 217.93/218.17 cut (((j (h (e11))) = (j (h (e11))))); [idtac | apply NNPP; zenon_intro zenon_H10a]. % 217.93/218.17 cut (((j (h (e11))) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H11c]. % 217.93/218.17 congruence. % 217.93/218.17 cut (((j (e22)) = (e10)) = ((j (h (e11))) = (e10))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H11c. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H66. % 217.93/218.17 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.17 cut (((j (e22)) = (j (h (e11))))); [idtac | apply NNPP; zenon_intro zenon_H11e]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((j (h (e11))) = (j (h (e11))))); [ zenon_intro zenon_H109 | zenon_intro zenon_H10a ]. % 217.93/218.17 cut (((j (h (e11))) = (j (h (e11)))) = ((j (e22)) = (j (h (e11))))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H11e. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H109. % 217.93/218.17 cut (((j (h (e11))) = (j (h (e11))))); [idtac | apply NNPP; zenon_intro zenon_H10a]. % 217.93/218.17 cut (((j (h (e11))) = (j (e22)))); [idtac | apply NNPP; zenon_intro zenon_H11f]. % 217.93/218.17 congruence. % 217.93/218.17 cut (((h (e11)) = (e22))); [idtac | apply NNPP; zenon_intro zenon_H120]. % 217.93/218.17 congruence. % 217.93/218.17 exact (zenon_H120 zenon_H11b). % 217.93/218.17 apply zenon_H10a. apply refl_equal. % 217.93/218.17 apply zenon_H10a. apply refl_equal. % 217.93/218.17 apply zenon_H9. apply refl_equal. % 217.93/218.17 apply zenon_H10a. apply refl_equal. % 217.93/218.17 apply zenon_H10a. apply refl_equal. % 217.93/218.17 apply zenon_H9. apply refl_equal. % 217.93/218.17 apply zenon_H9. apply refl_equal. % 217.93/218.17 apply zenon_H14. apply refl_equal. % 217.93/218.17 (* end of lemma zenon_L191_ *) % 217.93/218.17 assert (zenon_L192_ : (((j (e22)) = (e10))\/(((j (e22)) = (e11))\/(((j (e22)) = (e12))\/(((j (e22)) = (e13))\/((j (e22)) = (e14)))))) -> ((h (e11)) = (e22)) -> ((j (h (e11))) = (e11)) -> ((h (e12)) = (e23)) -> ((j (h (e12))) = (e12)) -> (~((e12) = (e13))) -> (~((e11) = (e12))) -> ((op1 (e12) (e12)) = (e10)) -> ((op1 (e13) (e13)) = (e10)) -> (~((e11) = (e14))) -> (~((e12) = (e14))) -> ((h (e14)) = (e24)) -> ((j (h (e14))) = (e14)) -> (~((e13) = (e14))) -> (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> ((op2 (e23) (e23)) = (e24)) -> ((op1 (e10) (e10)) = (e10)) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((j (op2 (e24) (e24))) = (op1 (j (e24)) (j (e24)))) -> ((op2 (e24) (e24)) = (e22)) -> (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> (~((e10) = (e11))) -> (~((e10) = (e12))) -> (~((e10) = (e13))) -> ((op1 (e14) (e14)) = (e10)) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((op2 (e22) (e22)) = (e23)) -> (~((e10) = (e14))) -> False). % 217.93/218.17 do 0 intro. intros zenon_Hbb zenon_H11b zenon_H105 zenon_H10d zenon_Hc zenon_H1f zenon_H15 zenon_He9 zenon_Ha8 zenon_Hc8 zenon_H26 zenon_He1 zenon_Hc2 zenon_H5b zenon_Hb6 zenon_H83 zenon_H6e zenon_H8c zenon_H74 zenon_H75 zenon_H9e zenon_H93 zenon_Hb zenon_H3b zenon_H6f zenon_Hac zenon_Ha3 zenon_H47. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hbb); [ zenon_intro zenon_H66 | zenon_intro zenon_Hbc ]. % 217.93/218.17 apply (zenon_L191_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hbc); [ zenon_intro zenon_H68 | zenon_intro zenon_Hbd ]. % 217.93/218.17 apply (zenon_L164_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hbd); [ zenon_intro zenon_H69 | zenon_intro zenon_Hbe ]. % 217.93/218.17 apply (zenon_L147_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hbe); [ zenon_intro zenon_H7d | zenon_intro zenon_Hba ]. % 217.93/218.17 apply (zenon_L123_); trivial. % 217.93/218.17 apply (zenon_L80_); trivial. % 217.93/218.17 (* end of lemma zenon_L192_ *) % 217.93/218.17 assert (zenon_L193_ : (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> (~((e12) = (e14))) -> ((h (e12)) = (e24)) -> ((j (h (e12))) = (e12)) -> (~((e12) = (e13))) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((op1 (e10) (e10)) = (e10)) -> ((op2 (e23) (e23)) = (e24)) -> ((j (op2 (e24) (e24))) = (op1 (j (e24)) (j (e24)))) -> ((op2 (e24) (e24)) = (e22)) -> (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> (~((e10) = (e11))) -> (~((e10) = (e12))) -> (~((e10) = (e13))) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((j (e22)) = (e13)) -> ((op1 (e14) (e14)) = (e10)) -> ((op1 (e13) (e13)) = (e10)) -> ((op2 (e22) (e22)) = (e23)) -> (~((e10) = (e14))) -> False). % 217.93/218.17 do 0 intro. intros zenon_Hb6 zenon_H26 zenon_H111 zenon_Hc zenon_H1f zenon_H8c zenon_H6e zenon_H83 zenon_H74 zenon_H75 zenon_H9e zenon_H93 zenon_Hb zenon_H3b zenon_Hac zenon_H7d zenon_H6f zenon_Ha8 zenon_Ha3 zenon_H47. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb6); [ zenon_intro zenon_H86 | zenon_intro zenon_Hb7 ]. % 217.93/218.17 apply (zenon_or_s _ _ zenon_H9e); [ zenon_intro zenon_H6b | zenon_intro zenon_H9f ]. % 217.93/218.17 apply (zenon_L34_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_H9f); [ zenon_intro zenon_H92 | zenon_intro zenon_Ha0 ]. % 217.93/218.17 apply (zenon_L39_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Ha0); [ zenon_intro zenon_H97 | zenon_intro zenon_Ha1 ]. % 217.93/218.17 apply (zenon_L40_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Ha1); [ zenon_intro zenon_H9a | zenon_intro zenon_H9b ]. % 217.93/218.17 apply (zenon_L173_); trivial. % 217.93/218.17 apply (zenon_L174_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb7); [ zenon_intro zenon_Hb2 | zenon_intro zenon_Hb8 ]. % 217.93/218.17 apply (zenon_L48_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb8); [ zenon_intro zenon_Hb3 | zenon_intro zenon_Hb9 ]. % 217.93/218.17 apply (zenon_L49_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb9); [ zenon_intro zenon_Hb4 | zenon_intro zenon_Hb5 ]. % 217.93/218.17 apply (zenon_L50_); trivial. % 217.93/218.17 apply (zenon_L51_); trivial. % 217.93/218.17 (* end of lemma zenon_L193_ *) % 217.93/218.17 assert (zenon_L194_ : (((j (e22)) = (e10))\/(((j (e22)) = (e11))\/(((j (e22)) = (e12))\/(((j (e22)) = (e13))\/((j (e22)) = (e14)))))) -> ((h (e11)) = (e22)) -> ((j (h (e11))) = (e11)) -> (~((e11) = (e13))) -> (~((e10) = (e14))) -> ((op2 (e22) (e22)) = (e23)) -> ((op1 (e13) (e13)) = (e10)) -> ((op1 (e14) (e14)) = (e10)) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> (~((e10) = (e13))) -> (~((e10) = (e12))) -> (~((e10) = (e11))) -> (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> ((op2 (e24) (e24)) = (e22)) -> ((j (op2 (e24) (e24))) = (op1 (j (e24)) (j (e24)))) -> ((op2 (e23) (e23)) = (e24)) -> ((op1 (e10) (e10)) = (e10)) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> (~((e12) = (e13))) -> ((j (h (e12))) = (e12)) -> ((h (e12)) = (e24)) -> (~((e12) = (e14))) -> (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> ((j (h (e13))) = (e13)) -> ((h (e13)) = (e22)) -> (~((e13) = (e14))) -> False). % 217.93/218.17 do 0 intro. intros zenon_Hbb zenon_H11b zenon_H105 zenon_H42 zenon_H47 zenon_Ha3 zenon_Ha8 zenon_H6f zenon_Hac zenon_H3b zenon_Hb zenon_H93 zenon_H9e zenon_H75 zenon_H74 zenon_H83 zenon_H6e zenon_H8c zenon_H1f zenon_Hc zenon_H111 zenon_H26 zenon_Hb6 zenon_H3c zenon_H64 zenon_H5b. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hbb); [ zenon_intro zenon_H66 | zenon_intro zenon_Hbc ]. % 217.93/218.17 apply (zenon_L191_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hbc); [ zenon_intro zenon_H68 | zenon_intro zenon_Hbd ]. % 217.93/218.17 apply (zenon_L29_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hbd); [ zenon_intro zenon_H69 | zenon_intro zenon_Hbe ]. % 217.93/218.17 apply (zenon_L30_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hbe); [ zenon_intro zenon_H7d | zenon_intro zenon_Hba ]. % 217.93/218.17 apply (zenon_L193_); trivial. % 217.93/218.17 apply (zenon_L53_); trivial. % 217.93/218.17 (* end of lemma zenon_L194_ *) % 217.93/218.17 assert (zenon_L195_ : (~((j (h (e11))) = (j (e23)))) -> ((h (e11)) = (e23)) -> False). % 217.93/218.17 do 0 intro. intros zenon_H121 zenon_H122. % 217.93/218.17 cut (((h (e11)) = (e23))); [idtac | apply NNPP; zenon_intro zenon_H123]. % 217.93/218.17 congruence. % 217.93/218.17 exact (zenon_H123 zenon_H122). % 217.93/218.17 (* end of lemma zenon_L195_ *) % 217.93/218.17 assert (zenon_L196_ : ((j (h (e11))) = (e11)) -> ((h (e11)) = (e23)) -> ((j (e23)) = (e13)) -> (~((e11) = (e13))) -> False). % 217.93/218.17 do 0 intro. intros zenon_H105 zenon_H122 zenon_Hb4 zenon_H42. % 217.93/218.17 elim (classic ((e13) = (e13))); [ zenon_intro zenon_H20 | zenon_intro zenon_H1d ]. % 217.93/218.17 cut (((e13) = (e13)) = ((e11) = (e13))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H42. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H20. % 217.93/218.17 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.17 cut (((e13) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H117]. % 217.93/218.17 congruence. % 217.93/218.17 cut (((j (h (e11))) = (e11)) = ((e13) = (e11))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H117. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H105. % 217.93/218.17 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.17 cut (((j (h (e11))) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H118]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((e13) = (e13))); [ zenon_intro zenon_H20 | zenon_intro zenon_H1d ]. % 217.93/218.17 cut (((e13) = (e13)) = ((j (h (e11))) = (e13))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H118. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H20. % 217.93/218.17 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.17 cut (((e13) = (j (h (e11))))); [idtac | apply NNPP; zenon_intro zenon_H119]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((j (h (e11))) = (j (h (e11))))); [ zenon_intro zenon_H109 | zenon_intro zenon_H10a ]. % 217.93/218.17 cut (((j (h (e11))) = (j (h (e11)))) = ((e13) = (j (h (e11))))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H119. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H109. % 217.93/218.17 cut (((j (h (e11))) = (j (h (e11))))); [idtac | apply NNPP; zenon_intro zenon_H10a]. % 217.93/218.17 cut (((j (h (e11))) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H118]. % 217.93/218.17 congruence. % 217.93/218.17 cut (((j (e23)) = (e13)) = ((j (h (e11))) = (e13))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H118. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_Hb4. % 217.93/218.17 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.17 cut (((j (e23)) = (j (h (e11))))); [idtac | apply NNPP; zenon_intro zenon_H124]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((j (h (e11))) = (j (h (e11))))); [ zenon_intro zenon_H109 | zenon_intro zenon_H10a ]. % 217.93/218.17 cut (((j (h (e11))) = (j (h (e11)))) = ((j (e23)) = (j (h (e11))))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H124. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H109. % 217.93/218.17 cut (((j (h (e11))) = (j (h (e11))))); [idtac | apply NNPP; zenon_intro zenon_H10a]. % 217.93/218.17 cut (((j (h (e11))) = (j (e23)))); [idtac | apply NNPP; zenon_intro zenon_H121]. % 217.93/218.17 congruence. % 217.93/218.17 apply (zenon_L195_); trivial. % 217.93/218.17 apply zenon_H10a. apply refl_equal. % 217.93/218.17 apply zenon_H10a. apply refl_equal. % 217.93/218.17 apply zenon_H1d. apply refl_equal. % 217.93/218.17 apply zenon_H10a. apply refl_equal. % 217.93/218.17 apply zenon_H10a. apply refl_equal. % 217.93/218.17 apply zenon_H1d. apply refl_equal. % 217.93/218.17 apply zenon_H1d. apply refl_equal. % 217.93/218.17 apply zenon_H14. apply refl_equal. % 217.93/218.17 apply zenon_H1d. apply refl_equal. % 217.93/218.17 apply zenon_H1d. apply refl_equal. % 217.93/218.17 (* end of lemma zenon_L196_ *) % 217.93/218.17 assert (zenon_L197_ : (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> (~((e10) = (e13))) -> (~((e12) = (e13))) -> (~((e11) = (e13))) -> ((h (e11)) = (e23)) -> ((j (h (e11))) = (e11)) -> ((j (h (e13))) = (e13)) -> ((h (e13)) = (e23)) -> (~((e13) = (e14))) -> False). % 217.93/218.17 do 0 intro. intros zenon_Hb6 zenon_H3b zenon_H1f zenon_H42 zenon_H122 zenon_H105 zenon_H3c zenon_Hdd zenon_H5b. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb6); [ zenon_intro zenon_H86 | zenon_intro zenon_Hb7 ]. % 217.93/218.17 apply (zenon_L114_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb7); [ zenon_intro zenon_Hb2 | zenon_intro zenon_Hb8 ]. % 217.93/218.17 apply (zenon_L99_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb8); [ zenon_intro zenon_Hb3 | zenon_intro zenon_Hb9 ]. % 217.93/218.17 apply (zenon_L169_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb9); [ zenon_intro zenon_Hb4 | zenon_intro zenon_Hb5 ]. % 217.93/218.17 apply (zenon_L196_); trivial. % 217.93/218.17 apply (zenon_L88_); trivial. % 217.93/218.17 (* end of lemma zenon_L197_ *) % 217.93/218.17 assert (zenon_L198_ : (~((e10) = (e11))) -> ((j (h (e11))) = (e11)) -> ((h (e11)) = (e23)) -> ((j (e23)) = (e10)) -> False). % 217.93/218.17 do 0 intro. intros zenon_H93 zenon_H105 zenon_H122 zenon_H86. % 217.93/218.17 cut (((j (h (e11))) = (e11)) = ((e10) = (e11))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H93. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H105. % 217.93/218.17 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.17 cut (((j (h (e11))) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H11c]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((e10) = (e10))); [ zenon_intro zenon_Hf | zenon_intro zenon_H9 ]. % 217.93/218.17 cut (((e10) = (e10)) = ((j (h (e11))) = (e10))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H11c. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_Hf. % 217.93/218.17 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.17 cut (((e10) = (j (h (e11))))); [idtac | apply NNPP; zenon_intro zenon_H11d]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((j (h (e11))) = (j (h (e11))))); [ zenon_intro zenon_H109 | zenon_intro zenon_H10a ]. % 217.93/218.17 cut (((j (h (e11))) = (j (h (e11)))) = ((e10) = (j (h (e11))))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H11d. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H109. % 217.93/218.17 cut (((j (h (e11))) = (j (h (e11))))); [idtac | apply NNPP; zenon_intro zenon_H10a]. % 217.93/218.17 cut (((j (h (e11))) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H11c]. % 217.93/218.17 congruence. % 217.93/218.17 cut (((j (e23)) = (e10)) = ((j (h (e11))) = (e10))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H11c. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H86. % 217.93/218.17 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.17 cut (((j (e23)) = (j (h (e11))))); [idtac | apply NNPP; zenon_intro zenon_H124]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((j (h (e11))) = (j (h (e11))))); [ zenon_intro zenon_H109 | zenon_intro zenon_H10a ]. % 217.93/218.17 cut (((j (h (e11))) = (j (h (e11)))) = ((j (e23)) = (j (h (e11))))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H124. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H109. % 217.93/218.17 cut (((j (h (e11))) = (j (h (e11))))); [idtac | apply NNPP; zenon_intro zenon_H10a]. % 217.93/218.17 cut (((j (h (e11))) = (j (e23)))); [idtac | apply NNPP; zenon_intro zenon_H121]. % 217.93/218.17 congruence. % 217.93/218.17 apply (zenon_L195_); trivial. % 217.93/218.17 apply zenon_H10a. apply refl_equal. % 217.93/218.17 apply zenon_H10a. apply refl_equal. % 217.93/218.17 apply zenon_H9. apply refl_equal. % 217.93/218.17 apply zenon_H10a. apply refl_equal. % 217.93/218.17 apply zenon_H10a. apply refl_equal. % 217.93/218.17 apply zenon_H9. apply refl_equal. % 217.93/218.17 apply zenon_H9. apply refl_equal. % 217.93/218.17 apply zenon_H14. apply refl_equal. % 217.93/218.17 (* end of lemma zenon_L198_ *) % 217.93/218.17 assert (zenon_L199_ : ((j (h (e11))) = (e11)) -> ((h (e11)) = (e23)) -> ((j (e23)) = (e12)) -> (~((e11) = (e12))) -> False). % 217.93/218.17 do 0 intro. intros zenon_H105 zenon_H122 zenon_Hb3 zenon_H15. % 217.93/218.17 elim (classic ((e12) = (e12))); [ zenon_intro zenon_H31 | zenon_intro zenon_Ha ]. % 217.93/218.17 cut (((e12) = (e12)) = ((e11) = (e12))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H15. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H31. % 217.93/218.17 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.17 cut (((e12) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H125]. % 217.93/218.17 congruence. % 217.93/218.17 cut (((j (h (e11))) = (e11)) = ((e12) = (e11))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H125. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H105. % 217.93/218.17 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.17 cut (((j (h (e11))) = (e12))); [idtac | apply NNPP; zenon_intro zenon_H126]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((e12) = (e12))); [ zenon_intro zenon_H31 | zenon_intro zenon_Ha ]. % 217.93/218.17 cut (((e12) = (e12)) = ((j (h (e11))) = (e12))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H126. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H31. % 217.93/218.17 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.17 cut (((e12) = (j (h (e11))))); [idtac | apply NNPP; zenon_intro zenon_H127]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((j (h (e11))) = (j (h (e11))))); [ zenon_intro zenon_H109 | zenon_intro zenon_H10a ]. % 217.93/218.17 cut (((j (h (e11))) = (j (h (e11)))) = ((e12) = (j (h (e11))))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H127. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H109. % 217.93/218.17 cut (((j (h (e11))) = (j (h (e11))))); [idtac | apply NNPP; zenon_intro zenon_H10a]. % 217.93/218.17 cut (((j (h (e11))) = (e12))); [idtac | apply NNPP; zenon_intro zenon_H126]. % 217.93/218.17 congruence. % 217.93/218.17 cut (((j (e23)) = (e12)) = ((j (h (e11))) = (e12))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H126. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_Hb3. % 217.93/218.17 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.17 cut (((j (e23)) = (j (h (e11))))); [idtac | apply NNPP; zenon_intro zenon_H124]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((j (h (e11))) = (j (h (e11))))); [ zenon_intro zenon_H109 | zenon_intro zenon_H10a ]. % 217.93/218.17 cut (((j (h (e11))) = (j (h (e11)))) = ((j (e23)) = (j (h (e11))))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H124. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H109. % 217.93/218.17 cut (((j (h (e11))) = (j (h (e11))))); [idtac | apply NNPP; zenon_intro zenon_H10a]. % 217.93/218.17 cut (((j (h (e11))) = (j (e23)))); [idtac | apply NNPP; zenon_intro zenon_H121]. % 217.93/218.17 congruence. % 217.93/218.17 apply (zenon_L195_); trivial. % 217.93/218.17 apply zenon_H10a. apply refl_equal. % 217.93/218.17 apply zenon_H10a. apply refl_equal. % 217.93/218.17 apply zenon_Ha. apply refl_equal. % 217.93/218.17 apply zenon_H10a. apply refl_equal. % 217.93/218.17 apply zenon_H10a. apply refl_equal. % 217.93/218.17 apply zenon_Ha. apply refl_equal. % 217.93/218.17 apply zenon_Ha. apply refl_equal. % 217.93/218.17 apply zenon_H14. apply refl_equal. % 217.93/218.17 apply zenon_Ha. apply refl_equal. % 217.93/218.17 apply zenon_Ha. apply refl_equal. % 217.93/218.17 (* end of lemma zenon_L199_ *) % 217.93/218.17 assert (zenon_L200_ : ((j (h (e11))) = (e11)) -> ((h (e11)) = (e23)) -> ((j (e23)) = (e14)) -> (~((e11) = (e14))) -> False). % 217.93/218.17 do 0 intro. intros zenon_H105 zenon_H122 zenon_Hb5 zenon_Hc8. % 217.93/218.17 elim (classic ((e14) = (e14))); [ zenon_intro zenon_H27 | zenon_intro zenon_H24 ]. % 217.93/218.17 cut (((e14) = (e14)) = ((e11) = (e14))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_Hc8. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H27. % 217.93/218.17 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.17 cut (((e14) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H106]. % 217.93/218.17 congruence. % 217.93/218.17 cut (((j (h (e11))) = (e11)) = ((e14) = (e11))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H106. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H105. % 217.93/218.17 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.17 cut (((j (h (e11))) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H107]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((e14) = (e14))); [ zenon_intro zenon_H27 | zenon_intro zenon_H24 ]. % 217.93/218.17 cut (((e14) = (e14)) = ((j (h (e11))) = (e14))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H107. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H27. % 217.93/218.17 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.17 cut (((e14) = (j (h (e11))))); [idtac | apply NNPP; zenon_intro zenon_H108]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((j (h (e11))) = (j (h (e11))))); [ zenon_intro zenon_H109 | zenon_intro zenon_H10a ]. % 217.93/218.17 cut (((j (h (e11))) = (j (h (e11)))) = ((e14) = (j (h (e11))))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H108. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H109. % 217.93/218.17 cut (((j (h (e11))) = (j (h (e11))))); [idtac | apply NNPP; zenon_intro zenon_H10a]. % 217.93/218.17 cut (((j (h (e11))) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H107]. % 217.93/218.17 congruence. % 217.93/218.17 cut (((j (e23)) = (e14)) = ((j (h (e11))) = (e14))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H107. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_Hb5. % 217.93/218.17 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.17 cut (((j (e23)) = (j (h (e11))))); [idtac | apply NNPP; zenon_intro zenon_H124]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((j (h (e11))) = (j (h (e11))))); [ zenon_intro zenon_H109 | zenon_intro zenon_H10a ]. % 217.93/218.17 cut (((j (h (e11))) = (j (h (e11)))) = ((j (e23)) = (j (h (e11))))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H124. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H109. % 217.93/218.17 cut (((j (h (e11))) = (j (h (e11))))); [idtac | apply NNPP; zenon_intro zenon_H10a]. % 217.93/218.17 cut (((j (h (e11))) = (j (e23)))); [idtac | apply NNPP; zenon_intro zenon_H121]. % 217.93/218.17 congruence. % 217.93/218.17 apply (zenon_L195_); trivial. % 217.93/218.17 apply zenon_H10a. apply refl_equal. % 217.93/218.17 apply zenon_H10a. apply refl_equal. % 217.93/218.17 apply zenon_H24. apply refl_equal. % 217.93/218.17 apply zenon_H10a. apply refl_equal. % 217.93/218.17 apply zenon_H10a. apply refl_equal. % 217.93/218.17 apply zenon_H24. apply refl_equal. % 217.93/218.17 apply zenon_H24. apply refl_equal. % 217.93/218.17 apply zenon_H14. apply refl_equal. % 217.93/218.17 apply zenon_H24. apply refl_equal. % 217.93/218.17 apply zenon_H24. apply refl_equal. % 217.93/218.17 (* end of lemma zenon_L200_ *) % 217.93/218.17 assert (zenon_L201_ : (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> (~((e10) = (e11))) -> ((op2 (e22) (e22)) = (e23)) -> ((j (e22)) = (e14)) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((op1 (e14) (e14)) = (e10)) -> (~((e11) = (e12))) -> (~((e11) = (e13))) -> ((j (h (e11))) = (e11)) -> ((h (e11)) = (e23)) -> (~((e11) = (e14))) -> False). % 217.93/218.17 do 0 intro. intros zenon_Hb6 zenon_H93 zenon_Ha3 zenon_Hba zenon_Hac zenon_H6f zenon_H15 zenon_H42 zenon_H105 zenon_H122 zenon_Hc8. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb6); [ zenon_intro zenon_H86 | zenon_intro zenon_Hb7 ]. % 217.93/218.17 apply (zenon_L198_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb7); [ zenon_intro zenon_Hb2 | zenon_intro zenon_Hb8 ]. % 217.93/218.17 apply (zenon_L76_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb8); [ zenon_intro zenon_Hb3 | zenon_intro zenon_Hb9 ]. % 217.93/218.17 apply (zenon_L199_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb9); [ zenon_intro zenon_Hb4 | zenon_intro zenon_Hb5 ]. % 217.93/218.17 apply (zenon_L196_); trivial. % 217.93/218.17 apply (zenon_L200_); trivial. % 217.93/218.17 (* end of lemma zenon_L201_ *) % 217.93/218.17 assert (zenon_L202_ : (((j (e22)) = (e10))\/(((j (e22)) = (e11))\/(((j (e22)) = (e12))\/(((j (e22)) = (e13))\/((j (e22)) = (e14)))))) -> (~((e10) = (e14))) -> (~((e12) = (e14))) -> ((h (e14)) = (e22)) -> ((j (h (e14))) = (e14)) -> (~((e13) = (e14))) -> (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> (~((e10) = (e11))) -> ((op2 (e22) (e22)) = (e23)) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((op1 (e14) (e14)) = (e10)) -> (~((e11) = (e12))) -> (~((e11) = (e13))) -> ((j (h (e11))) = (e11)) -> ((h (e11)) = (e23)) -> (~((e11) = (e14))) -> False). % 217.93/218.17 do 0 intro. intros zenon_Hbb zenon_H47 zenon_H26 zenon_Hd4 zenon_Hc2 zenon_H5b zenon_Hb6 zenon_H93 zenon_Ha3 zenon_Hac zenon_H6f zenon_H15 zenon_H42 zenon_H105 zenon_H122 zenon_Hc8. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hbb); [ zenon_intro zenon_H66 | zenon_intro zenon_Hbc ]. % 217.93/218.17 apply (zenon_L69_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hbc); [ zenon_intro zenon_H68 | zenon_intro zenon_Hbd ]. % 217.93/218.17 apply (zenon_L70_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hbd); [ zenon_intro zenon_H69 | zenon_intro zenon_Hbe ]. % 217.93/218.17 apply (zenon_L71_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hbe); [ zenon_intro zenon_H7d | zenon_intro zenon_Hba ]. % 217.93/218.17 apply (zenon_L72_); trivial. % 217.93/218.17 apply (zenon_L201_); trivial. % 217.93/218.17 (* end of lemma zenon_L202_ *) % 217.93/218.17 assert (zenon_L203_ : (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> (~((e10) = (e11))) -> ((op2 (e22) (e22)) = (e23)) -> ((op1 (e12) (e12)) = (e10)) -> ((op1 (e14) (e14)) = (e10)) -> ((j (e22)) = (e12)) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> (~((e11) = (e12))) -> (~((e11) = (e13))) -> ((j (h (e11))) = (e11)) -> ((h (e11)) = (e23)) -> (~((e11) = (e14))) -> False). % 217.93/218.17 do 0 intro. intros zenon_Hb6 zenon_H93 zenon_Ha3 zenon_He9 zenon_H6f zenon_H69 zenon_Hac zenon_H15 zenon_H42 zenon_H105 zenon_H122 zenon_Hc8. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb6); [ zenon_intro zenon_H86 | zenon_intro zenon_Hb7 ]. % 217.93/218.17 apply (zenon_L198_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb7); [ zenon_intro zenon_Hb2 | zenon_intro zenon_Hb8 ]. % 217.93/218.17 apply (zenon_L118_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb8); [ zenon_intro zenon_Hb3 | zenon_intro zenon_Hb9 ]. % 217.93/218.17 apply (zenon_L199_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb9); [ zenon_intro zenon_Hb4 | zenon_intro zenon_Hb5 ]. % 217.93/218.17 apply (zenon_L196_); trivial. % 217.93/218.17 apply (zenon_L200_); trivial. % 217.93/218.17 (* end of lemma zenon_L203_ *) % 217.93/218.17 assert (zenon_L204_ : (((j (e22)) = (e10))\/(((j (e22)) = (e11))\/(((j (e22)) = (e12))\/(((j (e22)) = (e13))\/((j (e22)) = (e14)))))) -> (~((e10) = (e12))) -> (~((e11) = (e14))) -> ((h (e11)) = (e23)) -> ((j (h (e11))) = (e11)) -> (~((e11) = (e13))) -> (~((e11) = (e12))) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((op1 (e14) (e14)) = (e10)) -> ((op1 (e12) (e12)) = (e10)) -> ((op2 (e22) (e22)) = (e23)) -> (~((e10) = (e11))) -> (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> (~((e12) = (e13))) -> ((j (h (e12))) = (e12)) -> ((h (e12)) = (e22)) -> (~((e12) = (e14))) -> False). % 217.93/218.17 do 0 intro. intros zenon_Hbb zenon_Hb zenon_Hc8 zenon_H122 zenon_H105 zenon_H42 zenon_H15 zenon_Hac zenon_H6f zenon_He9 zenon_Ha3 zenon_H93 zenon_Hb6 zenon_H1f zenon_Hc zenon_Hff zenon_H26. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hbb); [ zenon_intro zenon_H66 | zenon_intro zenon_Hbc ]. % 217.93/218.17 apply (zenon_L142_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hbc); [ zenon_intro zenon_H68 | zenon_intro zenon_Hbd ]. % 217.93/218.17 apply (zenon_L143_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hbd); [ zenon_intro zenon_H69 | zenon_intro zenon_Hbe ]. % 217.93/218.17 apply (zenon_L203_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hbe); [ zenon_intro zenon_H7d | zenon_intro zenon_Hba ]. % 217.93/218.17 apply (zenon_L148_); trivial. % 217.93/218.17 apply (zenon_L149_); trivial. % 217.93/218.17 (* end of lemma zenon_L204_ *) % 217.93/218.17 assert (zenon_L205_ : (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> (~((e10) = (e12))) -> (~((e11) = (e12))) -> ((h (e11)) = (e23)) -> ((j (h (e11))) = (e11)) -> (~((e12) = (e13))) -> ((j (h (e12))) = (e12)) -> ((h (e12)) = (e23)) -> (~((e12) = (e14))) -> False). % 217.93/218.17 do 0 intro. intros zenon_Hb6 zenon_Hb zenon_H15 zenon_H122 zenon_H105 zenon_H1f zenon_Hc zenon_H10d zenon_H26. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb6); [ zenon_intro zenon_H86 | zenon_intro zenon_Hb7 ]. % 217.93/218.17 apply (zenon_L156_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb7); [ zenon_intro zenon_Hb2 | zenon_intro zenon_Hb8 ]. % 217.93/218.17 apply (zenon_L163_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb8); [ zenon_intro zenon_Hb3 | zenon_intro zenon_Hb9 ]. % 217.93/218.17 apply (zenon_L199_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb9); [ zenon_intro zenon_Hb4 | zenon_intro zenon_Hb5 ]. % 217.93/218.17 apply (zenon_L157_); trivial. % 217.93/218.17 apply (zenon_L158_); trivial. % 217.93/218.17 (* end of lemma zenon_L205_ *) % 217.93/218.17 assert (zenon_L206_ : (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> (~((e10) = (e14))) -> (~((e12) = (e14))) -> ((h (e14)) = (e23)) -> ((j (h (e14))) = (e14)) -> (~((e13) = (e14))) -> ((j (h (e11))) = (e11)) -> ((h (e11)) = (e23)) -> (~((e11) = (e14))) -> False). % 217.93/218.17 do 0 intro. intros zenon_Hb6 zenon_H47 zenon_H26 zenon_Hd9 zenon_Hc2 zenon_H5b zenon_H105 zenon_H122 zenon_Hc8. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb6); [ zenon_intro zenon_H86 | zenon_intro zenon_Hb7 ]. % 217.93/218.17 apply (zenon_L83_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb7); [ zenon_intro zenon_Hb2 | zenon_intro zenon_Hb8 ]. % 217.93/218.17 apply (zenon_L84_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb8); [ zenon_intro zenon_Hb3 | zenon_intro zenon_Hb9 ]. % 217.93/218.17 apply (zenon_L85_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb9); [ zenon_intro zenon_Hb4 | zenon_intro zenon_Hb5 ]. % 217.93/218.17 apply (zenon_L86_); trivial. % 217.93/218.17 apply (zenon_L200_); trivial. % 217.93/218.17 (* end of lemma zenon_L206_ *) % 217.93/218.17 assert (zenon_L207_ : (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> (~((e10) = (e11))) -> ((op2 (e22) (e22)) = (e23)) -> ((op1 (e13) (e13)) = (e10)) -> ((op1 (e14) (e14)) = (e10)) -> ((j (e22)) = (e13)) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> (~((e11) = (e12))) -> (~((e11) = (e13))) -> ((j (h (e11))) = (e11)) -> ((h (e11)) = (e23)) -> (~((e11) = (e14))) -> False). % 217.93/218.17 do 0 intro. intros zenon_Hb6 zenon_H93 zenon_Ha3 zenon_Ha8 zenon_H6f zenon_H7d zenon_Hac zenon_H15 zenon_H42 zenon_H105 zenon_H122 zenon_Hc8. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb6); [ zenon_intro zenon_H86 | zenon_intro zenon_Hb7 ]. % 217.93/218.17 apply (zenon_L198_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb7); [ zenon_intro zenon_Hb2 | zenon_intro zenon_Hb8 ]. % 217.93/218.17 apply (zenon_L48_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb8); [ zenon_intro zenon_Hb3 | zenon_intro zenon_Hb9 ]. % 217.93/218.17 apply (zenon_L199_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hb9); [ zenon_intro zenon_Hb4 | zenon_intro zenon_Hb5 ]. % 217.93/218.17 apply (zenon_L196_); trivial. % 217.93/218.17 apply (zenon_L200_); trivial. % 217.93/218.17 (* end of lemma zenon_L207_ *) % 217.93/218.17 assert (zenon_L208_ : (((j (e22)) = (e10))\/(((j (e22)) = (e11))\/(((j (e22)) = (e12))\/(((j (e22)) = (e13))\/((j (e22)) = (e14)))))) -> (~((e10) = (e13))) -> (~((e12) = (e13))) -> (~((e11) = (e14))) -> ((h (e11)) = (e23)) -> ((j (h (e11))) = (e11)) -> (~((e11) = (e13))) -> (~((e11) = (e12))) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((op1 (e14) (e14)) = (e10)) -> ((op1 (e13) (e13)) = (e10)) -> ((op2 (e22) (e22)) = (e23)) -> (~((e10) = (e11))) -> (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> ((j (h (e13))) = (e13)) -> ((h (e13)) = (e22)) -> (~((e13) = (e14))) -> False). % 217.93/218.17 do 0 intro. intros zenon_Hbb zenon_H3b zenon_H1f zenon_Hc8 zenon_H122 zenon_H105 zenon_H42 zenon_H15 zenon_Hac zenon_H6f zenon_Ha8 zenon_Ha3 zenon_H93 zenon_Hb6 zenon_H3c zenon_H64 zenon_H5b. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hbb); [ zenon_intro zenon_H66 | zenon_intro zenon_Hbc ]. % 217.93/218.17 apply (zenon_L28_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hbc); [ zenon_intro zenon_H68 | zenon_intro zenon_Hbd ]. % 217.93/218.17 apply (zenon_L29_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hbd); [ zenon_intro zenon_H69 | zenon_intro zenon_Hbe ]. % 217.93/218.17 apply (zenon_L30_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_Hbe); [ zenon_intro zenon_H7d | zenon_intro zenon_Hba ]. % 217.93/218.17 apply (zenon_L207_); trivial. % 217.93/218.17 apply (zenon_L53_); trivial. % 217.93/218.17 (* end of lemma zenon_L208_ *) % 217.93/218.17 assert (zenon_L209_ : (((j (e20)) = (e10))\/(((j (e20)) = (e11))\/(((j (e20)) = (e12))\/(((j (e20)) = (e13))\/((j (e20)) = (e14)))))) -> (~((e10) = (e13))) -> (~((e11) = (e13))) -> ((h (e13)) = (e20)) -> ((j (h (e13))) = (e13)) -> (~((e12) = (e13))) -> ((j (h (e12))) = (e12)) -> ((h (e12)) = (e20)) -> (~((e12) = (e14))) -> False). % 217.93/218.17 do 0 intro. intros zenon_H2b zenon_H3b zenon_H42 zenon_H39 zenon_H3c zenon_H1f zenon_Hc zenon_H7 zenon_H26. % 217.93/218.17 apply (zenon_or_s _ _ zenon_H2b); [ zenon_intro zenon_Hd | zenon_intro zenon_H2d ]. % 217.93/218.17 apply (zenon_L14_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_H2d); [ zenon_intro zenon_H16 | zenon_intro zenon_H2e ]. % 217.93/218.17 apply (zenon_L15_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_H2e); [ zenon_intro zenon_H30 | zenon_intro zenon_H2f ]. % 217.93/218.17 apply (zenon_L16_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_H2f); [ zenon_intro zenon_H1e | zenon_intro zenon_H25 ]. % 217.93/218.17 apply (zenon_L9_); trivial. % 217.93/218.17 apply (zenon_L11_); trivial. % 217.93/218.17 (* end of lemma zenon_L209_ *) % 217.93/218.17 assert (zenon_L210_ : (((j (e20)) = (e10))\/(((j (e20)) = (e11))\/(((j (e20)) = (e12))\/(((j (e20)) = (e13))\/((j (e20)) = (e14)))))) -> (~((e10) = (e14))) -> (~((e11) = (e14))) -> ((h (e14)) = (e20)) -> ((j (h (e14))) = (e14)) -> (~((e13) = (e14))) -> ((j (h (e12))) = (e12)) -> ((h (e12)) = (e20)) -> (~((e12) = (e14))) -> False). % 217.93/218.17 do 0 intro. intros zenon_H2b zenon_H47 zenon_Hc8 zenon_Hc0 zenon_Hc2 zenon_H5b zenon_Hc zenon_H7 zenon_H26. % 217.93/218.17 apply (zenon_or_s _ _ zenon_H2b); [ zenon_intro zenon_Hd | zenon_intro zenon_H2d ]. % 217.93/218.17 apply (zenon_L56_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_H2d); [ zenon_intro zenon_H16 | zenon_intro zenon_H2e ]. % 217.93/218.17 apply (zenon_L57_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_H2e); [ zenon_intro zenon_H30 | zenon_intro zenon_H2f ]. % 217.93/218.17 apply (zenon_L58_); trivial. % 217.93/218.17 apply (zenon_or_s _ _ zenon_H2f); [ zenon_intro zenon_H1e | zenon_intro zenon_H25 ]. % 217.93/218.17 apply (zenon_L59_); trivial. % 217.93/218.17 apply (zenon_L11_); trivial. % 217.93/218.17 (* end of lemma zenon_L210_ *) % 217.93/218.17 assert (zenon_L211_ : (~((j (h (e11))) = (j (e24)))) -> ((h (e11)) = (e24)) -> False). % 217.93/218.17 do 0 intro. intros zenon_H128 zenon_H129. % 217.93/218.17 cut (((h (e11)) = (e24))); [idtac | apply NNPP; zenon_intro zenon_H12a]. % 217.93/218.17 congruence. % 217.93/218.17 exact (zenon_H12a zenon_H129). % 217.93/218.17 (* end of lemma zenon_L211_ *) % 217.93/218.17 assert (zenon_L212_ : (~((e10) = (e11))) -> ((j (h (e11))) = (e11)) -> ((h (e11)) = (e24)) -> ((j (e24)) = (e10)) -> False). % 217.93/218.17 do 0 intro. intros zenon_H93 zenon_H105 zenon_H129 zenon_H6b. % 217.93/218.17 cut (((j (h (e11))) = (e11)) = ((e10) = (e11))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H93. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H105. % 217.93/218.17 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.17 cut (((j (h (e11))) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H11c]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((e10) = (e10))); [ zenon_intro zenon_Hf | zenon_intro zenon_H9 ]. % 217.93/218.17 cut (((e10) = (e10)) = ((j (h (e11))) = (e10))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H11c. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_Hf. % 217.93/218.17 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.17 cut (((e10) = (j (h (e11))))); [idtac | apply NNPP; zenon_intro zenon_H11d]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((j (h (e11))) = (j (h (e11))))); [ zenon_intro zenon_H109 | zenon_intro zenon_H10a ]. % 217.93/218.17 cut (((j (h (e11))) = (j (h (e11)))) = ((e10) = (j (h (e11))))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H11d. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H109. % 217.93/218.17 cut (((j (h (e11))) = (j (h (e11))))); [idtac | apply NNPP; zenon_intro zenon_H10a]. % 217.93/218.17 cut (((j (h (e11))) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H11c]. % 217.93/218.17 congruence. % 217.93/218.17 cut (((j (e24)) = (e10)) = ((j (h (e11))) = (e10))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H11c. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H6b. % 217.93/218.17 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.17 cut (((j (e24)) = (j (h (e11))))); [idtac | apply NNPP; zenon_intro zenon_H12b]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((j (h (e11))) = (j (h (e11))))); [ zenon_intro zenon_H109 | zenon_intro zenon_H10a ]. % 217.93/218.17 cut (((j (h (e11))) = (j (h (e11)))) = ((j (e24)) = (j (h (e11))))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H12b. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H109. % 217.93/218.17 cut (((j (h (e11))) = (j (h (e11))))); [idtac | apply NNPP; zenon_intro zenon_H10a]. % 217.93/218.17 cut (((j (h (e11))) = (j (e24)))); [idtac | apply NNPP; zenon_intro zenon_H128]. % 217.93/218.17 congruence. % 217.93/218.17 apply (zenon_L211_); trivial. % 217.93/218.17 apply zenon_H10a. apply refl_equal. % 217.93/218.17 apply zenon_H10a. apply refl_equal. % 217.93/218.17 apply zenon_H9. apply refl_equal. % 217.93/218.17 apply zenon_H10a. apply refl_equal. % 217.93/218.17 apply zenon_H10a. apply refl_equal. % 217.93/218.17 apply zenon_H9. apply refl_equal. % 217.93/218.17 apply zenon_H9. apply refl_equal. % 217.93/218.17 apply zenon_H14. apply refl_equal. % 217.93/218.17 (* end of lemma zenon_L212_ *) % 217.93/218.17 assert (zenon_L213_ : ((j (h (e11))) = (e11)) -> ((h (e11)) = (e24)) -> ((j (e24)) = (e12)) -> (~((e11) = (e12))) -> False). % 217.93/218.17 do 0 intro. intros zenon_H105 zenon_H129 zenon_H97 zenon_H15. % 217.93/218.17 elim (classic ((e12) = (e12))); [ zenon_intro zenon_H31 | zenon_intro zenon_Ha ]. % 217.93/218.17 cut (((e12) = (e12)) = ((e11) = (e12))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H15. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H31. % 217.93/218.17 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.17 cut (((e12) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H125]. % 217.93/218.17 congruence. % 217.93/218.17 cut (((j (h (e11))) = (e11)) = ((e12) = (e11))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H125. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H105. % 217.93/218.17 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.17 cut (((j (h (e11))) = (e12))); [idtac | apply NNPP; zenon_intro zenon_H126]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((e12) = (e12))); [ zenon_intro zenon_H31 | zenon_intro zenon_Ha ]. % 217.93/218.17 cut (((e12) = (e12)) = ((j (h (e11))) = (e12))). % 217.93/218.17 intro zenon_D_pnotp. % 217.93/218.17 apply zenon_H126. % 217.93/218.17 rewrite <- zenon_D_pnotp. % 217.93/218.17 exact zenon_H31. % 217.93/218.17 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.17 cut (((e12) = (j (h (e11))))); [idtac | apply NNPP; zenon_intro zenon_H127]. % 217.93/218.17 congruence. % 217.93/218.17 elim (classic ((j (h (e11))) = (j (h (e11))))); [ zenon_intro zenon_H109 | zenon_intro zenon_H10a ]. % 217.93/218.18 cut (((j (h (e11))) = (j (h (e11)))) = ((e12) = (j (h (e11))))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H127. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H109. % 217.93/218.18 cut (((j (h (e11))) = (j (h (e11))))); [idtac | apply NNPP; zenon_intro zenon_H10a]. % 217.93/218.18 cut (((j (h (e11))) = (e12))); [idtac | apply NNPP; zenon_intro zenon_H126]. % 217.93/218.18 congruence. % 217.93/218.18 cut (((j (e24)) = (e12)) = ((j (h (e11))) = (e12))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H126. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H97. % 217.93/218.18 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.18 cut (((j (e24)) = (j (h (e11))))); [idtac | apply NNPP; zenon_intro zenon_H12b]. % 217.93/218.18 congruence. % 217.93/218.18 elim (classic ((j (h (e11))) = (j (h (e11))))); [ zenon_intro zenon_H109 | zenon_intro zenon_H10a ]. % 217.93/218.18 cut (((j (h (e11))) = (j (h (e11)))) = ((j (e24)) = (j (h (e11))))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H12b. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H109. % 217.93/218.18 cut (((j (h (e11))) = (j (h (e11))))); [idtac | apply NNPP; zenon_intro zenon_H10a]. % 217.93/218.18 cut (((j (h (e11))) = (j (e24)))); [idtac | apply NNPP; zenon_intro zenon_H128]. % 217.93/218.18 congruence. % 217.93/218.18 apply (zenon_L211_); trivial. % 217.93/218.18 apply zenon_H10a. apply refl_equal. % 217.93/218.18 apply zenon_H10a. apply refl_equal. % 217.93/218.18 apply zenon_Ha. apply refl_equal. % 217.93/218.18 apply zenon_H10a. apply refl_equal. % 217.93/218.18 apply zenon_H10a. apply refl_equal. % 217.93/218.18 apply zenon_Ha. apply refl_equal. % 217.93/218.18 apply zenon_Ha. apply refl_equal. % 217.93/218.18 apply zenon_H14. apply refl_equal. % 217.93/218.18 apply zenon_Ha. apply refl_equal. % 217.93/218.18 apply zenon_Ha. apply refl_equal. % 217.93/218.18 (* end of lemma zenon_L213_ *) % 217.93/218.18 assert (zenon_L214_ : ((j (h (e11))) = (e11)) -> ((h (e11)) = (e24)) -> ((j (e24)) = (e13)) -> (~((e11) = (e13))) -> False). % 217.93/218.18 do 0 intro. intros zenon_H105 zenon_H129 zenon_H9a zenon_H42. % 217.93/218.18 elim (classic ((e13) = (e13))); [ zenon_intro zenon_H20 | zenon_intro zenon_H1d ]. % 217.93/218.18 cut (((e13) = (e13)) = ((e11) = (e13))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H42. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H20. % 217.93/218.18 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.18 cut (((e13) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H117]. % 217.93/218.18 congruence. % 217.93/218.18 cut (((j (h (e11))) = (e11)) = ((e13) = (e11))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H117. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H105. % 217.93/218.18 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.18 cut (((j (h (e11))) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H118]. % 217.93/218.18 congruence. % 217.93/218.18 elim (classic ((e13) = (e13))); [ zenon_intro zenon_H20 | zenon_intro zenon_H1d ]. % 217.93/218.18 cut (((e13) = (e13)) = ((j (h (e11))) = (e13))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H118. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H20. % 217.93/218.18 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.18 cut (((e13) = (j (h (e11))))); [idtac | apply NNPP; zenon_intro zenon_H119]. % 217.93/218.18 congruence. % 217.93/218.18 elim (classic ((j (h (e11))) = (j (h (e11))))); [ zenon_intro zenon_H109 | zenon_intro zenon_H10a ]. % 217.93/218.18 cut (((j (h (e11))) = (j (h (e11)))) = ((e13) = (j (h (e11))))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H119. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H109. % 217.93/218.18 cut (((j (h (e11))) = (j (h (e11))))); [idtac | apply NNPP; zenon_intro zenon_H10a]. % 217.93/218.18 cut (((j (h (e11))) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H118]. % 217.93/218.18 congruence. % 217.93/218.18 cut (((j (e24)) = (e13)) = ((j (h (e11))) = (e13))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H118. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H9a. % 217.93/218.18 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.18 cut (((j (e24)) = (j (h (e11))))); [idtac | apply NNPP; zenon_intro zenon_H12b]. % 217.93/218.18 congruence. % 217.93/218.18 elim (classic ((j (h (e11))) = (j (h (e11))))); [ zenon_intro zenon_H109 | zenon_intro zenon_H10a ]. % 217.93/218.18 cut (((j (h (e11))) = (j (h (e11)))) = ((j (e24)) = (j (h (e11))))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H12b. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H109. % 217.93/218.18 cut (((j (h (e11))) = (j (h (e11))))); [idtac | apply NNPP; zenon_intro zenon_H10a]. % 217.93/218.18 cut (((j (h (e11))) = (j (e24)))); [idtac | apply NNPP; zenon_intro zenon_H128]. % 217.93/218.18 congruence. % 217.93/218.18 apply (zenon_L211_); trivial. % 217.93/218.18 apply zenon_H10a. apply refl_equal. % 217.93/218.18 apply zenon_H10a. apply refl_equal. % 217.93/218.18 apply zenon_H1d. apply refl_equal. % 217.93/218.18 apply zenon_H10a. apply refl_equal. % 217.93/218.18 apply zenon_H10a. apply refl_equal. % 217.93/218.18 apply zenon_H1d. apply refl_equal. % 217.93/218.18 apply zenon_H1d. apply refl_equal. % 217.93/218.18 apply zenon_H14. apply refl_equal. % 217.93/218.18 apply zenon_H1d. apply refl_equal. % 217.93/218.18 apply zenon_H1d. apply refl_equal. % 217.93/218.18 (* end of lemma zenon_L214_ *) % 217.93/218.18 assert (zenon_L215_ : ((j (h (e11))) = (e11)) -> ((h (e11)) = (e24)) -> ((j (e24)) = (e14)) -> (~((e11) = (e14))) -> False). % 217.93/218.18 do 0 intro. intros zenon_H105 zenon_H129 zenon_H9b zenon_Hc8. % 217.93/218.18 elim (classic ((e14) = (e14))); [ zenon_intro zenon_H27 | zenon_intro zenon_H24 ]. % 217.93/218.18 cut (((e14) = (e14)) = ((e11) = (e14))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_Hc8. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H27. % 217.93/218.18 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.18 cut (((e14) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H106]. % 217.93/218.18 congruence. % 217.93/218.18 cut (((j (h (e11))) = (e11)) = ((e14) = (e11))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H106. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H105. % 217.93/218.18 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.18 cut (((j (h (e11))) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H107]. % 217.93/218.18 congruence. % 217.93/218.18 elim (classic ((e14) = (e14))); [ zenon_intro zenon_H27 | zenon_intro zenon_H24 ]. % 217.93/218.18 cut (((e14) = (e14)) = ((j (h (e11))) = (e14))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H107. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H27. % 217.93/218.18 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.18 cut (((e14) = (j (h (e11))))); [idtac | apply NNPP; zenon_intro zenon_H108]. % 217.93/218.18 congruence. % 217.93/218.18 elim (classic ((j (h (e11))) = (j (h (e11))))); [ zenon_intro zenon_H109 | zenon_intro zenon_H10a ]. % 217.93/218.18 cut (((j (h (e11))) = (j (h (e11)))) = ((e14) = (j (h (e11))))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H108. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H109. % 217.93/218.18 cut (((j (h (e11))) = (j (h (e11))))); [idtac | apply NNPP; zenon_intro zenon_H10a]. % 217.93/218.18 cut (((j (h (e11))) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H107]. % 217.93/218.18 congruence. % 217.93/218.18 cut (((j (e24)) = (e14)) = ((j (h (e11))) = (e14))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H107. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H9b. % 217.93/218.18 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.18 cut (((j (e24)) = (j (h (e11))))); [idtac | apply NNPP; zenon_intro zenon_H12b]. % 217.93/218.18 congruence. % 217.93/218.18 elim (classic ((j (h (e11))) = (j (h (e11))))); [ zenon_intro zenon_H109 | zenon_intro zenon_H10a ]. % 217.93/218.18 cut (((j (h (e11))) = (j (h (e11)))) = ((j (e24)) = (j (h (e11))))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H12b. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H109. % 217.93/218.18 cut (((j (h (e11))) = (j (h (e11))))); [idtac | apply NNPP; zenon_intro zenon_H10a]. % 217.93/218.18 cut (((j (h (e11))) = (j (e24)))); [idtac | apply NNPP; zenon_intro zenon_H128]. % 217.93/218.18 congruence. % 217.93/218.18 apply (zenon_L211_); trivial. % 217.93/218.18 apply zenon_H10a. apply refl_equal. % 217.93/218.18 apply zenon_H10a. apply refl_equal. % 217.93/218.18 apply zenon_H24. apply refl_equal. % 217.93/218.18 apply zenon_H10a. apply refl_equal. % 217.93/218.18 apply zenon_H10a. apply refl_equal. % 217.93/218.18 apply zenon_H24. apply refl_equal. % 217.93/218.18 apply zenon_H24. apply refl_equal. % 217.93/218.18 apply zenon_H14. apply refl_equal. % 217.93/218.18 apply zenon_H24. apply refl_equal. % 217.93/218.18 apply zenon_H24. apply refl_equal. % 217.93/218.18 (* end of lemma zenon_L215_ *) % 217.93/218.18 assert (zenon_L216_ : (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> (~((e10) = (e14))) -> (~((e12) = (e14))) -> ((h (e14)) = (e23)) -> ((j (h (e14))) = (e14)) -> (~((e13) = (e14))) -> (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> (~((e10) = (e11))) -> ((op2 (e23) (e23)) = (e24)) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((op1 (e14) (e14)) = (e10)) -> (~((e11) = (e12))) -> (~((e11) = (e13))) -> ((j (h (e11))) = (e11)) -> ((h (e11)) = (e24)) -> (~((e11) = (e14))) -> False). % 217.93/218.18 do 0 intro. intros zenon_Hb6 zenon_H47 zenon_H26 zenon_Hd9 zenon_Hc2 zenon_H5b zenon_H9e zenon_H93 zenon_H83 zenon_H8c zenon_H6f zenon_H15 zenon_H42 zenon_H105 zenon_H129 zenon_Hc8. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb6); [ zenon_intro zenon_H86 | zenon_intro zenon_Hb7 ]. % 217.93/218.18 apply (zenon_L83_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb7); [ zenon_intro zenon_Hb2 | zenon_intro zenon_Hb8 ]. % 217.93/218.18 apply (zenon_L84_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb8); [ zenon_intro zenon_Hb3 | zenon_intro zenon_Hb9 ]. % 217.93/218.18 apply (zenon_L85_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb9); [ zenon_intro zenon_Hb4 | zenon_intro zenon_Hb5 ]. % 217.93/218.18 apply (zenon_L86_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_H9e); [ zenon_intro zenon_H6b | zenon_intro zenon_H9f ]. % 217.93/218.18 apply (zenon_L212_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_H9f); [ zenon_intro zenon_H92 | zenon_intro zenon_Ha0 ]. % 217.93/218.18 apply (zenon_L135_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Ha0); [ zenon_intro zenon_H97 | zenon_intro zenon_Ha1 ]. % 217.93/218.18 apply (zenon_L213_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Ha1); [ zenon_intro zenon_H9a | zenon_intro zenon_H9b ]. % 217.93/218.18 apply (zenon_L214_); trivial. % 217.93/218.18 apply (zenon_L215_); trivial. % 217.93/218.18 (* end of lemma zenon_L216_ *) % 217.93/218.18 assert (zenon_L217_ : (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> (~((e10) = (e14))) -> (~((e12) = (e14))) -> ((h (e14)) = (e24)) -> ((j (h (e14))) = (e14)) -> (~((e13) = (e14))) -> ((j (h (e11))) = (e11)) -> ((h (e11)) = (e24)) -> (~((e11) = (e14))) -> False). % 217.93/218.18 do 0 intro. intros zenon_H9e zenon_H47 zenon_H26 zenon_He1 zenon_Hc2 zenon_H5b zenon_H105 zenon_H129 zenon_Hc8. % 217.93/218.18 apply (zenon_or_s _ _ zenon_H9e); [ zenon_intro zenon_H6b | zenon_intro zenon_H9f ]. % 217.93/218.18 apply (zenon_L91_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_H9f); [ zenon_intro zenon_H92 | zenon_intro zenon_Ha0 ]. % 217.93/218.18 apply (zenon_L122_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Ha0); [ zenon_intro zenon_H97 | zenon_intro zenon_Ha1 ]. % 217.93/218.18 apply (zenon_L105_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Ha1); [ zenon_intro zenon_H9a | zenon_intro zenon_H9b ]. % 217.93/218.18 apply (zenon_L113_); trivial. % 217.93/218.18 apply (zenon_L215_); trivial. % 217.93/218.18 (* end of lemma zenon_L217_ *) % 217.93/218.18 assert (zenon_L218_ : (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> (~((e11) = (e14))) -> ((h (e11)) = (e24)) -> ((j (h (e11))) = (e11)) -> (~((e11) = (e13))) -> (~((e11) = (e12))) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((op1 (e10) (e10)) = (e10)) -> ((op2 (e23) (e23)) = (e24)) -> ((j (op2 (e24) (e24))) = (op1 (j (e24)) (j (e24)))) -> ((op2 (e24) (e24)) = (e22)) -> (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> (~((e10) = (e11))) -> (~((e10) = (e12))) -> (~((e10) = (e13))) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((j (e22)) = (e12)) -> ((op1 (e14) (e14)) = (e10)) -> ((op1 (e12) (e12)) = (e10)) -> ((op2 (e22) (e22)) = (e23)) -> (~((e10) = (e14))) -> False). % 217.93/218.18 do 0 intro. intros zenon_Hb6 zenon_Hc8 zenon_H129 zenon_H105 zenon_H42 zenon_H15 zenon_H8c zenon_H6e zenon_H83 zenon_H74 zenon_H75 zenon_H9e zenon_H93 zenon_Hb zenon_H3b zenon_Hac zenon_H69 zenon_H6f zenon_He9 zenon_Ha3 zenon_H47. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb6); [ zenon_intro zenon_H86 | zenon_intro zenon_Hb7 ]. % 217.93/218.18 apply (zenon_or_s _ _ zenon_H9e); [ zenon_intro zenon_H6b | zenon_intro zenon_H9f ]. % 217.93/218.18 apply (zenon_L144_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_H9f); [ zenon_intro zenon_H92 | zenon_intro zenon_Ha0 ]. % 217.93/218.18 apply (zenon_L39_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Ha0); [ zenon_intro zenon_H97 | zenon_intro zenon_Ha1 ]. % 217.93/218.18 apply (zenon_L213_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Ha1); [ zenon_intro zenon_H9a | zenon_intro zenon_H9b ]. % 217.93/218.18 apply (zenon_L214_); trivial. % 217.93/218.18 apply (zenon_L215_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb7); [ zenon_intro zenon_Hb2 | zenon_intro zenon_Hb8 ]. % 217.93/218.18 apply (zenon_L118_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb8); [ zenon_intro zenon_Hb3 | zenon_intro zenon_Hb9 ]. % 217.93/218.18 apply (zenon_L119_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb9); [ zenon_intro zenon_Hb4 | zenon_intro zenon_Hb5 ]. % 217.93/218.18 apply (zenon_L120_); trivial. % 217.93/218.18 apply (zenon_L146_); trivial. % 217.93/218.18 (* end of lemma zenon_L218_ *) % 217.93/218.18 assert (zenon_L219_ : (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> (~((e11) = (e14))) -> ((h (e11)) = (e24)) -> ((j (h (e11))) = (e11)) -> (~((e11) = (e13))) -> (~((e11) = (e12))) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((op1 (e10) (e10)) = (e10)) -> ((op2 (e23) (e23)) = (e24)) -> ((j (op2 (e24) (e24))) = (op1 (j (e24)) (j (e24)))) -> ((op2 (e24) (e24)) = (e22)) -> (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> (~((e10) = (e11))) -> (~((e10) = (e12))) -> (~((e10) = (e13))) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((j (e22)) = (e13)) -> ((op1 (e14) (e14)) = (e10)) -> ((op1 (e13) (e13)) = (e10)) -> ((op2 (e22) (e22)) = (e23)) -> (~((e10) = (e14))) -> False). % 217.93/218.18 do 0 intro. intros zenon_Hb6 zenon_Hc8 zenon_H129 zenon_H105 zenon_H42 zenon_H15 zenon_H8c zenon_H6e zenon_H83 zenon_H74 zenon_H75 zenon_H9e zenon_H93 zenon_Hb zenon_H3b zenon_Hac zenon_H7d zenon_H6f zenon_Ha8 zenon_Ha3 zenon_H47. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb6); [ zenon_intro zenon_H86 | zenon_intro zenon_Hb7 ]. % 217.93/218.18 apply (zenon_or_s _ _ zenon_H9e); [ zenon_intro zenon_H6b | zenon_intro zenon_H9f ]. % 217.93/218.18 apply (zenon_L34_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_H9f); [ zenon_intro zenon_H92 | zenon_intro zenon_Ha0 ]. % 217.93/218.18 apply (zenon_L39_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Ha0); [ zenon_intro zenon_H97 | zenon_intro zenon_Ha1 ]. % 217.93/218.18 apply (zenon_L213_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Ha1); [ zenon_intro zenon_H9a | zenon_intro zenon_H9b ]. % 217.93/218.18 apply (zenon_L214_); trivial. % 217.93/218.18 apply (zenon_L215_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb7); [ zenon_intro zenon_Hb2 | zenon_intro zenon_Hb8 ]. % 217.93/218.18 apply (zenon_L48_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb8); [ zenon_intro zenon_Hb3 | zenon_intro zenon_Hb9 ]. % 217.93/218.18 apply (zenon_L49_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb9); [ zenon_intro zenon_Hb4 | zenon_intro zenon_Hb5 ]. % 217.93/218.18 apply (zenon_L50_); trivial. % 217.93/218.18 apply (zenon_L51_); trivial. % 217.93/218.18 (* end of lemma zenon_L219_ *) % 217.93/218.18 assert (zenon_L220_ : (((j (e22)) = (e10))\/(((j (e22)) = (e11))\/(((j (e22)) = (e12))\/(((j (e22)) = (e13))\/((j (e22)) = (e14)))))) -> ((op1 (e12) (e12)) = (e10)) -> (~((e10) = (e14))) -> ((op2 (e22) (e22)) = (e23)) -> ((op1 (e13) (e13)) = (e10)) -> ((op1 (e14) (e14)) = (e10)) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> (~((e10) = (e13))) -> (~((e10) = (e12))) -> (~((e10) = (e11))) -> (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> ((op2 (e24) (e24)) = (e22)) -> ((j (op2 (e24) (e24))) = (op1 (j (e24)) (j (e24)))) -> ((op2 (e23) (e23)) = (e24)) -> ((op1 (e10) (e10)) = (e10)) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> (~((e11) = (e12))) -> (~((e11) = (e13))) -> ((j (h (e11))) = (e11)) -> ((h (e11)) = (e24)) -> (~((e11) = (e14))) -> (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> ((j (h (e13))) = (e13)) -> ((h (e13)) = (e22)) -> (~((e13) = (e14))) -> False). % 217.93/218.18 do 0 intro. intros zenon_Hbb zenon_He9 zenon_H47 zenon_Ha3 zenon_Ha8 zenon_H6f zenon_Hac zenon_H3b zenon_Hb zenon_H93 zenon_H9e zenon_H75 zenon_H74 zenon_H83 zenon_H6e zenon_H8c zenon_H15 zenon_H42 zenon_H105 zenon_H129 zenon_Hc8 zenon_Hb6 zenon_H3c zenon_H64 zenon_H5b. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hbb); [ zenon_intro zenon_H66 | zenon_intro zenon_Hbc ]. % 217.93/218.18 apply (zenon_L28_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hbc); [ zenon_intro zenon_H68 | zenon_intro zenon_Hbd ]. % 217.93/218.18 apply (zenon_L29_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hbd); [ zenon_intro zenon_H69 | zenon_intro zenon_Hbe ]. % 217.93/218.18 apply (zenon_L218_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hbe); [ zenon_intro zenon_H7d | zenon_intro zenon_Hba ]. % 217.93/218.18 apply (zenon_L219_); trivial. % 217.93/218.18 apply (zenon_L53_); trivial. % 217.93/218.18 (* end of lemma zenon_L220_ *) % 217.93/218.18 assert (zenon_L221_ : (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> (~((e10) = (e13))) -> (~((e12) = (e13))) -> (~((e11) = (e14))) -> ((h (e11)) = (e24)) -> ((j (h (e11))) = (e11)) -> (~((e11) = (e13))) -> (~((e11) = (e12))) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((op1 (e14) (e14)) = (e10)) -> ((op1 (e13) (e13)) = (e10)) -> ((op2 (e23) (e23)) = (e24)) -> (~((e10) = (e11))) -> (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> ((j (h (e13))) = (e13)) -> ((h (e13)) = (e23)) -> (~((e13) = (e14))) -> False). % 217.93/218.18 do 0 intro. intros zenon_Hb6 zenon_H3b zenon_H1f zenon_Hc8 zenon_H129 zenon_H105 zenon_H42 zenon_H15 zenon_H8c zenon_H6f zenon_Ha8 zenon_H83 zenon_H93 zenon_H9e zenon_H3c zenon_Hdd zenon_H5b. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb6); [ zenon_intro zenon_H86 | zenon_intro zenon_Hb7 ]. % 217.93/218.18 apply (zenon_L114_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb7); [ zenon_intro zenon_Hb2 | zenon_intro zenon_Hb8 ]. % 217.93/218.18 apply (zenon_L99_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb8); [ zenon_intro zenon_Hb3 | zenon_intro zenon_Hb9 ]. % 217.93/218.18 apply (zenon_L169_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb9); [ zenon_intro zenon_Hb4 | zenon_intro zenon_Hb5 ]. % 217.93/218.18 apply (zenon_or_s _ _ zenon_H9e); [ zenon_intro zenon_H6b | zenon_intro zenon_H9f ]. % 217.93/218.18 apply (zenon_L212_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_H9f); [ zenon_intro zenon_H92 | zenon_intro zenon_Ha0 ]. % 217.93/218.18 apply (zenon_L111_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Ha0); [ zenon_intro zenon_H97 | zenon_intro zenon_Ha1 ]. % 217.93/218.18 apply (zenon_L213_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Ha1); [ zenon_intro zenon_H9a | zenon_intro zenon_H9b ]. % 217.93/218.18 apply (zenon_L214_); trivial. % 217.93/218.18 apply (zenon_L215_); trivial. % 217.93/218.18 apply (zenon_L88_); trivial. % 217.93/218.18 (* end of lemma zenon_L221_ *) % 217.93/218.18 assert (zenon_L222_ : (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> (~((e10) = (e13))) -> (~((e12) = (e13))) -> (~((e11) = (e13))) -> ((h (e11)) = (e24)) -> ((j (h (e11))) = (e11)) -> ((j (h (e13))) = (e13)) -> ((h (e13)) = (e24)) -> (~((e13) = (e14))) -> False). % 217.93/218.18 do 0 intro. intros zenon_H9e zenon_H3b zenon_H1f zenon_H42 zenon_H129 zenon_H105 zenon_H3c zenon_Hf2 zenon_H5b. % 217.93/218.18 apply (zenon_or_s _ _ zenon_H9e); [ zenon_intro zenon_H6b | zenon_intro zenon_H9f ]. % 217.93/218.18 apply (zenon_L127_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_H9f); [ zenon_intro zenon_H92 | zenon_intro zenon_Ha0 ]. % 217.93/218.18 apply (zenon_L129_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Ha0); [ zenon_intro zenon_H97 | zenon_intro zenon_Ha1 ]. % 217.93/218.18 apply (zenon_L130_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Ha1); [ zenon_intro zenon_H9a | zenon_intro zenon_H9b ]. % 217.93/218.18 apply (zenon_L214_); trivial. % 217.93/218.18 apply (zenon_L131_); trivial. % 217.93/218.18 (* end of lemma zenon_L222_ *) % 217.93/218.18 assert (zenon_L223_ : ((j (h (e13))) = (e13)) -> ((h (e13)) = (e20)) -> ((j (e20)) = (e14)) -> (~((e13) = (e14))) -> False). % 217.93/218.18 do 0 intro. intros zenon_H3c zenon_H39 zenon_H25 zenon_H5b. % 217.93/218.18 elim (classic ((e14) = (e14))); [ zenon_intro zenon_H27 | zenon_intro zenon_H24 ]. % 217.93/218.18 cut (((e14) = (e14)) = ((e13) = (e14))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H5b. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H27. % 217.93/218.18 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.18 cut (((e14) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H5c]. % 217.93/218.18 congruence. % 217.93/218.18 cut (((j (h (e13))) = (e13)) = ((e14) = (e13))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H5c. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H3c. % 217.93/218.18 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.18 cut (((j (h (e13))) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H5d]. % 217.93/218.18 congruence. % 217.93/218.18 elim (classic ((e14) = (e14))); [ zenon_intro zenon_H27 | zenon_intro zenon_H24 ]. % 217.93/218.18 cut (((e14) = (e14)) = ((j (h (e13))) = (e14))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H5d. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H27. % 217.93/218.18 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.18 cut (((e14) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H5e]. % 217.93/218.18 congruence. % 217.93/218.18 elim (classic ((j (h (e13))) = (j (h (e13))))); [ zenon_intro zenon_H3f | zenon_intro zenon_H40 ]. % 217.93/218.18 cut (((j (h (e13))) = (j (h (e13)))) = ((e14) = (j (h (e13))))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H5e. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H3f. % 217.93/218.18 cut (((j (h (e13))) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H40]. % 217.93/218.18 cut (((j (h (e13))) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H5d]. % 217.93/218.18 congruence. % 217.93/218.18 cut (((j (e20)) = (e14)) = ((j (h (e13))) = (e14))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H5d. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H25. % 217.93/218.18 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.18 cut (((j (e20)) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H41]. % 217.93/218.18 congruence. % 217.93/218.18 elim (classic ((j (h (e13))) = (j (h (e13))))); [ zenon_intro zenon_H3f | zenon_intro zenon_H40 ]. % 217.93/218.18 cut (((j (h (e13))) = (j (h (e13)))) = ((j (e20)) = (j (h (e13))))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H41. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H3f. % 217.93/218.18 cut (((j (h (e13))) = (j (h (e13))))); [idtac | apply NNPP; zenon_intro zenon_H40]. % 217.93/218.18 cut (((j (h (e13))) = (j (e20)))); [idtac | apply NNPP; zenon_intro zenon_H38]. % 217.93/218.18 congruence. % 217.93/218.18 apply (zenon_L13_); trivial. % 217.93/218.18 apply zenon_H40. apply refl_equal. % 217.93/218.18 apply zenon_H40. apply refl_equal. % 217.93/218.18 apply zenon_H24. apply refl_equal. % 217.93/218.18 apply zenon_H40. apply refl_equal. % 217.93/218.18 apply zenon_H40. apply refl_equal. % 217.93/218.18 apply zenon_H24. apply refl_equal. % 217.93/218.18 apply zenon_H24. apply refl_equal. % 217.93/218.18 apply zenon_H1d. apply refl_equal. % 217.93/218.18 apply zenon_H24. apply refl_equal. % 217.93/218.18 apply zenon_H24. apply refl_equal. % 217.93/218.18 (* end of lemma zenon_L223_ *) % 217.93/218.18 assert (zenon_L224_ : (((j (e20)) = (e10))\/(((j (e20)) = (e11))\/(((j (e20)) = (e12))\/(((j (e20)) = (e13))\/((j (e20)) = (e14)))))) -> (~((e10) = (e14))) -> (~((e11) = (e14))) -> (~((e12) = (e14))) -> ((h (e14)) = (e20)) -> ((j (h (e14))) = (e14)) -> ((j (h (e13))) = (e13)) -> ((h (e13)) = (e20)) -> (~((e13) = (e14))) -> False). % 217.93/218.18 do 0 intro. intros zenon_H2b zenon_H47 zenon_Hc8 zenon_H26 zenon_Hc0 zenon_Hc2 zenon_H3c zenon_H39 zenon_H5b. % 217.93/218.18 apply (zenon_or_s _ _ zenon_H2b); [ zenon_intro zenon_Hd | zenon_intro zenon_H2d ]. % 217.93/218.18 apply (zenon_L56_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_H2d); [ zenon_intro zenon_H16 | zenon_intro zenon_H2e ]. % 217.93/218.18 apply (zenon_L57_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_H2e); [ zenon_intro zenon_H30 | zenon_intro zenon_H2f ]. % 217.93/218.18 apply (zenon_L58_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_H2f); [ zenon_intro zenon_H1e | zenon_intro zenon_H25 ]. % 217.93/218.18 apply (zenon_L59_); trivial. % 217.93/218.18 apply (zenon_L223_); trivial. % 217.93/218.18 (* end of lemma zenon_L224_ *) % 217.93/218.18 assert (zenon_L225_ : (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> (~((e11) = (e14))) -> ((h (e11)) = (e24)) -> ((j (h (e11))) = (e11)) -> (~((e11) = (e13))) -> (~((e11) = (e12))) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((op1 (e10) (e10)) = (e10)) -> ((op2 (e23) (e23)) = (e24)) -> ((j (op2 (e24) (e24))) = (op1 (j (e24)) (j (e24)))) -> ((op2 (e24) (e24)) = (e22)) -> (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> (~((e10) = (e11))) -> (~((e10) = (e12))) -> (~((e10) = (e13))) -> ((op1 (e14) (e14)) = (e10)) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((j (e22)) = (e14)) -> ((op2 (e22) (e22)) = (e23)) -> (~((e10) = (e14))) -> False). % 217.93/218.18 do 0 intro. intros zenon_Hb6 zenon_Hc8 zenon_H129 zenon_H105 zenon_H42 zenon_H15 zenon_H8c zenon_H6e zenon_H83 zenon_H74 zenon_H75 zenon_H9e zenon_H93 zenon_Hb zenon_H3b zenon_H6f zenon_Hac zenon_Hba zenon_Ha3 zenon_H47. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb6); [ zenon_intro zenon_H86 | zenon_intro zenon_Hb7 ]. % 217.93/218.18 apply (zenon_or_s _ _ zenon_H9e); [ zenon_intro zenon_H6b | zenon_intro zenon_H9f ]. % 217.93/218.18 apply (zenon_L73_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_H9f); [ zenon_intro zenon_H92 | zenon_intro zenon_Ha0 ]. % 217.93/218.18 apply (zenon_L39_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Ha0); [ zenon_intro zenon_H97 | zenon_intro zenon_Ha1 ]. % 217.93/218.18 apply (zenon_L213_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Ha1); [ zenon_intro zenon_H9a | zenon_intro zenon_H9b ]. % 217.93/218.18 apply (zenon_L214_); trivial. % 217.93/218.18 apply (zenon_L215_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb7); [ zenon_intro zenon_Hb2 | zenon_intro zenon_Hb8 ]. % 217.93/218.18 apply (zenon_L76_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb8); [ zenon_intro zenon_Hb3 | zenon_intro zenon_Hb9 ]. % 217.93/218.18 apply (zenon_L77_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb9); [ zenon_intro zenon_Hb4 | zenon_intro zenon_Hb5 ]. % 217.93/218.18 apply (zenon_L78_); trivial. % 217.93/218.18 apply (zenon_L79_); trivial. % 217.93/218.18 (* end of lemma zenon_L225_ *) % 217.93/218.18 assert (zenon_L226_ : (((j (e22)) = (e10))\/(((j (e22)) = (e11))\/(((j (e22)) = (e12))\/(((j (e22)) = (e13))\/((j (e22)) = (e14)))))) -> (~((e12) = (e14))) -> ((h (e14)) = (e22)) -> ((j (h (e14))) = (e14)) -> (~((e13) = (e14))) -> (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> (~((e11) = (e14))) -> ((h (e11)) = (e24)) -> ((j (h (e11))) = (e11)) -> (~((e11) = (e13))) -> (~((e11) = (e12))) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((op1 (e10) (e10)) = (e10)) -> ((op2 (e23) (e23)) = (e24)) -> ((j (op2 (e24) (e24))) = (op1 (j (e24)) (j (e24)))) -> ((op2 (e24) (e24)) = (e22)) -> (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> (~((e10) = (e11))) -> (~((e10) = (e12))) -> (~((e10) = (e13))) -> ((op1 (e14) (e14)) = (e10)) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((op2 (e22) (e22)) = (e23)) -> (~((e10) = (e14))) -> False). % 217.93/218.18 do 0 intro. intros zenon_Hbb zenon_H26 zenon_Hd4 zenon_Hc2 zenon_H5b zenon_Hb6 zenon_Hc8 zenon_H129 zenon_H105 zenon_H42 zenon_H15 zenon_H8c zenon_H6e zenon_H83 zenon_H74 zenon_H75 zenon_H9e zenon_H93 zenon_Hb zenon_H3b zenon_H6f zenon_Hac zenon_Ha3 zenon_H47. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hbb); [ zenon_intro zenon_H66 | zenon_intro zenon_Hbc ]. % 217.93/218.18 apply (zenon_L69_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hbc); [ zenon_intro zenon_H68 | zenon_intro zenon_Hbd ]. % 217.93/218.18 apply (zenon_L70_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hbd); [ zenon_intro zenon_H69 | zenon_intro zenon_Hbe ]. % 217.93/218.18 apply (zenon_L71_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hbe); [ zenon_intro zenon_H7d | zenon_intro zenon_Hba ]. % 217.93/218.18 apply (zenon_L72_); trivial. % 217.93/218.18 apply (zenon_L225_); trivial. % 217.93/218.18 (* end of lemma zenon_L226_ *) % 217.93/218.18 assert (zenon_L227_ : (((j (e22)) = (e10))\/(((j (e22)) = (e11))\/(((j (e22)) = (e12))\/(((j (e22)) = (e13))\/((j (e22)) = (e14)))))) -> (~((e10) = (e14))) -> ((op2 (e22) (e22)) = (e23)) -> ((op1 (e12) (e12)) = (e10)) -> ((op1 (e14) (e14)) = (e10)) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> (~((e10) = (e13))) -> (~((e10) = (e12))) -> (~((e10) = (e11))) -> (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> ((op2 (e24) (e24)) = (e22)) -> ((j (op2 (e24) (e24))) = (op1 (j (e24)) (j (e24)))) -> ((op2 (e23) (e23)) = (e24)) -> ((op1 (e10) (e10)) = (e10)) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> (~((e11) = (e12))) -> (~((e11) = (e13))) -> ((j (h (e11))) = (e11)) -> ((h (e11)) = (e24)) -> (~((e11) = (e14))) -> (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> (~((e12) = (e13))) -> ((j (h (e12))) = (e12)) -> ((h (e12)) = (e22)) -> (~((e12) = (e14))) -> False). % 217.93/218.18 do 0 intro. intros zenon_Hbb zenon_H47 zenon_Ha3 zenon_He9 zenon_H6f zenon_Hac zenon_H3b zenon_Hb zenon_H93 zenon_H9e zenon_H75 zenon_H74 zenon_H83 zenon_H6e zenon_H8c zenon_H15 zenon_H42 zenon_H105 zenon_H129 zenon_Hc8 zenon_Hb6 zenon_H1f zenon_Hc zenon_Hff zenon_H26. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hbb); [ zenon_intro zenon_H66 | zenon_intro zenon_Hbc ]. % 217.93/218.18 apply (zenon_L142_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hbc); [ zenon_intro zenon_H68 | zenon_intro zenon_Hbd ]. % 217.93/218.18 apply (zenon_L143_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hbd); [ zenon_intro zenon_H69 | zenon_intro zenon_Hbe ]. % 217.93/218.18 apply (zenon_L218_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hbe); [ zenon_intro zenon_H7d | zenon_intro zenon_Hba ]. % 217.93/218.18 apply (zenon_L148_); trivial. % 217.93/218.18 apply (zenon_L149_); trivial. % 217.93/218.18 (* end of lemma zenon_L227_ *) % 217.93/218.18 assert (zenon_L228_ : (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> (~((e10) = (e12))) -> (~((e11) = (e12))) -> ((h (e11)) = (e24)) -> ((j (h (e11))) = (e11)) -> (~((e12) = (e13))) -> ((j (h (e12))) = (e12)) -> ((h (e12)) = (e24)) -> (~((e12) = (e14))) -> False). % 217.93/218.18 do 0 intro. intros zenon_H9e zenon_Hb zenon_H15 zenon_H129 zenon_H105 zenon_H1f zenon_Hc zenon_H111 zenon_H26. % 217.93/218.18 apply (zenon_or_s _ _ zenon_H9e); [ zenon_intro zenon_H6b | zenon_intro zenon_H9f ]. % 217.93/218.18 apply (zenon_L177_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_H9f); [ zenon_intro zenon_H92 | zenon_intro zenon_Ha0 ]. % 217.93/218.18 apply (zenon_L179_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Ha0); [ zenon_intro zenon_H97 | zenon_intro zenon_Ha1 ]. % 217.93/218.18 apply (zenon_L213_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Ha1); [ zenon_intro zenon_H9a | zenon_intro zenon_H9b ]. % 217.93/218.18 apply (zenon_L173_); trivial. % 217.93/218.18 apply (zenon_L174_); trivial. % 217.93/218.18 (* end of lemma zenon_L228_ *) % 217.93/218.18 assert (zenon_L229_ : (((h (e12)) = (e20))\/(((h (e12)) = (e21))\/(((h (e12)) = (e22))\/(((h (e12)) = (e23))\/((h (e12)) = (e24)))))) -> (~((e13) = (e14))) -> ((j (h (e13))) = (e13)) -> ((op1 (e13) (e13)) = (e10)) -> (((j (e21)) = (e10))\/(((j (e21)) = (e11))\/(((j (e21)) = (e12))\/(((j (e21)) = (e13))\/((j (e21)) = (e14)))))) -> (((h (e14)) = (e20))\/(((h (e14)) = (e21))\/(((h (e14)) = (e22))\/(((h (e14)) = (e23))\/((h (e14)) = (e24)))))) -> (((j (e20)) = (e10))\/(((j (e20)) = (e11))\/(((j (e20)) = (e12))\/(((j (e20)) = (e13))\/((j (e20)) = (e14)))))) -> ((j (h (e14))) = (e14)) -> (((h (e13)) = (e20))\/(((h (e13)) = (e21))\/(((h (e13)) = (e22))\/(((h (e13)) = (e23))\/((h (e13)) = (e24)))))) -> ((op1 (e10) (e10)) = (e10)) -> ((j (op2 (e24) (e24))) = (op1 (j (e24)) (j (e24)))) -> ((op2 (e24) (e24)) = (e22)) -> (~((e10) = (e13))) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((op2 (e22) (e22)) = (e23)) -> (~((e10) = (e14))) -> (((j (e22)) = (e10))\/(((j (e22)) = (e11))\/(((j (e22)) = (e12))\/(((j (e22)) = (e13))\/((j (e22)) = (e14)))))) -> (~((e10) = (e11))) -> ((op2 (e23) (e23)) = (e24)) -> ((op1 (e12) (e12)) = (e10)) -> ((op1 (e14) (e14)) = (e10)) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> (~((e11) = (e13))) -> (~((e11) = (e14))) -> (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> (~((e10) = (e12))) -> (~((e11) = (e12))) -> ((h (e11)) = (e24)) -> ((j (h (e11))) = (e11)) -> (~((e12) = (e13))) -> ((j (h (e12))) = (e12)) -> (~((e12) = (e14))) -> False). % 217.93/218.18 do 0 intro. intros zenon_H12c zenon_H5b zenon_H3c zenon_Ha8 zenon_H5f zenon_Hf7 zenon_H2b zenon_Hc2 zenon_Hf6 zenon_H6e zenon_H74 zenon_H75 zenon_H3b zenon_Hac zenon_Ha3 zenon_H47 zenon_Hbb zenon_H93 zenon_H83 zenon_He9 zenon_H6f zenon_H8c zenon_H42 zenon_Hc8 zenon_Hb6 zenon_H9e zenon_Hb zenon_H15 zenon_H129 zenon_H105 zenon_H1f zenon_Hc zenon_H26. % 217.93/218.18 apply (zenon_or_s _ _ zenon_H12c); [ zenon_intro zenon_H7 | zenon_intro zenon_H12d ]. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hf6); [ zenon_intro zenon_H39 | zenon_intro zenon_Hf8 ]. % 217.93/218.18 apply (zenon_L209_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hf8); [ zenon_intro zenon_H4f | zenon_intro zenon_Hf9 ]. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hf7); [ zenon_intro zenon_Hc0 | zenon_intro zenon_Hfb ]. % 217.93/218.18 apply (zenon_L210_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hfb); [ zenon_intro zenon_Hd0 | zenon_intro zenon_Hfc ]. % 217.93/218.18 apply (zenon_L154_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hfc); [ zenon_intro zenon_Hd4 | zenon_intro zenon_Hfd ]. % 217.93/218.18 apply (zenon_L81_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hfd); [ zenon_intro zenon_Hd9 | zenon_intro zenon_He1 ]. % 217.93/218.18 apply (zenon_L216_); trivial. % 217.93/218.18 apply (zenon_L217_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hf9); [ zenon_intro zenon_H64 | zenon_intro zenon_Hfa ]. % 217.93/218.18 apply (zenon_L220_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hfa); [ zenon_intro zenon_Hdd | zenon_intro zenon_Hf2 ]. % 217.93/218.18 apply (zenon_L221_); trivial. % 217.93/218.18 apply (zenon_L222_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_H12d); [ zenon_intro zenon_H56 | zenon_intro zenon_H12e ]. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hf6); [ zenon_intro zenon_H39 | zenon_intro zenon_Hf8 ]. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hf7); [ zenon_intro zenon_Hc0 | zenon_intro zenon_Hfb ]. % 217.93/218.18 apply (zenon_L224_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hfb); [ zenon_intro zenon_Hd0 | zenon_intro zenon_Hfc ]. % 217.93/218.18 apply (zenon_L67_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hfc); [ zenon_intro zenon_Hd4 | zenon_intro zenon_Hfd ]. % 217.93/218.18 apply (zenon_L226_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hfd); [ zenon_intro zenon_Hd9 | zenon_intro zenon_He1 ]. % 217.93/218.18 apply (zenon_L216_); trivial. % 217.93/218.18 apply (zenon_L217_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hf8); [ zenon_intro zenon_H4f | zenon_intro zenon_Hf9 ]. % 217.93/218.18 apply (zenon_L26_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hf9); [ zenon_intro zenon_H64 | zenon_intro zenon_Hfa ]. % 217.93/218.18 apply (zenon_L220_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hfa); [ zenon_intro zenon_Hdd | zenon_intro zenon_Hf2 ]. % 217.93/218.18 apply (zenon_L221_); trivial. % 217.93/218.18 apply (zenon_L222_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_H12e); [ zenon_intro zenon_Hff | zenon_intro zenon_H12f ]. % 217.93/218.18 apply (zenon_L227_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_H12f); [ zenon_intro zenon_H10d | zenon_intro zenon_H111 ]. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb6); [ zenon_intro zenon_H86 | zenon_intro zenon_Hb7 ]. % 217.93/218.18 apply (zenon_L156_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb7); [ zenon_intro zenon_Hb2 | zenon_intro zenon_Hb8 ]. % 217.93/218.18 apply (zenon_L163_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb8); [ zenon_intro zenon_Hb3 | zenon_intro zenon_Hb9 ]. % 217.93/218.18 apply (zenon_or_s _ _ zenon_H9e); [ zenon_intro zenon_H6b | zenon_intro zenon_H9f ]. % 217.93/218.18 apply (zenon_L212_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_H9f); [ zenon_intro zenon_H92 | zenon_intro zenon_Ha0 ]. % 217.93/218.18 apply (zenon_L104_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Ha0); [ zenon_intro zenon_H97 | zenon_intro zenon_Ha1 ]. % 217.93/218.18 apply (zenon_L213_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Ha1); [ zenon_intro zenon_H9a | zenon_intro zenon_H9b ]. % 217.93/218.18 apply (zenon_L214_); trivial. % 217.93/218.18 apply (zenon_L215_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb9); [ zenon_intro zenon_Hb4 | zenon_intro zenon_Hb5 ]. % 217.93/218.18 apply (zenon_L157_); trivial. % 217.93/218.18 apply (zenon_L158_); trivial. % 217.93/218.18 apply (zenon_L228_); trivial. % 217.93/218.18 (* end of lemma zenon_L229_ *) % 217.93/218.18 assert (zenon_L230_ : (~((j (h (e10))) = (j (e21)))) -> ((h (e10)) = (e21)) -> False). % 217.93/218.18 do 0 intro. intros zenon_H130 zenon_H131. % 217.93/218.18 cut (((h (e10)) = (e21))); [idtac | apply NNPP; zenon_intro zenon_H132]. % 217.93/218.18 congruence. % 217.93/218.18 exact (zenon_H132 zenon_H131). % 217.93/218.18 (* end of lemma zenon_L230_ *) % 217.93/218.18 assert (zenon_L231_ : ((j (h (e10))) = (e10)) -> ((h (e10)) = (e21)) -> ((j (e21)) = (e13)) -> (~((e10) = (e13))) -> False). % 217.93/218.18 do 0 intro. intros zenon_H2c zenon_H131 zenon_H58 zenon_H3b. % 217.93/218.18 elim (classic ((e13) = (e13))); [ zenon_intro zenon_H20 | zenon_intro zenon_H1d ]. % 217.93/218.18 cut (((e13) = (e13)) = ((e10) = (e13))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H3b. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H20. % 217.93/218.18 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.18 cut (((e13) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H4b]. % 217.93/218.18 congruence. % 217.93/218.18 cut (((j (h (e10))) = (e10)) = ((e13) = (e10))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H4b. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H2c. % 217.93/218.18 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.18 cut (((j (h (e10))) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H4c]. % 217.93/218.18 congruence. % 217.93/218.18 elim (classic ((e13) = (e13))); [ zenon_intro zenon_H20 | zenon_intro zenon_H1d ]. % 217.93/218.18 cut (((e13) = (e13)) = ((j (h (e10))) = (e13))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H4c. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H20. % 217.93/218.18 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.18 cut (((e13) = (j (h (e10))))); [idtac | apply NNPP; zenon_intro zenon_H4d]. % 217.93/218.18 congruence. % 217.93/218.18 elim (classic ((j (h (e10))) = (j (h (e10))))); [ zenon_intro zenon_H35 | zenon_intro zenon_H36 ]. % 217.93/218.18 cut (((j (h (e10))) = (j (h (e10)))) = ((e13) = (j (h (e10))))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H4d. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H35. % 217.93/218.18 cut (((j (h (e10))) = (j (h (e10))))); [idtac | apply NNPP; zenon_intro zenon_H36]. % 217.93/218.18 cut (((j (h (e10))) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H4c]. % 217.93/218.18 congruence. % 217.93/218.18 cut (((j (e21)) = (e13)) = ((j (h (e10))) = (e13))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H4c. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H58. % 217.93/218.18 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.18 cut (((j (e21)) = (j (h (e10))))); [idtac | apply NNPP; zenon_intro zenon_H133]. % 217.93/218.18 congruence. % 217.93/218.18 elim (classic ((j (h (e10))) = (j (h (e10))))); [ zenon_intro zenon_H35 | zenon_intro zenon_H36 ]. % 217.93/218.18 cut (((j (h (e10))) = (j (h (e10)))) = ((j (e21)) = (j (h (e10))))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H133. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H35. % 217.93/218.18 cut (((j (h (e10))) = (j (h (e10))))); [idtac | apply NNPP; zenon_intro zenon_H36]. % 217.93/218.18 cut (((j (h (e10))) = (j (e21)))); [idtac | apply NNPP; zenon_intro zenon_H130]. % 217.93/218.18 congruence. % 217.93/218.18 apply (zenon_L230_); trivial. % 217.93/218.18 apply zenon_H36. apply refl_equal. % 217.93/218.18 apply zenon_H36. apply refl_equal. % 217.93/218.18 apply zenon_H1d. apply refl_equal. % 217.93/218.18 apply zenon_H36. apply refl_equal. % 217.93/218.18 apply zenon_H36. apply refl_equal. % 217.93/218.18 apply zenon_H1d. apply refl_equal. % 217.93/218.18 apply zenon_H1d. apply refl_equal. % 217.93/218.18 apply zenon_H9. apply refl_equal. % 217.93/218.18 apply zenon_H1d. apply refl_equal. % 217.93/218.18 apply zenon_H1d. apply refl_equal. % 217.93/218.18 (* end of lemma zenon_L231_ *) % 217.93/218.18 assert (zenon_L232_ : (((j (e21)) = (e10))\/(((j (e21)) = (e11))\/(((j (e21)) = (e12))\/(((j (e21)) = (e13))\/((j (e21)) = (e14)))))) -> (~((e11) = (e13))) -> (~((e12) = (e13))) -> (~((e10) = (e13))) -> ((h (e10)) = (e21)) -> ((j (h (e10))) = (e10)) -> ((j (h (e13))) = (e13)) -> ((h (e13)) = (e21)) -> (~((e13) = (e14))) -> False). % 217.93/218.18 do 0 intro. intros zenon_H5f zenon_H42 zenon_H1f zenon_H3b zenon_H131 zenon_H2c zenon_H3c zenon_H4f zenon_H5b. % 217.93/218.18 apply (zenon_or_s _ _ zenon_H5f); [ zenon_intro zenon_H51 | zenon_intro zenon_H60 ]. % 217.93/218.18 apply (zenon_L20_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_H60); [ zenon_intro zenon_H53 | zenon_intro zenon_H61 ]. % 217.93/218.18 apply (zenon_L21_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_H61); [ zenon_intro zenon_H54 | zenon_intro zenon_H62 ]. % 217.93/218.18 apply (zenon_L22_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_H62); [ zenon_intro zenon_H58 | zenon_intro zenon_H5a ]. % 217.93/218.18 apply (zenon_L231_); trivial. % 217.93/218.18 apply (zenon_L25_); trivial. % 217.93/218.18 (* end of lemma zenon_L232_ *) % 217.93/218.18 assert (zenon_L233_ : ((j (h (e10))) = (e10)) -> ((h (e10)) = (e21)) -> ((j (e21)) = (e14)) -> (~((e10) = (e14))) -> False). % 217.93/218.18 do 0 intro. intros zenon_H2c zenon_H131 zenon_H5a zenon_H47. % 217.93/218.18 elim (classic ((e14) = (e14))); [ zenon_intro zenon_H27 | zenon_intro zenon_H24 ]. % 217.93/218.18 cut (((e14) = (e14)) = ((e10) = (e14))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H47. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H27. % 217.93/218.18 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.18 cut (((e14) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H48]. % 217.93/218.18 congruence. % 217.93/218.18 cut (((j (h (e10))) = (e10)) = ((e14) = (e10))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H48. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H2c. % 217.93/218.18 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.18 cut (((j (h (e10))) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H49]. % 217.93/218.18 congruence. % 217.93/218.18 elim (classic ((e14) = (e14))); [ zenon_intro zenon_H27 | zenon_intro zenon_H24 ]. % 217.93/218.18 cut (((e14) = (e14)) = ((j (h (e10))) = (e14))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H49. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H27. % 217.93/218.18 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.18 cut (((e14) = (j (h (e10))))); [idtac | apply NNPP; zenon_intro zenon_H4a]. % 217.93/218.18 congruence. % 217.93/218.18 elim (classic ((j (h (e10))) = (j (h (e10))))); [ zenon_intro zenon_H35 | zenon_intro zenon_H36 ]. % 217.93/218.18 cut (((j (h (e10))) = (j (h (e10)))) = ((e14) = (j (h (e10))))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H4a. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H35. % 217.93/218.18 cut (((j (h (e10))) = (j (h (e10))))); [idtac | apply NNPP; zenon_intro zenon_H36]. % 217.93/218.18 cut (((j (h (e10))) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H49]. % 217.93/218.18 congruence. % 217.93/218.18 cut (((j (e21)) = (e14)) = ((j (h (e10))) = (e14))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H49. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H5a. % 217.93/218.18 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.18 cut (((j (e21)) = (j (h (e10))))); [idtac | apply NNPP; zenon_intro zenon_H133]. % 217.93/218.18 congruence. % 217.93/218.18 elim (classic ((j (h (e10))) = (j (h (e10))))); [ zenon_intro zenon_H35 | zenon_intro zenon_H36 ]. % 217.93/218.18 cut (((j (h (e10))) = (j (h (e10)))) = ((j (e21)) = (j (h (e10))))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H133. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H35. % 217.93/218.18 cut (((j (h (e10))) = (j (h (e10))))); [idtac | apply NNPP; zenon_intro zenon_H36]. % 217.93/218.18 cut (((j (h (e10))) = (j (e21)))); [idtac | apply NNPP; zenon_intro zenon_H130]. % 217.93/218.18 congruence. % 217.93/218.18 apply (zenon_L230_); trivial. % 217.93/218.18 apply zenon_H36. apply refl_equal. % 217.93/218.18 apply zenon_H36. apply refl_equal. % 217.93/218.18 apply zenon_H24. apply refl_equal. % 217.93/218.18 apply zenon_H36. apply refl_equal. % 217.93/218.18 apply zenon_H36. apply refl_equal. % 217.93/218.18 apply zenon_H24. apply refl_equal. % 217.93/218.18 apply zenon_H24. apply refl_equal. % 217.93/218.18 apply zenon_H9. apply refl_equal. % 217.93/218.18 apply zenon_H24. apply refl_equal. % 217.93/218.18 apply zenon_H24. apply refl_equal. % 217.93/218.18 (* end of lemma zenon_L233_ *) % 217.93/218.18 assert (zenon_L234_ : (((j (e21)) = (e10))\/(((j (e21)) = (e11))\/(((j (e21)) = (e12))\/(((j (e21)) = (e13))\/((j (e21)) = (e14)))))) -> (~((e11) = (e14))) -> (~((e12) = (e14))) -> ((h (e14)) = (e21)) -> ((j (h (e14))) = (e14)) -> (~((e13) = (e14))) -> ((j (h (e10))) = (e10)) -> ((h (e10)) = (e21)) -> (~((e10) = (e14))) -> False). % 217.93/218.18 do 0 intro. intros zenon_H5f zenon_Hc8 zenon_H26 zenon_Hd0 zenon_Hc2 zenon_H5b zenon_H2c zenon_H131 zenon_H47. % 217.93/218.18 apply (zenon_or_s _ _ zenon_H5f); [ zenon_intro zenon_H51 | zenon_intro zenon_H60 ]. % 217.93/218.18 apply (zenon_L62_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_H60); [ zenon_intro zenon_H53 | zenon_intro zenon_H61 ]. % 217.93/218.18 apply (zenon_L63_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_H61); [ zenon_intro zenon_H54 | zenon_intro zenon_H62 ]. % 217.93/218.18 apply (zenon_L64_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_H62); [ zenon_intro zenon_H58 | zenon_intro zenon_H5a ]. % 217.93/218.18 apply (zenon_L65_); trivial. % 217.93/218.18 apply (zenon_L233_); trivial. % 217.93/218.18 (* end of lemma zenon_L234_ *) % 217.93/218.18 assert (zenon_L235_ : (((h (e13)) = (e20))\/(((h (e13)) = (e21))\/(((h (e13)) = (e22))\/(((h (e13)) = (e23))\/((h (e13)) = (e24)))))) -> ((op1 (e13) (e13)) = (e10)) -> (((h (e14)) = (e20))\/(((h (e14)) = (e21))\/(((h (e14)) = (e22))\/(((h (e14)) = (e23))\/((h (e14)) = (e24)))))) -> ((h (e12)) = (e20)) -> ((j (h (e12))) = (e12)) -> (((j (e20)) = (e10))\/(((j (e20)) = (e11))\/(((j (e20)) = (e12))\/(((j (e20)) = (e13))\/((j (e20)) = (e14)))))) -> ((h (e10)) = (e21)) -> ((j (h (e10))) = (e10)) -> (((j (e21)) = (e10))\/(((j (e21)) = (e11))\/(((j (e21)) = (e12))\/(((j (e21)) = (e13))\/((j (e21)) = (e14)))))) -> ((op2 (e22) (e22)) = (e23)) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((op2 (e24) (e24)) = (e22)) -> ((j (op2 (e24) (e24))) = (op1 (j (e24)) (j (e24)))) -> (((j (e22)) = (e10))\/(((j (e22)) = (e11))\/(((j (e22)) = (e12))\/(((j (e22)) = (e13))\/((j (e22)) = (e14)))))) -> ((op1 (e14) (e14)) = (e10)) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((op2 (e23) (e23)) = (e24)) -> (~((e10) = (e13))) -> (~((e10) = (e12))) -> (~((e10) = (e11))) -> (~((e11) = (e13))) -> (~((e12) = (e13))) -> ((op1 (e12) (e12)) = (e10)) -> ((op1 (e10) (e10)) = (e10)) -> (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> (~((e10) = (e14))) -> (~((e11) = (e14))) -> (~((e12) = (e14))) -> ((j (h (e14))) = (e14)) -> ((j (h (e13))) = (e13)) -> (~((e13) = (e14))) -> False). % 217.93/218.18 do 0 intro. intros zenon_Hf6 zenon_Ha8 zenon_Hf7 zenon_H7 zenon_Hc zenon_H2b zenon_H131 zenon_H2c zenon_H5f zenon_Ha3 zenon_Hac zenon_H75 zenon_H74 zenon_Hbb zenon_H6f zenon_H8c zenon_H83 zenon_H3b zenon_Hb zenon_H93 zenon_H42 zenon_H1f zenon_He9 zenon_H6e zenon_Hb6 zenon_H9e zenon_H47 zenon_Hc8 zenon_H26 zenon_Hc2 zenon_H3c zenon_H5b. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hf6); [ zenon_intro zenon_H39 | zenon_intro zenon_Hf8 ]. % 217.93/218.18 apply (zenon_L209_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hf8); [ zenon_intro zenon_H4f | zenon_intro zenon_Hf9 ]. % 217.93/218.18 apply (zenon_L232_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hf9); [ zenon_intro zenon_H64 | zenon_intro zenon_Hfa ]. % 217.93/218.18 apply (zenon_L54_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hfa); [ zenon_intro zenon_Hdd | zenon_intro zenon_Hf2 ]. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hf7); [ zenon_intro zenon_Hc0 | zenon_intro zenon_Hfb ]. % 217.93/218.18 apply (zenon_L210_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hfb); [ zenon_intro zenon_Hd0 | zenon_intro zenon_Hfc ]. % 217.93/218.18 apply (zenon_L234_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hfc); [ zenon_intro zenon_Hd4 | zenon_intro zenon_Hfd ]. % 217.93/218.18 apply (zenon_L81_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hfd); [ zenon_intro zenon_Hd9 | zenon_intro zenon_He1 ]. % 217.93/218.18 apply (zenon_L89_); trivial. % 217.93/218.18 apply (zenon_L125_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hf7); [ zenon_intro zenon_Hc0 | zenon_intro zenon_Hfb ]. % 217.93/218.18 apply (zenon_L210_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hfb); [ zenon_intro zenon_Hd0 | zenon_intro zenon_Hfc ]. % 217.93/218.18 apply (zenon_L234_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hfc); [ zenon_intro zenon_Hd4 | zenon_intro zenon_Hfd ]. % 217.93/218.18 apply (zenon_L81_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hfd); [ zenon_intro zenon_Hd9 | zenon_intro zenon_He1 ]. % 217.93/218.18 apply (zenon_L138_); trivial. % 217.93/218.18 apply (zenon_L139_); trivial. % 217.93/218.18 (* end of lemma zenon_L235_ *) % 217.93/218.18 assert (zenon_L236_ : (~((e10) = (e12))) -> ((j (h (e12))) = (e12)) -> ((h (e12)) = (e21)) -> ((j (e21)) = (e10)) -> False). % 217.93/218.18 do 0 intro. intros zenon_Hb zenon_Hc zenon_H56 zenon_H51. % 217.93/218.18 cut (((j (h (e12))) = (e12)) = ((e10) = (e12))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_Hb. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_Hc. % 217.93/218.18 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.18 cut (((j (h (e12))) = (e10))); [idtac | apply NNPP; zenon_intro zenon_He]. % 217.93/218.18 congruence. % 217.93/218.18 elim (classic ((e10) = (e10))); [ zenon_intro zenon_Hf | zenon_intro zenon_H9 ]. % 217.93/218.18 cut (((e10) = (e10)) = ((j (h (e12))) = (e10))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_He. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_Hf. % 217.93/218.18 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.18 cut (((e10) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H10]. % 217.93/218.18 congruence. % 217.93/218.18 elim (classic ((j (h (e12))) = (j (h (e12))))); [ zenon_intro zenon_H11 | zenon_intro zenon_H12 ]. % 217.93/218.18 cut (((j (h (e12))) = (j (h (e12)))) = ((e10) = (j (h (e12))))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H10. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H11. % 217.93/218.18 cut (((j (h (e12))) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H12]. % 217.93/218.18 cut (((j (h (e12))) = (e10))); [idtac | apply NNPP; zenon_intro zenon_He]. % 217.93/218.18 congruence. % 217.93/218.18 cut (((j (e21)) = (e10)) = ((j (h (e12))) = (e10))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_He. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H51. % 217.93/218.18 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.18 cut (((j (e21)) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H59]. % 217.93/218.18 congruence. % 217.93/218.18 elim (classic ((j (h (e12))) = (j (h (e12))))); [ zenon_intro zenon_H11 | zenon_intro zenon_H12 ]. % 217.93/218.18 cut (((j (h (e12))) = (j (h (e12)))) = ((j (e21)) = (j (h (e12))))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H59. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H11. % 217.93/218.18 cut (((j (h (e12))) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H12]. % 217.93/218.18 cut (((j (h (e12))) = (j (e21)))); [idtac | apply NNPP; zenon_intro zenon_H55]. % 217.93/218.18 congruence. % 217.93/218.18 apply (zenon_L23_); trivial. % 217.93/218.18 apply zenon_H12. apply refl_equal. % 217.93/218.18 apply zenon_H12. apply refl_equal. % 217.93/218.18 apply zenon_H9. apply refl_equal. % 217.93/218.18 apply zenon_H12. apply refl_equal. % 217.93/218.18 apply zenon_H12. apply refl_equal. % 217.93/218.18 apply zenon_H9. apply refl_equal. % 217.93/218.18 apply zenon_H9. apply refl_equal. % 217.93/218.18 apply zenon_Ha. apply refl_equal. % 217.93/218.18 (* end of lemma zenon_L236_ *) % 217.93/218.18 assert (zenon_L237_ : (~((e11) = (e12))) -> ((j (h (e12))) = (e12)) -> ((h (e12)) = (e21)) -> ((j (e21)) = (e11)) -> False). % 217.93/218.18 do 0 intro. intros zenon_H15 zenon_Hc zenon_H56 zenon_H53. % 217.93/218.18 cut (((j (h (e12))) = (e12)) = ((e11) = (e12))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H15. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_Hc. % 217.93/218.18 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.18 cut (((j (h (e12))) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H17]. % 217.93/218.18 congruence. % 217.93/218.18 elim (classic ((e11) = (e11))); [ zenon_intro zenon_H18 | zenon_intro zenon_H14 ]. % 217.93/218.18 cut (((e11) = (e11)) = ((j (h (e12))) = (e11))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H17. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H18. % 217.93/218.18 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.18 cut (((e11) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H19]. % 217.93/218.18 congruence. % 217.93/218.18 elim (classic ((j (h (e12))) = (j (h (e12))))); [ zenon_intro zenon_H11 | zenon_intro zenon_H12 ]. % 217.93/218.18 cut (((j (h (e12))) = (j (h (e12)))) = ((e11) = (j (h (e12))))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H19. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H11. % 217.93/218.18 cut (((j (h (e12))) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H12]. % 217.93/218.18 cut (((j (h (e12))) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H17]. % 217.93/218.18 congruence. % 217.93/218.18 cut (((j (e21)) = (e11)) = ((j (h (e12))) = (e11))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H17. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H53. % 217.93/218.18 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.18 cut (((j (e21)) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H59]. % 217.93/218.18 congruence. % 217.93/218.18 elim (classic ((j (h (e12))) = (j (h (e12))))); [ zenon_intro zenon_H11 | zenon_intro zenon_H12 ]. % 217.93/218.18 cut (((j (h (e12))) = (j (h (e12)))) = ((j (e21)) = (j (h (e12))))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H59. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H11. % 217.93/218.18 cut (((j (h (e12))) = (j (h (e12))))); [idtac | apply NNPP; zenon_intro zenon_H12]. % 217.93/218.18 cut (((j (h (e12))) = (j (e21)))); [idtac | apply NNPP; zenon_intro zenon_H55]. % 217.93/218.18 congruence. % 217.93/218.18 apply (zenon_L23_); trivial. % 217.93/218.18 apply zenon_H12. apply refl_equal. % 217.93/218.18 apply zenon_H12. apply refl_equal. % 217.93/218.18 apply zenon_H14. apply refl_equal. % 217.93/218.18 apply zenon_H12. apply refl_equal. % 217.93/218.18 apply zenon_H12. apply refl_equal. % 217.93/218.18 apply zenon_H14. apply refl_equal. % 217.93/218.18 apply zenon_H14. apply refl_equal. % 217.93/218.18 apply zenon_Ha. apply refl_equal. % 217.93/218.18 (* end of lemma zenon_L237_ *) % 217.93/218.18 assert (zenon_L238_ : ((j (h (e10))) = (e10)) -> ((h (e10)) = (e21)) -> ((j (e21)) = (e12)) -> (~((e10) = (e12))) -> False). % 217.93/218.18 do 0 intro. intros zenon_H2c zenon_H131 zenon_H54 zenon_Hb. % 217.93/218.18 elim (classic ((e12) = (e12))); [ zenon_intro zenon_H31 | zenon_intro zenon_Ha ]. % 217.93/218.18 cut (((e12) = (e12)) = ((e10) = (e12))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_Hb. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H31. % 217.93/218.18 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.18 cut (((e12) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H32]. % 217.93/218.18 congruence. % 217.93/218.18 cut (((j (h (e10))) = (e10)) = ((e12) = (e10))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H32. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H2c. % 217.93/218.18 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.18 cut (((j (h (e10))) = (e12))); [idtac | apply NNPP; zenon_intro zenon_H33]. % 217.93/218.18 congruence. % 217.93/218.18 elim (classic ((e12) = (e12))); [ zenon_intro zenon_H31 | zenon_intro zenon_Ha ]. % 217.93/218.18 cut (((e12) = (e12)) = ((j (h (e10))) = (e12))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H33. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H31. % 217.93/218.18 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.18 cut (((e12) = (j (h (e10))))); [idtac | apply NNPP; zenon_intro zenon_H34]. % 217.93/218.18 congruence. % 217.93/218.18 elim (classic ((j (h (e10))) = (j (h (e10))))); [ zenon_intro zenon_H35 | zenon_intro zenon_H36 ]. % 217.93/218.18 cut (((j (h (e10))) = (j (h (e10)))) = ((e12) = (j (h (e10))))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H34. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H35. % 217.93/218.18 cut (((j (h (e10))) = (j (h (e10))))); [idtac | apply NNPP; zenon_intro zenon_H36]. % 217.93/218.18 cut (((j (h (e10))) = (e12))); [idtac | apply NNPP; zenon_intro zenon_H33]. % 217.93/218.18 congruence. % 217.93/218.18 cut (((j (e21)) = (e12)) = ((j (h (e10))) = (e12))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H33. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H54. % 217.93/218.18 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.18 cut (((j (e21)) = (j (h (e10))))); [idtac | apply NNPP; zenon_intro zenon_H133]. % 217.93/218.18 congruence. % 217.93/218.18 elim (classic ((j (h (e10))) = (j (h (e10))))); [ zenon_intro zenon_H35 | zenon_intro zenon_H36 ]. % 217.93/218.18 cut (((j (h (e10))) = (j (h (e10)))) = ((j (e21)) = (j (h (e10))))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H133. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H35. % 217.93/218.18 cut (((j (h (e10))) = (j (h (e10))))); [idtac | apply NNPP; zenon_intro zenon_H36]. % 217.93/218.18 cut (((j (h (e10))) = (j (e21)))); [idtac | apply NNPP; zenon_intro zenon_H130]. % 217.93/218.18 congruence. % 217.93/218.18 apply (zenon_L230_); trivial. % 217.93/218.18 apply zenon_H36. apply refl_equal. % 217.93/218.18 apply zenon_H36. apply refl_equal. % 217.93/218.18 apply zenon_Ha. apply refl_equal. % 217.93/218.18 apply zenon_H36. apply refl_equal. % 217.93/218.18 apply zenon_H36. apply refl_equal. % 217.93/218.18 apply zenon_Ha. apply refl_equal. % 217.93/218.18 apply zenon_Ha. apply refl_equal. % 217.93/218.18 apply zenon_H9. apply refl_equal. % 217.93/218.18 apply zenon_Ha. apply refl_equal. % 217.93/218.18 apply zenon_Ha. apply refl_equal. % 217.93/218.18 (* end of lemma zenon_L238_ *) % 217.93/218.18 assert (zenon_L239_ : (((j (e21)) = (e10))\/(((j (e21)) = (e11))\/(((j (e21)) = (e12))\/(((j (e21)) = (e13))\/((j (e21)) = (e14)))))) -> ((h (e12)) = (e21)) -> ((j (h (e12))) = (e12)) -> (~((e11) = (e12))) -> (~((e10) = (e12))) -> (~((e10) = (e13))) -> ((j (h (e10))) = (e10)) -> ((h (e10)) = (e21)) -> (~((e10) = (e14))) -> False). % 217.93/218.18 do 0 intro. intros zenon_H5f zenon_H56 zenon_Hc zenon_H15 zenon_Hb zenon_H3b zenon_H2c zenon_H131 zenon_H47. % 217.93/218.18 apply (zenon_or_s _ _ zenon_H5f); [ zenon_intro zenon_H51 | zenon_intro zenon_H60 ]. % 217.93/218.18 apply (zenon_L236_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_H60); [ zenon_intro zenon_H53 | zenon_intro zenon_H61 ]. % 217.93/218.18 apply (zenon_L237_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_H61); [ zenon_intro zenon_H54 | zenon_intro zenon_H62 ]. % 217.93/218.18 apply (zenon_L238_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_H62); [ zenon_intro zenon_H58 | zenon_intro zenon_H5a ]. % 217.93/218.18 apply (zenon_L231_); trivial. % 217.93/218.18 apply (zenon_L233_); trivial. % 217.93/218.18 (* end of lemma zenon_L239_ *) % 217.93/218.18 assert (zenon_L240_ : (((h (e14)) = (e20))\/(((h (e14)) = (e21))\/(((h (e14)) = (e22))\/(((h (e14)) = (e23))\/((h (e14)) = (e24)))))) -> ((h (e13)) = (e20)) -> ((j (h (e13))) = (e13)) -> (((j (e20)) = (e10))\/(((j (e20)) = (e11))\/(((j (e20)) = (e12))\/(((j (e20)) = (e13))\/((j (e20)) = (e14)))))) -> ((h (e10)) = (e21)) -> ((j (h (e10))) = (e10)) -> (((j (e21)) = (e10))\/(((j (e21)) = (e11))\/(((j (e21)) = (e12))\/(((j (e21)) = (e13))\/((j (e21)) = (e14)))))) -> (~((e13) = (e14))) -> (~((e11) = (e14))) -> (((j (e22)) = (e10))\/(((j (e22)) = (e11))\/(((j (e22)) = (e12))\/(((j (e22)) = (e13))\/((j (e22)) = (e14)))))) -> (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> ((op2 (e24) (e24)) = (e22)) -> ((op1 (e10) (e10)) = (e10)) -> ((j (op2 (e24) (e24))) = (op1 (j (e24)) (j (e24)))) -> ((j (h (e14))) = (e14)) -> (~((e10) = (e13))) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((op2 (e23) (e23)) = (e24)) -> (~((e10) = (e14))) -> (~((e11) = (e12))) -> ((op1 (e12) (e12)) = (e10)) -> ((op1 (e13) (e13)) = (e10)) -> (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> (~((e10) = (e11))) -> (~((e10) = (e12))) -> ((op2 (e22) (e22)) = (e23)) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((op1 (e14) (e14)) = (e10)) -> (~((e12) = (e13))) -> ((j (h (e12))) = (e12)) -> ((h (e12)) = (e23)) -> (~((e12) = (e14))) -> False). % 217.93/218.18 do 0 intro. intros zenon_Hf7 zenon_H39 zenon_H3c zenon_H2b zenon_H131 zenon_H2c zenon_H5f zenon_H5b zenon_Hc8 zenon_Hbb zenon_H9e zenon_H75 zenon_H6e zenon_H74 zenon_Hc2 zenon_H3b zenon_H8c zenon_H83 zenon_H47 zenon_H15 zenon_He9 zenon_Ha8 zenon_Hb6 zenon_H93 zenon_Hb zenon_Ha3 zenon_Hac zenon_H6f zenon_H1f zenon_Hc zenon_H10d zenon_H26. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hf7); [ zenon_intro zenon_Hc0 | zenon_intro zenon_Hfb ]. % 217.93/218.18 apply (zenon_L224_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hfb); [ zenon_intro zenon_Hd0 | zenon_intro zenon_Hfc ]. % 217.93/218.18 apply (zenon_L234_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hfc); [ zenon_intro zenon_Hd4 | zenon_intro zenon_Hfd ]. % 217.93/218.18 apply (zenon_L160_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hfd); [ zenon_intro zenon_Hd9 | zenon_intro zenon_He1 ]. % 217.93/218.18 apply (zenon_L161_); trivial. % 217.93/218.18 apply (zenon_L167_); trivial. % 217.93/218.18 (* end of lemma zenon_L240_ *) % 217.93/218.18 assert (zenon_L241_ : (((h (e14)) = (e20))\/(((h (e14)) = (e21))\/(((h (e14)) = (e22))\/(((h (e14)) = (e23))\/((h (e14)) = (e24)))))) -> ((h (e13)) = (e20)) -> ((j (h (e13))) = (e13)) -> (((j (e20)) = (e10))\/(((j (e20)) = (e11))\/(((j (e20)) = (e12))\/(((j (e20)) = (e13))\/((j (e20)) = (e14)))))) -> ((h (e10)) = (e21)) -> ((j (h (e10))) = (e10)) -> (((j (e21)) = (e10))\/(((j (e21)) = (e11))\/(((j (e21)) = (e12))\/(((j (e21)) = (e13))\/((j (e21)) = (e14)))))) -> ((op2 (e22) (e22)) = (e23)) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> (~((e10) = (e13))) -> ((op2 (e24) (e24)) = (e22)) -> ((j (op2 (e24) (e24))) = (op1 (j (e24)) (j (e24)))) -> (((j (e22)) = (e10))\/(((j (e22)) = (e11))\/(((j (e22)) = (e12))\/(((j (e22)) = (e13))\/((j (e22)) = (e14)))))) -> (~((e12) = (e13))) -> ((op1 (e14) (e14)) = (e10)) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((op2 (e23) (e23)) = (e24)) -> (~((e10) = (e12))) -> (~((e10) = (e11))) -> (~((e11) = (e12))) -> ((op1 (e13) (e13)) = (e10)) -> ((op1 (e10) (e10)) = (e10)) -> (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> (~((e10) = (e14))) -> (~((e11) = (e14))) -> ((j (h (e14))) = (e14)) -> (~((e13) = (e14))) -> ((j (h (e12))) = (e12)) -> ((h (e12)) = (e24)) -> (~((e12) = (e14))) -> False). % 217.93/218.18 do 0 intro. intros zenon_Hf7 zenon_H39 zenon_H3c zenon_H2b zenon_H131 zenon_H2c zenon_H5f zenon_Ha3 zenon_Hac zenon_H3b zenon_H75 zenon_H74 zenon_Hbb zenon_H1f zenon_H6f zenon_H8c zenon_H83 zenon_Hb zenon_H93 zenon_H15 zenon_Ha8 zenon_H6e zenon_Hb6 zenon_H9e zenon_H47 zenon_Hc8 zenon_Hc2 zenon_H5b zenon_Hc zenon_H111 zenon_H26. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hf7); [ zenon_intro zenon_Hc0 | zenon_intro zenon_Hfb ]. % 217.93/218.18 apply (zenon_L224_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hfb); [ zenon_intro zenon_Hd0 | zenon_intro zenon_Hfc ]. % 217.93/218.18 apply (zenon_L234_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hfc); [ zenon_intro zenon_Hd4 | zenon_intro zenon_Hfd ]. % 217.93/218.18 apply (zenon_L176_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hfd); [ zenon_intro zenon_Hd9 | zenon_intro zenon_He1 ]. % 217.93/218.18 apply (zenon_L182_); trivial. % 217.93/218.18 apply (zenon_L183_); trivial. % 217.93/218.18 (* end of lemma zenon_L241_ *) % 217.93/218.18 assert (zenon_L242_ : (((h (e13)) = (e20))\/(((h (e13)) = (e21))\/(((h (e13)) = (e22))\/(((h (e13)) = (e23))\/((h (e13)) = (e24)))))) -> ((j (h (e14))) = (e14)) -> (~((e11) = (e14))) -> (((j (e20)) = (e10))\/(((j (e20)) = (e11))\/(((j (e20)) = (e12))\/(((j (e20)) = (e13))\/((j (e20)) = (e14)))))) -> (((h (e14)) = (e20))\/(((h (e14)) = (e21))\/(((h (e14)) = (e22))\/(((h (e14)) = (e23))\/((h (e14)) = (e24)))))) -> ((j (h (e10))) = (e10)) -> ((h (e10)) = (e21)) -> (((j (e21)) = (e10))\/(((j (e21)) = (e11))\/(((j (e21)) = (e12))\/(((j (e21)) = (e13))\/((j (e21)) = (e14)))))) -> ((op1 (e10) (e10)) = (e10)) -> ((j (op2 (e24) (e24))) = (op1 (j (e24)) (j (e24)))) -> ((op2 (e24) (e24)) = (e22)) -> (~((e10) = (e11))) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((op2 (e22) (e22)) = (e23)) -> (~((e10) = (e14))) -> (((j (e22)) = (e10))\/(((j (e22)) = (e11))\/(((j (e22)) = (e12))\/(((j (e22)) = (e13))\/((j (e22)) = (e14)))))) -> (~((e11) = (e12))) -> (~((e10) = (e12))) -> ((op2 (e23) (e23)) = (e24)) -> ((op1 (e13) (e13)) = (e10)) -> ((op1 (e14) (e14)) = (e10)) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> (~((e12) = (e14))) -> (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> (~((e10) = (e13))) -> (~((e11) = (e13))) -> (~((e12) = (e13))) -> ((h (e12)) = (e24)) -> ((j (h (e12))) = (e12)) -> ((j (h (e13))) = (e13)) -> (~((e13) = (e14))) -> False). % 217.93/218.18 do 0 intro. intros zenon_Hf6 zenon_Hc2 zenon_Hc8 zenon_H2b zenon_Hf7 zenon_H2c zenon_H131 zenon_H5f zenon_H6e zenon_H74 zenon_H75 zenon_H93 zenon_Hac zenon_Ha3 zenon_H47 zenon_Hbb zenon_H15 zenon_Hb zenon_H83 zenon_Ha8 zenon_H6f zenon_H8c zenon_H26 zenon_Hb6 zenon_H9e zenon_H3b zenon_H42 zenon_H1f zenon_H111 zenon_Hc zenon_H3c zenon_H5b. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hf6); [ zenon_intro zenon_H39 | zenon_intro zenon_Hf8 ]. % 217.93/218.18 apply (zenon_L241_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hf8); [ zenon_intro zenon_H4f | zenon_intro zenon_Hf9 ]. % 217.93/218.18 apply (zenon_L232_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hf9); [ zenon_intro zenon_H64 | zenon_intro zenon_Hfa ]. % 217.93/218.18 apply (zenon_L54_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hfa); [ zenon_intro zenon_Hdd | zenon_intro zenon_Hf2 ]. % 217.93/218.18 apply (zenon_L185_); trivial. % 217.93/218.18 apply (zenon_L186_); trivial. % 217.93/218.18 (* end of lemma zenon_L242_ *) % 217.93/218.18 assert (zenon_L243_ : (((j (e20)) = (e10))\/(((j (e20)) = (e11))\/(((j (e20)) = (e12))\/(((j (e20)) = (e13))\/((j (e20)) = (e14)))))) -> (~((e10) = (e12))) -> (~((e11) = (e12))) -> ((h (e11)) = (e20)) -> ((j (h (e11))) = (e11)) -> (~((e12) = (e13))) -> ((j (h (e12))) = (e12)) -> ((h (e12)) = (e20)) -> (~((e12) = (e14))) -> False). % 217.93/218.18 do 0 intro. intros zenon_H2b zenon_Hb zenon_H15 zenon_H103 zenon_H105 zenon_H1f zenon_Hc zenon_H7 zenon_H26. % 217.93/218.18 apply (zenon_or_s _ _ zenon_H2b); [ zenon_intro zenon_Hd | zenon_intro zenon_H2d ]. % 217.93/218.18 apply (zenon_L4_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_H2d); [ zenon_intro zenon_H16 | zenon_intro zenon_H2e ]. % 217.93/218.18 apply (zenon_L6_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_H2e); [ zenon_intro zenon_H30 | zenon_intro zenon_H2f ]. % 217.93/218.18 elim (classic ((e12) = (e12))); [ zenon_intro zenon_H31 | zenon_intro zenon_Ha ]. % 217.93/218.18 cut (((e12) = (e12)) = ((e11) = (e12))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H15. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H31. % 217.93/218.18 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.18 cut (((e12) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H125]. % 217.93/218.18 congruence. % 217.93/218.18 cut (((j (h (e11))) = (e11)) = ((e12) = (e11))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H125. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H105. % 217.93/218.18 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.18 cut (((j (h (e11))) = (e12))); [idtac | apply NNPP; zenon_intro zenon_H126]. % 217.93/218.18 congruence. % 217.93/218.18 elim (classic ((e12) = (e12))); [ zenon_intro zenon_H31 | zenon_intro zenon_Ha ]. % 217.93/218.18 cut (((e12) = (e12)) = ((j (h (e11))) = (e12))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H126. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H31. % 217.93/218.18 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.18 cut (((e12) = (j (h (e11))))); [idtac | apply NNPP; zenon_intro zenon_H127]. % 217.93/218.18 congruence. % 217.93/218.18 elim (classic ((j (h (e11))) = (j (h (e11))))); [ zenon_intro zenon_H109 | zenon_intro zenon_H10a ]. % 217.93/218.18 cut (((j (h (e11))) = (j (h (e11)))) = ((e12) = (j (h (e11))))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H127. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H109. % 217.93/218.18 cut (((j (h (e11))) = (j (h (e11))))); [idtac | apply NNPP; zenon_intro zenon_H10a]. % 217.93/218.18 cut (((j (h (e11))) = (e12))); [idtac | apply NNPP; zenon_intro zenon_H126]. % 217.93/218.18 congruence. % 217.93/218.18 cut (((j (e20)) = (e12)) = ((j (h (e11))) = (e12))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H126. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H30. % 217.93/218.18 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.18 cut (((j (e20)) = (j (h (e11))))); [idtac | apply NNPP; zenon_intro zenon_H10b]. % 217.93/218.18 congruence. % 217.93/218.18 elim (classic ((j (h (e11))) = (j (h (e11))))); [ zenon_intro zenon_H109 | zenon_intro zenon_H10a ]. % 217.93/218.18 cut (((j (h (e11))) = (j (h (e11)))) = ((j (e20)) = (j (h (e11))))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H10b. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H109. % 217.93/218.18 cut (((j (h (e11))) = (j (h (e11))))); [idtac | apply NNPP; zenon_intro zenon_H10a]. % 217.93/218.18 cut (((j (h (e11))) = (j (e20)))); [idtac | apply NNPP; zenon_intro zenon_H102]. % 217.93/218.18 congruence. % 217.93/218.18 apply (zenon_L151_); trivial. % 217.93/218.18 apply zenon_H10a. apply refl_equal. % 217.93/218.18 apply zenon_H10a. apply refl_equal. % 217.93/218.18 apply zenon_Ha. apply refl_equal. % 217.93/218.18 apply zenon_H10a. apply refl_equal. % 217.93/218.18 apply zenon_H10a. apply refl_equal. % 217.93/218.18 apply zenon_Ha. apply refl_equal. % 217.93/218.18 apply zenon_Ha. apply refl_equal. % 217.93/218.18 apply zenon_H14. apply refl_equal. % 217.93/218.18 apply zenon_Ha. apply refl_equal. % 217.93/218.18 apply zenon_Ha. apply refl_equal. % 217.93/218.18 apply (zenon_or_s _ _ zenon_H2f); [ zenon_intro zenon_H1e | zenon_intro zenon_H25 ]. % 217.93/218.18 apply (zenon_L9_); trivial. % 217.93/218.18 apply (zenon_L11_); trivial. % 217.93/218.18 (* end of lemma zenon_L243_ *) % 217.93/218.18 assert (zenon_L244_ : (((j (e20)) = (e10))\/(((j (e20)) = (e11))\/(((j (e20)) = (e12))\/(((j (e20)) = (e13))\/((j (e20)) = (e14)))))) -> (~((e10) = (e13))) -> ((h (e13)) = (e20)) -> ((j (h (e13))) = (e13)) -> (~((e12) = (e13))) -> (~((e11) = (e13))) -> ((j (h (e11))) = (e11)) -> ((h (e11)) = (e20)) -> (~((e11) = (e14))) -> False). % 217.93/218.18 do 0 intro. intros zenon_H2b zenon_H3b zenon_H39 zenon_H3c zenon_H1f zenon_H42 zenon_H105 zenon_H103 zenon_Hc8. % 217.93/218.18 apply (zenon_or_s _ _ zenon_H2b); [ zenon_intro zenon_Hd | zenon_intro zenon_H2d ]. % 217.93/218.18 apply (zenon_L14_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_H2d); [ zenon_intro zenon_H16 | zenon_intro zenon_H2e ]. % 217.93/218.18 apply (zenon_L15_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_H2e); [ zenon_intro zenon_H30 | zenon_intro zenon_H2f ]. % 217.93/218.18 apply (zenon_L16_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_H2f); [ zenon_intro zenon_H1e | zenon_intro zenon_H25 ]. % 217.93/218.18 elim (classic ((e13) = (e13))); [ zenon_intro zenon_H20 | zenon_intro zenon_H1d ]. % 217.93/218.18 cut (((e13) = (e13)) = ((e11) = (e13))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H42. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H20. % 217.93/218.18 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.18 cut (((e13) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H117]. % 217.93/218.18 congruence. % 217.93/218.18 cut (((j (h (e11))) = (e11)) = ((e13) = (e11))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H117. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H105. % 217.93/218.18 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.18 cut (((j (h (e11))) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H118]. % 217.93/218.18 congruence. % 217.93/218.18 elim (classic ((e13) = (e13))); [ zenon_intro zenon_H20 | zenon_intro zenon_H1d ]. % 217.93/218.18 cut (((e13) = (e13)) = ((j (h (e11))) = (e13))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H118. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H20. % 217.93/218.18 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.18 cut (((e13) = (j (h (e11))))); [idtac | apply NNPP; zenon_intro zenon_H119]. % 217.93/218.18 congruence. % 217.93/218.18 elim (classic ((j (h (e11))) = (j (h (e11))))); [ zenon_intro zenon_H109 | zenon_intro zenon_H10a ]. % 217.93/218.18 cut (((j (h (e11))) = (j (h (e11)))) = ((e13) = (j (h (e11))))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H119. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H109. % 217.93/218.18 cut (((j (h (e11))) = (j (h (e11))))); [idtac | apply NNPP; zenon_intro zenon_H10a]. % 217.93/218.18 cut (((j (h (e11))) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H118]. % 217.93/218.18 congruence. % 217.93/218.18 cut (((j (e20)) = (e13)) = ((j (h (e11))) = (e13))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H118. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H1e. % 217.93/218.18 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.18 cut (((j (e20)) = (j (h (e11))))); [idtac | apply NNPP; zenon_intro zenon_H10b]. % 217.93/218.18 congruence. % 217.93/218.18 elim (classic ((j (h (e11))) = (j (h (e11))))); [ zenon_intro zenon_H109 | zenon_intro zenon_H10a ]. % 217.93/218.18 cut (((j (h (e11))) = (j (h (e11)))) = ((j (e20)) = (j (h (e11))))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H10b. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H109. % 217.93/218.18 cut (((j (h (e11))) = (j (h (e11))))); [idtac | apply NNPP; zenon_intro zenon_H10a]. % 217.93/218.18 cut (((j (h (e11))) = (j (e20)))); [idtac | apply NNPP; zenon_intro zenon_H102]. % 217.93/218.18 congruence. % 217.93/218.18 apply (zenon_L151_); trivial. % 217.93/218.18 apply zenon_H10a. apply refl_equal. % 217.93/218.18 apply zenon_H10a. apply refl_equal. % 217.93/218.18 apply zenon_H1d. apply refl_equal. % 217.93/218.18 apply zenon_H10a. apply refl_equal. % 217.93/218.18 apply zenon_H10a. apply refl_equal. % 217.93/218.18 apply zenon_H1d. apply refl_equal. % 217.93/218.18 apply zenon_H1d. apply refl_equal. % 217.93/218.18 apply zenon_H14. apply refl_equal. % 217.93/218.18 apply zenon_H1d. apply refl_equal. % 217.93/218.18 apply zenon_H1d. apply refl_equal. % 217.93/218.18 apply (zenon_L152_); trivial. % 217.93/218.18 (* end of lemma zenon_L244_ *) % 217.93/218.18 assert (zenon_L245_ : (((j (e22)) = (e10))\/(((j (e22)) = (e11))\/(((j (e22)) = (e12))\/(((j (e22)) = (e13))\/((j (e22)) = (e14)))))) -> (~((e10) = (e14))) -> (~((e11) = (e14))) -> (~((e12) = (e14))) -> ((h (e14)) = (e22)) -> ((j (h (e14))) = (e14)) -> ((j (h (e13))) = (e13)) -> ((h (e13)) = (e22)) -> (~((e13) = (e14))) -> False). % 217.93/218.18 do 0 intro. intros zenon_Hbb zenon_H47 zenon_Hc8 zenon_H26 zenon_Hd4 zenon_Hc2 zenon_H3c zenon_H64 zenon_H5b. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hbb); [ zenon_intro zenon_H66 | zenon_intro zenon_Hbc ]. % 217.93/218.18 apply (zenon_L69_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hbc); [ zenon_intro zenon_H68 | zenon_intro zenon_Hbd ]. % 217.93/218.18 apply (zenon_L70_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hbd); [ zenon_intro zenon_H69 | zenon_intro zenon_Hbe ]. % 217.93/218.18 apply (zenon_L71_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hbe); [ zenon_intro zenon_H7d | zenon_intro zenon_Hba ]. % 217.93/218.18 apply (zenon_L72_); trivial. % 217.93/218.18 apply (zenon_L53_); trivial. % 217.93/218.18 (* end of lemma zenon_L245_ *) % 217.93/218.18 assert (zenon_L246_ : (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> ((h (e14)) = (e23)) -> ((j (h (e14))) = (e14)) -> (~((e10) = (e11))) -> (~((e10) = (e12))) -> (~((e10) = (e13))) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((j (e22)) = (e12)) -> ((op1 (e14) (e14)) = (e10)) -> ((op1 (e12) (e12)) = (e10)) -> ((op2 (e22) (e22)) = (e23)) -> (~((e10) = (e14))) -> False). % 217.93/218.18 do 0 intro. intros zenon_Hb6 zenon_Hd9 zenon_Hc2 zenon_H93 zenon_Hb zenon_H3b zenon_Hac zenon_H69 zenon_H6f zenon_He9 zenon_Ha3 zenon_H47. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb6); [ zenon_intro zenon_H86 | zenon_intro zenon_Hb7 ]. % 217.93/218.18 apply (zenon_L83_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb7); [ zenon_intro zenon_Hb2 | zenon_intro zenon_Hb8 ]. % 217.93/218.18 apply (zenon_L118_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb8); [ zenon_intro zenon_Hb3 | zenon_intro zenon_Hb9 ]. % 217.93/218.18 apply (zenon_L119_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb9); [ zenon_intro zenon_Hb4 | zenon_intro zenon_Hb5 ]. % 217.93/218.18 apply (zenon_L120_); trivial. % 217.93/218.18 apply (zenon_L146_); trivial. % 217.93/218.18 (* end of lemma zenon_L246_ *) % 217.93/218.18 assert (zenon_L247_ : (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> ((h (e14)) = (e23)) -> ((j (h (e14))) = (e14)) -> (~((e10) = (e11))) -> (~((e10) = (e12))) -> (~((e10) = (e13))) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((j (e22)) = (e13)) -> ((op1 (e14) (e14)) = (e10)) -> ((op1 (e13) (e13)) = (e10)) -> ((op2 (e22) (e22)) = (e23)) -> (~((e10) = (e14))) -> False). % 217.93/218.18 do 0 intro. intros zenon_Hb6 zenon_Hd9 zenon_Hc2 zenon_H93 zenon_Hb zenon_H3b zenon_Hac zenon_H7d zenon_H6f zenon_Ha8 zenon_Ha3 zenon_H47. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb6); [ zenon_intro zenon_H86 | zenon_intro zenon_Hb7 ]. % 217.93/218.18 apply (zenon_L83_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb7); [ zenon_intro zenon_Hb2 | zenon_intro zenon_Hb8 ]. % 217.93/218.18 apply (zenon_L48_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb8); [ zenon_intro zenon_Hb3 | zenon_intro zenon_Hb9 ]. % 217.93/218.18 apply (zenon_L49_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb9); [ zenon_intro zenon_Hb4 | zenon_intro zenon_Hb5 ]. % 217.93/218.18 apply (zenon_L50_); trivial. % 217.93/218.18 apply (zenon_L51_); trivial. % 217.93/218.18 (* end of lemma zenon_L247_ *) % 217.93/218.18 assert (zenon_L248_ : (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> ((h (e14)) = (e23)) -> ((j (h (e14))) = (e14)) -> (~((e10) = (e11))) -> (~((e10) = (e12))) -> (~((e10) = (e13))) -> ((op1 (e14) (e14)) = (e10)) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((j (e22)) = (e14)) -> ((op2 (e22) (e22)) = (e23)) -> (~((e10) = (e14))) -> False). % 217.93/218.18 do 0 intro. intros zenon_Hb6 zenon_Hd9 zenon_Hc2 zenon_H93 zenon_Hb zenon_H3b zenon_H6f zenon_Hac zenon_Hba zenon_Ha3 zenon_H47. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb6); [ zenon_intro zenon_H86 | zenon_intro zenon_Hb7 ]. % 217.93/218.18 apply (zenon_L83_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb7); [ zenon_intro zenon_Hb2 | zenon_intro zenon_Hb8 ]. % 217.93/218.18 apply (zenon_L76_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb8); [ zenon_intro zenon_Hb3 | zenon_intro zenon_Hb9 ]. % 217.93/218.18 apply (zenon_L77_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb9); [ zenon_intro zenon_Hb4 | zenon_intro zenon_Hb5 ]. % 217.93/218.18 apply (zenon_L78_); trivial. % 217.93/218.18 apply (zenon_L79_); trivial. % 217.93/218.18 (* end of lemma zenon_L248_ *) % 217.93/218.18 assert (zenon_L249_ : (((j (e22)) = (e10))\/(((j (e22)) = (e11))\/(((j (e22)) = (e12))\/(((j (e22)) = (e13))\/((j (e22)) = (e14)))))) -> ((h (e13)) = (e22)) -> ((j (h (e13))) = (e13)) -> (~((e11) = (e13))) -> ((op1 (e12) (e12)) = (e10)) -> ((op1 (e13) (e13)) = (e10)) -> (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> ((h (e14)) = (e23)) -> ((j (h (e14))) = (e14)) -> (~((e10) = (e11))) -> (~((e10) = (e12))) -> (~((e10) = (e13))) -> ((op1 (e14) (e14)) = (e10)) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((op2 (e22) (e22)) = (e23)) -> (~((e10) = (e14))) -> False). % 217.93/218.18 do 0 intro. intros zenon_Hbb zenon_H64 zenon_H3c zenon_H42 zenon_He9 zenon_Ha8 zenon_Hb6 zenon_Hd9 zenon_Hc2 zenon_H93 zenon_Hb zenon_H3b zenon_H6f zenon_Hac zenon_Ha3 zenon_H47. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hbb); [ zenon_intro zenon_H66 | zenon_intro zenon_Hbc ]. % 217.93/218.18 apply (zenon_L28_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hbc); [ zenon_intro zenon_H68 | zenon_intro zenon_Hbd ]. % 217.93/218.18 apply (zenon_L29_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hbd); [ zenon_intro zenon_H69 | zenon_intro zenon_Hbe ]. % 217.93/218.18 apply (zenon_L246_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hbe); [ zenon_intro zenon_H7d | zenon_intro zenon_Hba ]. % 217.93/218.18 apply (zenon_L247_); trivial. % 217.93/218.18 apply (zenon_L248_); trivial. % 217.93/218.18 (* end of lemma zenon_L249_ *) % 217.93/218.18 assert (zenon_L250_ : (((j (e22)) = (e10))\/(((j (e22)) = (e11))\/(((j (e22)) = (e12))\/(((j (e22)) = (e13))\/((j (e22)) = (e14)))))) -> (~((e11) = (e13))) -> (~((e12) = (e13))) -> (~((e10) = (e14))) -> ((op2 (e22) (e22)) = (e23)) -> ((op1 (e13) (e13)) = (e10)) -> ((op1 (e14) (e14)) = (e10)) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> (~((e10) = (e13))) -> (~((e10) = (e12))) -> (~((e10) = (e11))) -> (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> ((op2 (e24) (e24)) = (e22)) -> ((j (op2 (e24) (e24))) = (op1 (j (e24)) (j (e24)))) -> (~((e11) = (e14))) -> (~((e12) = (e14))) -> ((h (e14)) = (e24)) -> ((j (h (e14))) = (e14)) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((op1 (e10) (e10)) = (e10)) -> ((op2 (e23) (e23)) = (e24)) -> (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> ((j (h (e13))) = (e13)) -> ((h (e13)) = (e22)) -> (~((e13) = (e14))) -> False). % 217.93/218.18 do 0 intro. intros zenon_Hbb zenon_H42 zenon_H1f zenon_H47 zenon_Ha3 zenon_Ha8 zenon_H6f zenon_Hac zenon_H3b zenon_Hb zenon_H93 zenon_H9e zenon_H75 zenon_H74 zenon_Hc8 zenon_H26 zenon_He1 zenon_Hc2 zenon_H8c zenon_H6e zenon_H83 zenon_Hb6 zenon_H3c zenon_H64 zenon_H5b. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hbb); [ zenon_intro zenon_H66 | zenon_intro zenon_Hbc ]. % 217.93/218.18 apply (zenon_L28_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hbc); [ zenon_intro zenon_H68 | zenon_intro zenon_Hbd ]. % 217.93/218.18 apply (zenon_L29_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hbd); [ zenon_intro zenon_H69 | zenon_intro zenon_Hbe ]. % 217.93/218.18 apply (zenon_L30_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hbe); [ zenon_intro zenon_H7d | zenon_intro zenon_Hba ]. % 217.93/218.18 apply (zenon_L123_); trivial. % 217.93/218.18 apply (zenon_L53_); trivial. % 217.93/218.18 (* end of lemma zenon_L250_ *) % 217.93/218.18 assert (zenon_L251_ : (((h (e14)) = (e20))\/(((h (e14)) = (e21))\/(((h (e14)) = (e22))\/(((h (e14)) = (e23))\/((h (e14)) = (e24)))))) -> ((h (e11)) = (e20)) -> ((j (h (e11))) = (e11)) -> (((j (e20)) = (e10))\/(((j (e20)) = (e11))\/(((j (e20)) = (e12))\/(((j (e20)) = (e13))\/((j (e20)) = (e14)))))) -> ((h (e12)) = (e21)) -> ((j (h (e12))) = (e12)) -> (((j (e21)) = (e10))\/(((j (e21)) = (e11))\/(((j (e21)) = (e12))\/(((j (e21)) = (e13))\/((j (e21)) = (e14)))))) -> ((op1 (e12) (e12)) = (e10)) -> (((j (e22)) = (e10))\/(((j (e22)) = (e11))\/(((j (e22)) = (e12))\/(((j (e22)) = (e13))\/((j (e22)) = (e14)))))) -> (~((e11) = (e13))) -> (~((e12) = (e13))) -> (~((e10) = (e14))) -> ((op2 (e22) (e22)) = (e23)) -> ((op1 (e13) (e13)) = (e10)) -> ((op1 (e14) (e14)) = (e10)) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> (~((e10) = (e13))) -> (~((e10) = (e12))) -> (~((e10) = (e11))) -> (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> ((op2 (e24) (e24)) = (e22)) -> ((j (op2 (e24) (e24))) = (op1 (j (e24)) (j (e24)))) -> (~((e11) = (e14))) -> (~((e12) = (e14))) -> ((j (h (e14))) = (e14)) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((op1 (e10) (e10)) = (e10)) -> ((op2 (e23) (e23)) = (e24)) -> (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> ((j (h (e13))) = (e13)) -> ((h (e13)) = (e22)) -> (~((e13) = (e14))) -> False). % 217.93/218.18 do 0 intro. intros zenon_Hf7 zenon_H103 zenon_H105 zenon_H2b zenon_H56 zenon_Hc zenon_H5f zenon_He9 zenon_Hbb zenon_H42 zenon_H1f zenon_H47 zenon_Ha3 zenon_Ha8 zenon_H6f zenon_Hac zenon_H3b zenon_Hb zenon_H93 zenon_H9e zenon_H75 zenon_H74 zenon_Hc8 zenon_H26 zenon_Hc2 zenon_H8c zenon_H6e zenon_H83 zenon_Hb6 zenon_H3c zenon_H64 zenon_H5b. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hf7); [ zenon_intro zenon_Hc0 | zenon_intro zenon_Hfb ]. % 217.93/218.18 apply (zenon_L153_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hfb); [ zenon_intro zenon_Hd0 | zenon_intro zenon_Hfc ]. % 217.93/218.18 apply (zenon_L67_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hfc); [ zenon_intro zenon_Hd4 | zenon_intro zenon_Hfd ]. % 217.93/218.18 apply (zenon_L245_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hfd); [ zenon_intro zenon_Hd9 | zenon_intro zenon_He1 ]. % 217.93/218.18 apply (zenon_L249_); trivial. % 217.93/218.18 apply (zenon_L250_); trivial. % 217.93/218.18 (* end of lemma zenon_L251_ *) % 217.93/218.18 assert (zenon_L252_ : ((j (h (e10))) = (e10)) -> ((h (e10)) = (e22)) -> ((j (e22)) = (e11)) -> (~((e10) = (e11))) -> False). % 217.93/218.18 do 0 intro. intros zenon_H2c zenon_H134 zenon_H68 zenon_H93. % 217.93/218.18 elim (classic ((e11) = (e11))); [ zenon_intro zenon_H18 | zenon_intro zenon_H14 ]. % 217.93/218.18 cut (((e11) = (e11)) = ((e10) = (e11))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H93. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H18. % 217.93/218.18 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.18 cut (((e11) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H94]. % 217.93/218.18 congruence. % 217.93/218.18 cut (((j (h (e10))) = (e10)) = ((e11) = (e10))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H94. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H2c. % 217.93/218.18 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.18 cut (((j (h (e10))) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H135]. % 217.93/218.18 congruence. % 217.93/218.18 elim (classic ((e11) = (e11))); [ zenon_intro zenon_H18 | zenon_intro zenon_H14 ]. % 217.93/218.18 cut (((e11) = (e11)) = ((j (h (e10))) = (e11))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H135. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H18. % 217.93/218.18 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.18 cut (((e11) = (j (h (e10))))); [idtac | apply NNPP; zenon_intro zenon_H136]. % 217.93/218.18 congruence. % 217.93/218.18 elim (classic ((j (h (e10))) = (j (h (e10))))); [ zenon_intro zenon_H35 | zenon_intro zenon_H36 ]. % 217.93/218.18 cut (((j (h (e10))) = (j (h (e10)))) = ((e11) = (j (h (e10))))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H136. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H35. % 217.93/218.18 cut (((j (h (e10))) = (j (h (e10))))); [idtac | apply NNPP; zenon_intro zenon_H36]. % 217.93/218.18 cut (((j (h (e10))) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H135]. % 217.93/218.18 congruence. % 217.93/218.18 cut (((j (e22)) = (e11)) = ((j (h (e10))) = (e11))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H135. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H68. % 217.93/218.18 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.18 cut (((j (e22)) = (j (h (e10))))); [idtac | apply NNPP; zenon_intro zenon_H137]. % 217.93/218.18 congruence. % 217.93/218.18 elim (classic ((j (h (e10))) = (j (h (e10))))); [ zenon_intro zenon_H35 | zenon_intro zenon_H36 ]. % 217.93/218.18 cut (((j (h (e10))) = (j (h (e10)))) = ((j (e22)) = (j (h (e10))))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H137. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H35. % 217.93/218.18 cut (((j (h (e10))) = (j (h (e10))))); [idtac | apply NNPP; zenon_intro zenon_H36]. % 217.93/218.18 cut (((j (h (e10))) = (j (e22)))); [idtac | apply NNPP; zenon_intro zenon_H138]. % 217.93/218.18 congruence. % 217.93/218.18 cut (((h (e10)) = (e22))); [idtac | apply NNPP; zenon_intro zenon_H139]. % 217.93/218.18 congruence. % 217.93/218.18 exact (zenon_H139 zenon_H134). % 217.93/218.18 apply zenon_H36. apply refl_equal. % 217.93/218.18 apply zenon_H36. apply refl_equal. % 217.93/218.18 apply zenon_H14. apply refl_equal. % 217.93/218.18 apply zenon_H36. apply refl_equal. % 217.93/218.18 apply zenon_H36. apply refl_equal. % 217.93/218.18 apply zenon_H14. apply refl_equal. % 217.93/218.18 apply zenon_H14. apply refl_equal. % 217.93/218.18 apply zenon_H9. apply refl_equal. % 217.93/218.18 apply zenon_H14. apply refl_equal. % 217.93/218.18 apply zenon_H14. apply refl_equal. % 217.93/218.18 (* end of lemma zenon_L252_ *) % 217.93/218.18 assert (zenon_L253_ : (((j (e22)) = (e10))\/(((j (e22)) = (e11))\/(((j (e22)) = (e12))\/(((j (e22)) = (e13))\/((j (e22)) = (e14)))))) -> ((h (e10)) = (e22)) -> ((j (h (e10))) = (e10)) -> ((op1 (e12) (e12)) = (e10)) -> (~((e10) = (e14))) -> ((op1 (e13) (e13)) = (e10)) -> (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> ((op2 (e24) (e24)) = (e22)) -> ((j (op2 (e24) (e24))) = (op1 (j (e24)) (j (e24)))) -> (~((e11) = (e14))) -> (~((e12) = (e14))) -> ((h (e14)) = (e24)) -> ((j (h (e14))) = (e14)) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((op1 (e10) (e10)) = (e10)) -> ((op2 (e23) (e23)) = (e24)) -> (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> (~((e10) = (e11))) -> (~((e10) = (e12))) -> (~((e10) = (e13))) -> ((op2 (e22) (e22)) = (e23)) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((op1 (e14) (e14)) = (e10)) -> ((j (h (e13))) = (e13)) -> ((h (e13)) = (e23)) -> (~((e13) = (e14))) -> False). % 217.93/218.18 do 0 intro. intros zenon_Hbb zenon_H134 zenon_H2c zenon_He9 zenon_H47 zenon_Ha8 zenon_H9e zenon_H75 zenon_H74 zenon_Hc8 zenon_H26 zenon_He1 zenon_Hc2 zenon_H8c zenon_H6e zenon_H83 zenon_Hb6 zenon_H93 zenon_Hb zenon_H3b zenon_Ha3 zenon_Hac zenon_H6f zenon_H3c zenon_Hdd zenon_H5b. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hbb); [ zenon_intro zenon_H66 | zenon_intro zenon_Hbc ]. % 217.93/218.18 apply (zenon_L98_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hbc); [ zenon_intro zenon_H68 | zenon_intro zenon_Hbd ]. % 217.93/218.18 apply (zenon_L252_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hbd); [ zenon_intro zenon_H69 | zenon_intro zenon_Hbe ]. % 217.93/218.18 apply (zenon_L121_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hbe); [ zenon_intro zenon_H7d | zenon_intro zenon_Hba ]. % 217.93/218.18 apply (zenon_L123_); trivial. % 217.93/218.18 apply (zenon_L124_); trivial. % 217.93/218.18 (* end of lemma zenon_L253_ *) % 217.93/218.18 assert (zenon_L254_ : (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> (~((e13) = (e14))) -> ((h (e13)) = (e24)) -> ((j (h (e13))) = (e13)) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((op1 (e10) (e10)) = (e10)) -> ((op2 (e23) (e23)) = (e24)) -> (~((e12) = (e13))) -> (~((e11) = (e13))) -> ((j (op2 (e24) (e24))) = (op1 (j (e24)) (j (e24)))) -> ((op2 (e24) (e24)) = (e22)) -> (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> (~((e10) = (e11))) -> (~((e10) = (e12))) -> (~((e10) = (e13))) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((j (e22)) = (e12)) -> ((op1 (e14) (e14)) = (e10)) -> ((op1 (e12) (e12)) = (e10)) -> ((op2 (e22) (e22)) = (e23)) -> (~((e10) = (e14))) -> False). % 217.93/218.18 do 0 intro. intros zenon_Hb6 zenon_H5b zenon_Hf2 zenon_H3c zenon_H8c zenon_H6e zenon_H83 zenon_H1f zenon_H42 zenon_H74 zenon_H75 zenon_H9e zenon_H93 zenon_Hb zenon_H3b zenon_Hac zenon_H69 zenon_H6f zenon_He9 zenon_Ha3 zenon_H47. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb6); [ zenon_intro zenon_H86 | zenon_intro zenon_Hb7 ]. % 217.93/218.18 apply (zenon_or_s _ _ zenon_H9e); [ zenon_intro zenon_H6b | zenon_intro zenon_H9f ]. % 217.93/218.18 apply (zenon_L144_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_H9f); [ zenon_intro zenon_H92 | zenon_intro zenon_Ha0 ]. % 217.93/218.18 apply (zenon_L129_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Ha0); [ zenon_intro zenon_H97 | zenon_intro zenon_Ha1 ]. % 217.93/218.18 apply (zenon_L130_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Ha1); [ zenon_intro zenon_H9a | zenon_intro zenon_H9b ]. % 217.93/218.18 apply (zenon_L41_); trivial. % 217.93/218.18 apply (zenon_L131_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb7); [ zenon_intro zenon_Hb2 | zenon_intro zenon_Hb8 ]. % 217.93/218.18 apply (zenon_L118_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb8); [ zenon_intro zenon_Hb3 | zenon_intro zenon_Hb9 ]. % 217.93/218.18 apply (zenon_L119_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb9); [ zenon_intro zenon_Hb4 | zenon_intro zenon_Hb5 ]. % 217.93/218.18 apply (zenon_L120_); trivial. % 217.93/218.18 apply (zenon_L146_); trivial. % 217.93/218.18 (* end of lemma zenon_L254_ *) % 217.93/218.18 assert (zenon_L255_ : (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> ((op2 (e23) (e23)) = (e24)) -> ((op1 (e10) (e10)) = (e10)) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((j (h (e13))) = (e13)) -> ((h (e13)) = (e24)) -> (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> (~((e10) = (e11))) -> (~((e10) = (e12))) -> (~((e10) = (e13))) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((j (e22)) = (e13)) -> ((op1 (e14) (e14)) = (e10)) -> ((op1 (e13) (e13)) = (e10)) -> ((op2 (e22) (e22)) = (e23)) -> (~((e10) = (e14))) -> False). % 217.93/218.18 do 0 intro. intros zenon_Hb6 zenon_H83 zenon_H6e zenon_H8c zenon_H3c zenon_Hf2 zenon_H9e zenon_H93 zenon_Hb zenon_H3b zenon_Hac zenon_H7d zenon_H6f zenon_Ha8 zenon_Ha3 zenon_H47. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb6); [ zenon_intro zenon_H86 | zenon_intro zenon_Hb7 ]. % 217.93/218.18 apply (zenon_L128_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb7); [ zenon_intro zenon_Hb2 | zenon_intro zenon_Hb8 ]. % 217.93/218.18 apply (zenon_L48_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb8); [ zenon_intro zenon_Hb3 | zenon_intro zenon_Hb9 ]. % 217.93/218.18 apply (zenon_L49_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb9); [ zenon_intro zenon_Hb4 | zenon_intro zenon_Hb5 ]. % 217.93/218.18 apply (zenon_L50_); trivial. % 217.93/218.18 apply (zenon_L51_); trivial. % 217.93/218.18 (* end of lemma zenon_L255_ *) % 217.93/218.18 assert (zenon_L256_ : (((j (e22)) = (e10))\/(((j (e22)) = (e11))\/(((j (e22)) = (e12))\/(((j (e22)) = (e13))\/((j (e22)) = (e14)))))) -> ((h (e10)) = (e22)) -> ((j (h (e10))) = (e10)) -> ((op1 (e12) (e12)) = (e10)) -> ((op2 (e24) (e24)) = (e22)) -> ((j (op2 (e24) (e24))) = (op1 (j (e24)) (j (e24)))) -> (~((e11) = (e13))) -> (~((e12) = (e13))) -> (~((e13) = (e14))) -> ((op1 (e13) (e13)) = (e10)) -> (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> ((h (e13)) = (e24)) -> ((j (h (e13))) = (e13)) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((op1 (e10) (e10)) = (e10)) -> ((op2 (e23) (e23)) = (e24)) -> (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> ((h (e14)) = (e23)) -> ((j (h (e14))) = (e14)) -> (~((e10) = (e11))) -> (~((e10) = (e12))) -> (~((e10) = (e13))) -> ((op1 (e14) (e14)) = (e10)) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((op2 (e22) (e22)) = (e23)) -> (~((e10) = (e14))) -> False). % 217.93/218.18 do 0 intro. intros zenon_Hbb zenon_H134 zenon_H2c zenon_He9 zenon_H75 zenon_H74 zenon_H42 zenon_H1f zenon_H5b zenon_Ha8 zenon_H9e zenon_Hf2 zenon_H3c zenon_H8c zenon_H6e zenon_H83 zenon_Hb6 zenon_Hd9 zenon_Hc2 zenon_H93 zenon_Hb zenon_H3b zenon_H6f zenon_Hac zenon_Ha3 zenon_H47. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hbb); [ zenon_intro zenon_H66 | zenon_intro zenon_Hbc ]. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb6); [ zenon_intro zenon_H86 | zenon_intro zenon_Hb7 ]. % 217.93/218.18 apply (zenon_L128_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb7); [ zenon_intro zenon_Hb2 | zenon_intro zenon_Hb8 ]. % 217.93/218.18 apply (zenon_L96_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb8); [ zenon_intro zenon_Hb3 | zenon_intro zenon_Hb9 ]. % 217.93/218.18 apply (zenon_L97_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb9); [ zenon_intro zenon_Hb4 | zenon_intro zenon_Hb5 ]. % 217.93/218.18 apply (zenon_L86_); trivial. % 217.93/218.18 apply (zenon_L137_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hbc); [ zenon_intro zenon_H68 | zenon_intro zenon_Hbd ]. % 217.93/218.18 apply (zenon_L252_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hbd); [ zenon_intro zenon_H69 | zenon_intro zenon_Hbe ]. % 217.93/218.18 apply (zenon_L254_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hbe); [ zenon_intro zenon_H7d | zenon_intro zenon_Hba ]. % 217.93/218.18 apply (zenon_L255_); trivial. % 217.93/218.18 apply (zenon_L248_); trivial. % 217.93/218.18 (* end of lemma zenon_L256_ *) % 217.93/218.18 assert (zenon_L257_ : (((j (e22)) = (e10))\/(((j (e22)) = (e11))\/(((j (e22)) = (e12))\/(((j (e22)) = (e13))\/((j (e22)) = (e14)))))) -> ((h (e12)) = (e23)) -> ((j (h (e12))) = (e12)) -> (~((e12) = (e13))) -> ((h (e10)) = (e22)) -> ((j (h (e10))) = (e10)) -> ((op1 (e12) (e12)) = (e10)) -> ((op1 (e13) (e13)) = (e10)) -> (~((e11) = (e14))) -> (~((e12) = (e14))) -> ((h (e14)) = (e24)) -> ((j (h (e14))) = (e14)) -> (~((e13) = (e14))) -> (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> ((op2 (e23) (e23)) = (e24)) -> ((op1 (e10) (e10)) = (e10)) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((j (op2 (e24) (e24))) = (op1 (j (e24)) (j (e24)))) -> ((op2 (e24) (e24)) = (e22)) -> (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> (~((e10) = (e11))) -> (~((e10) = (e12))) -> (~((e10) = (e13))) -> ((op1 (e14) (e14)) = (e10)) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((op2 (e22) (e22)) = (e23)) -> (~((e10) = (e14))) -> False). % 217.93/218.18 do 0 intro. intros zenon_Hbb zenon_H10d zenon_Hc zenon_H1f zenon_H134 zenon_H2c zenon_He9 zenon_Ha8 zenon_Hc8 zenon_H26 zenon_He1 zenon_Hc2 zenon_H5b zenon_Hb6 zenon_H83 zenon_H6e zenon_H8c zenon_H74 zenon_H75 zenon_H9e zenon_H93 zenon_Hb zenon_H3b zenon_H6f zenon_Hac zenon_Ha3 zenon_H47. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hbb); [ zenon_intro zenon_H66 | zenon_intro zenon_Hbc ]. % 217.93/218.18 apply (zenon_L162_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hbc); [ zenon_intro zenon_H68 | zenon_intro zenon_Hbd ]. % 217.93/218.18 apply (zenon_L252_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hbd); [ zenon_intro zenon_H69 | zenon_intro zenon_Hbe ]. % 217.93/218.18 apply (zenon_L147_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hbe); [ zenon_intro zenon_H7d | zenon_intro zenon_Hba ]. % 217.93/218.18 apply (zenon_L123_); trivial. % 217.93/218.18 apply (zenon_L80_); trivial. % 217.93/218.18 (* end of lemma zenon_L257_ *) % 217.93/218.18 assert (zenon_L258_ : (((j (e22)) = (e10))\/(((j (e22)) = (e11))\/(((j (e22)) = (e12))\/(((j (e22)) = (e13))\/((j (e22)) = (e14)))))) -> ((h (e10)) = (e22)) -> ((j (h (e10))) = (e10)) -> ((op1 (e12) (e12)) = (e10)) -> ((op2 (e24) (e24)) = (e22)) -> ((j (op2 (e24) (e24))) = (op1 (j (e24)) (j (e24)))) -> (~((e11) = (e13))) -> (~((e13) = (e14))) -> (~((e10) = (e14))) -> ((op1 (e13) (e13)) = (e10)) -> (~((e10) = (e13))) -> (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> ((h (e13)) = (e24)) -> ((j (h (e13))) = (e13)) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((op1 (e10) (e10)) = (e10)) -> ((op2 (e23) (e23)) = (e24)) -> (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> (~((e10) = (e11))) -> (~((e10) = (e12))) -> ((op2 (e22) (e22)) = (e23)) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((op1 (e14) (e14)) = (e10)) -> (~((e12) = (e13))) -> ((j (h (e12))) = (e12)) -> ((h (e12)) = (e23)) -> (~((e12) = (e14))) -> False). % 217.93/218.18 do 0 intro. intros zenon_Hbb zenon_H134 zenon_H2c zenon_He9 zenon_H75 zenon_H74 zenon_H42 zenon_H5b zenon_H47 zenon_Ha8 zenon_H3b zenon_H9e zenon_Hf2 zenon_H3c zenon_H8c zenon_H6e zenon_H83 zenon_Hb6 zenon_H93 zenon_Hb zenon_Ha3 zenon_Hac zenon_H6f zenon_H1f zenon_Hc zenon_H10d zenon_H26. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hbb); [ zenon_intro zenon_H66 | zenon_intro zenon_Hbc ]. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb6); [ zenon_intro zenon_H86 | zenon_intro zenon_Hb7 ]. % 217.93/218.18 apply (zenon_L128_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb7); [ zenon_intro zenon_Hb2 | zenon_intro zenon_Hb8 ]. % 217.93/218.18 apply (zenon_L96_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb8); [ zenon_intro zenon_Hb3 | zenon_intro zenon_Hb9 ]. % 217.93/218.18 apply (zenon_L97_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb9); [ zenon_intro zenon_Hb4 | zenon_intro zenon_Hb5 ]. % 217.93/218.18 apply (zenon_L157_); trivial. % 217.93/218.18 apply (zenon_L158_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hbc); [ zenon_intro zenon_H68 | zenon_intro zenon_Hbd ]. % 217.93/218.18 apply (zenon_L252_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hbd); [ zenon_intro zenon_H69 | zenon_intro zenon_Hbe ]. % 217.93/218.18 apply (zenon_L254_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hbe); [ zenon_intro zenon_H7d | zenon_intro zenon_Hba ]. % 217.93/218.18 apply (zenon_L255_); trivial. % 217.93/218.18 apply (zenon_L159_); trivial. % 217.93/218.18 (* end of lemma zenon_L258_ *) % 217.93/218.18 assert (zenon_L259_ : (((j (e22)) = (e10))\/(((j (e22)) = (e11))\/(((j (e22)) = (e12))\/(((j (e22)) = (e13))\/((j (e22)) = (e14)))))) -> (~((e12) = (e14))) -> ((h (e12)) = (e24)) -> ((j (h (e12))) = (e12)) -> (~((e12) = (e13))) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((op2 (e23) (e23)) = (e24)) -> (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> (~((e13) = (e14))) -> ((op1 (e10) (e10)) = (e10)) -> ((h (e10)) = (e22)) -> ((j (h (e10))) = (e10)) -> ((op1 (e12) (e12)) = (e10)) -> ((op1 (e13) (e13)) = (e10)) -> (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> ((h (e14)) = (e23)) -> ((j (h (e14))) = (e14)) -> (~((e10) = (e11))) -> (~((e10) = (e12))) -> (~((e10) = (e13))) -> ((op1 (e14) (e14)) = (e10)) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((op2 (e22) (e22)) = (e23)) -> (~((e10) = (e14))) -> False). % 217.93/218.18 do 0 intro. intros zenon_Hbb zenon_H26 zenon_H111 zenon_Hc zenon_H1f zenon_H8c zenon_H83 zenon_H9e zenon_H5b zenon_H6e zenon_H134 zenon_H2c zenon_He9 zenon_Ha8 zenon_Hb6 zenon_Hd9 zenon_Hc2 zenon_H93 zenon_Hb zenon_H3b zenon_H6f zenon_Hac zenon_Ha3 zenon_H47. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hbb); [ zenon_intro zenon_H66 | zenon_intro zenon_Hbc ]. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb6); [ zenon_intro zenon_H86 | zenon_intro zenon_Hb7 ]. % 217.93/218.18 apply (zenon_L83_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb7); [ zenon_intro zenon_Hb2 | zenon_intro zenon_Hb8 ]. % 217.93/218.18 apply (zenon_L96_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb8); [ zenon_intro zenon_Hb3 | zenon_intro zenon_Hb9 ]. % 217.93/218.18 apply (zenon_L85_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb9); [ zenon_intro zenon_Hb4 | zenon_intro zenon_Hb5 ]. % 217.93/218.18 apply (zenon_L86_); trivial. % 217.93/218.18 apply (zenon_L181_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hbc); [ zenon_intro zenon_H68 | zenon_intro zenon_Hbd ]. % 217.93/218.18 apply (zenon_L252_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hbd); [ zenon_intro zenon_H69 | zenon_intro zenon_Hbe ]. % 217.93/218.18 apply (zenon_L246_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hbe); [ zenon_intro zenon_H7d | zenon_intro zenon_Hba ]. % 217.93/218.18 apply (zenon_L247_); trivial. % 217.93/218.18 apply (zenon_L248_); trivial. % 217.93/218.18 (* end of lemma zenon_L259_ *) % 217.93/218.18 assert (zenon_L260_ : ((j (h (e11))) = (e11)) -> ((h (e11)) = (e21)) -> ((j (e21)) = (e14)) -> (~((e11) = (e14))) -> False). % 217.93/218.18 do 0 intro. intros zenon_H105 zenon_H115 zenon_H5a zenon_Hc8. % 217.93/218.18 elim (classic ((e14) = (e14))); [ zenon_intro zenon_H27 | zenon_intro zenon_H24 ]. % 217.93/218.18 cut (((e14) = (e14)) = ((e11) = (e14))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_Hc8. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H27. % 217.93/218.18 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.18 cut (((e14) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H106]. % 217.93/218.18 congruence. % 217.93/218.18 cut (((j (h (e11))) = (e11)) = ((e14) = (e11))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H106. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H105. % 217.93/218.18 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.18 cut (((j (h (e11))) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H107]. % 217.93/218.18 congruence. % 217.93/218.18 elim (classic ((e14) = (e14))); [ zenon_intro zenon_H27 | zenon_intro zenon_H24 ]. % 217.93/218.18 cut (((e14) = (e14)) = ((j (h (e11))) = (e14))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H107. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H27. % 217.93/218.18 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.18 cut (((e14) = (j (h (e11))))); [idtac | apply NNPP; zenon_intro zenon_H108]. % 217.93/218.18 congruence. % 217.93/218.18 elim (classic ((j (h (e11))) = (j (h (e11))))); [ zenon_intro zenon_H109 | zenon_intro zenon_H10a ]. % 217.93/218.18 cut (((j (h (e11))) = (j (h (e11)))) = ((e14) = (j (h (e11))))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H108. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H109. % 217.93/218.18 cut (((j (h (e11))) = (j (h (e11))))); [idtac | apply NNPP; zenon_intro zenon_H10a]. % 217.93/218.18 cut (((j (h (e11))) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H107]. % 217.93/218.18 congruence. % 217.93/218.18 cut (((j (e21)) = (e14)) = ((j (h (e11))) = (e14))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H107. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H5a. % 217.93/218.18 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.18 cut (((j (e21)) = (j (h (e11))))); [idtac | apply NNPP; zenon_intro zenon_H11a]. % 217.93/218.18 congruence. % 217.93/218.18 elim (classic ((j (h (e11))) = (j (h (e11))))); [ zenon_intro zenon_H109 | zenon_intro zenon_H10a ]. % 217.93/218.18 cut (((j (h (e11))) = (j (h (e11)))) = ((j (e21)) = (j (h (e11))))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H11a. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H109. % 217.93/218.18 cut (((j (h (e11))) = (j (h (e11))))); [idtac | apply NNPP; zenon_intro zenon_H10a]. % 217.93/218.18 cut (((j (h (e11))) = (j (e21)))); [idtac | apply NNPP; zenon_intro zenon_H114]. % 217.93/218.18 congruence. % 217.93/218.18 apply (zenon_L188_); trivial. % 217.93/218.18 apply zenon_H10a. apply refl_equal. % 217.93/218.18 apply zenon_H10a. apply refl_equal. % 217.93/218.18 apply zenon_H24. apply refl_equal. % 217.93/218.18 apply zenon_H10a. apply refl_equal. % 217.93/218.18 apply zenon_H10a. apply refl_equal. % 217.93/218.18 apply zenon_H24. apply refl_equal. % 217.93/218.18 apply zenon_H24. apply refl_equal. % 217.93/218.18 apply zenon_H14. apply refl_equal. % 217.93/218.18 apply zenon_H24. apply refl_equal. % 217.93/218.18 apply zenon_H24. apply refl_equal. % 217.93/218.18 (* end of lemma zenon_L260_ *) % 217.93/218.18 assert (zenon_L261_ : (((j (e21)) = (e10))\/(((j (e21)) = (e11))\/(((j (e21)) = (e12))\/(((j (e21)) = (e13))\/((j (e21)) = (e14)))))) -> (~((e10) = (e14))) -> (~((e12) = (e14))) -> ((h (e14)) = (e21)) -> ((j (h (e14))) = (e14)) -> (~((e13) = (e14))) -> ((j (h (e11))) = (e11)) -> ((h (e11)) = (e21)) -> (~((e11) = (e14))) -> False). % 217.93/218.18 do 0 intro. intros zenon_H5f zenon_H47 zenon_H26 zenon_Hd0 zenon_Hc2 zenon_H5b zenon_H105 zenon_H115 zenon_Hc8. % 217.93/218.18 apply (zenon_or_s _ _ zenon_H5f); [ zenon_intro zenon_H51 | zenon_intro zenon_H60 ]. % 217.93/218.18 apply (zenon_L62_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_H60); [ zenon_intro zenon_H53 | zenon_intro zenon_H61 ]. % 217.93/218.18 apply (zenon_L63_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_H61); [ zenon_intro zenon_H54 | zenon_intro zenon_H62 ]. % 217.93/218.18 apply (zenon_L64_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_H62); [ zenon_intro zenon_H58 | zenon_intro zenon_H5a ]. % 217.93/218.18 apply (zenon_L65_); trivial. % 217.93/218.18 apply (zenon_L260_); trivial. % 217.93/218.18 (* end of lemma zenon_L261_ *) % 217.93/218.18 assert (zenon_L262_ : (((h (e14)) = (e20))\/(((h (e14)) = (e21))\/(((h (e14)) = (e22))\/(((h (e14)) = (e23))\/((h (e14)) = (e24)))))) -> ((h (e12)) = (e20)) -> ((j (h (e12))) = (e12)) -> (((j (e20)) = (e10))\/(((j (e20)) = (e11))\/(((j (e20)) = (e12))\/(((j (e20)) = (e13))\/((j (e20)) = (e14)))))) -> ((h (e11)) = (e21)) -> ((j (h (e11))) = (e11)) -> (((j (e21)) = (e10))\/(((j (e21)) = (e11))\/(((j (e21)) = (e12))\/(((j (e21)) = (e13))\/((j (e21)) = (e14)))))) -> ((op1 (e12) (e12)) = (e10)) -> (((j (e22)) = (e10))\/(((j (e22)) = (e11))\/(((j (e22)) = (e12))\/(((j (e22)) = (e13))\/((j (e22)) = (e14)))))) -> (~((e11) = (e13))) -> (~((e12) = (e13))) -> (~((e10) = (e14))) -> ((op2 (e22) (e22)) = (e23)) -> ((op1 (e13) (e13)) = (e10)) -> ((op1 (e14) (e14)) = (e10)) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> (~((e10) = (e13))) -> (~((e10) = (e12))) -> (~((e10) = (e11))) -> (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> ((op2 (e24) (e24)) = (e22)) -> ((j (op2 (e24) (e24))) = (op1 (j (e24)) (j (e24)))) -> (~((e11) = (e14))) -> (~((e12) = (e14))) -> ((j (h (e14))) = (e14)) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((op1 (e10) (e10)) = (e10)) -> ((op2 (e23) (e23)) = (e24)) -> (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> ((j (h (e13))) = (e13)) -> ((h (e13)) = (e22)) -> (~((e13) = (e14))) -> False). % 217.93/218.18 do 0 intro. intros zenon_Hf7 zenon_H7 zenon_Hc zenon_H2b zenon_H115 zenon_H105 zenon_H5f zenon_He9 zenon_Hbb zenon_H42 zenon_H1f zenon_H47 zenon_Ha3 zenon_Ha8 zenon_H6f zenon_Hac zenon_H3b zenon_Hb zenon_H93 zenon_H9e zenon_H75 zenon_H74 zenon_Hc8 zenon_H26 zenon_Hc2 zenon_H8c zenon_H6e zenon_H83 zenon_Hb6 zenon_H3c zenon_H64 zenon_H5b. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hf7); [ zenon_intro zenon_Hc0 | zenon_intro zenon_Hfb ]. % 217.93/218.18 apply (zenon_L210_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hfb); [ zenon_intro zenon_Hd0 | zenon_intro zenon_Hfc ]. % 217.93/218.18 apply (zenon_L261_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hfc); [ zenon_intro zenon_Hd4 | zenon_intro zenon_Hfd ]. % 217.93/218.18 apply (zenon_L245_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hfd); [ zenon_intro zenon_Hd9 | zenon_intro zenon_He1 ]. % 217.93/218.18 apply (zenon_L249_); trivial. % 217.93/218.18 apply (zenon_L250_); trivial. % 217.93/218.18 (* end of lemma zenon_L262_ *) % 217.93/218.18 assert (zenon_L263_ : ((j (h (e11))) = (e11)) -> ((h (e11)) = (e21)) -> ((j (e21)) = (e12)) -> (~((e11) = (e12))) -> False). % 217.93/218.18 do 0 intro. intros zenon_H105 zenon_H115 zenon_H54 zenon_H15. % 217.93/218.18 elim (classic ((e12) = (e12))); [ zenon_intro zenon_H31 | zenon_intro zenon_Ha ]. % 217.93/218.18 cut (((e12) = (e12)) = ((e11) = (e12))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H15. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H31. % 217.93/218.18 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.18 cut (((e12) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H125]. % 217.93/218.18 congruence. % 217.93/218.18 cut (((j (h (e11))) = (e11)) = ((e12) = (e11))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H125. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H105. % 217.93/218.18 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.18 cut (((j (h (e11))) = (e12))); [idtac | apply NNPP; zenon_intro zenon_H126]. % 217.93/218.18 congruence. % 217.93/218.18 elim (classic ((e12) = (e12))); [ zenon_intro zenon_H31 | zenon_intro zenon_Ha ]. % 217.93/218.18 cut (((e12) = (e12)) = ((j (h (e11))) = (e12))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H126. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H31. % 217.93/218.18 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.18 cut (((e12) = (j (h (e11))))); [idtac | apply NNPP; zenon_intro zenon_H127]. % 217.93/218.18 congruence. % 217.93/218.18 elim (classic ((j (h (e11))) = (j (h (e11))))); [ zenon_intro zenon_H109 | zenon_intro zenon_H10a ]. % 217.93/218.18 cut (((j (h (e11))) = (j (h (e11)))) = ((e12) = (j (h (e11))))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H127. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H109. % 217.93/218.18 cut (((j (h (e11))) = (j (h (e11))))); [idtac | apply NNPP; zenon_intro zenon_H10a]. % 217.93/218.18 cut (((j (h (e11))) = (e12))); [idtac | apply NNPP; zenon_intro zenon_H126]. % 217.93/218.18 congruence. % 217.93/218.18 cut (((j (e21)) = (e12)) = ((j (h (e11))) = (e12))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H126. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H54. % 217.93/218.18 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.18 cut (((j (e21)) = (j (h (e11))))); [idtac | apply NNPP; zenon_intro zenon_H11a]. % 217.93/218.18 congruence. % 217.93/218.18 elim (classic ((j (h (e11))) = (j (h (e11))))); [ zenon_intro zenon_H109 | zenon_intro zenon_H10a ]. % 217.93/218.18 cut (((j (h (e11))) = (j (h (e11)))) = ((j (e21)) = (j (h (e11))))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H11a. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H109. % 217.93/218.18 cut (((j (h (e11))) = (j (h (e11))))); [idtac | apply NNPP; zenon_intro zenon_H10a]. % 217.93/218.18 cut (((j (h (e11))) = (j (e21)))); [idtac | apply NNPP; zenon_intro zenon_H114]. % 217.93/218.18 congruence. % 217.93/218.18 apply (zenon_L188_); trivial. % 217.93/218.18 apply zenon_H10a. apply refl_equal. % 217.93/218.18 apply zenon_H10a. apply refl_equal. % 217.93/218.18 apply zenon_Ha. apply refl_equal. % 217.93/218.18 apply zenon_H10a. apply refl_equal. % 217.93/218.18 apply zenon_H10a. apply refl_equal. % 217.93/218.18 apply zenon_Ha. apply refl_equal. % 217.93/218.18 apply zenon_Ha. apply refl_equal. % 217.93/218.18 apply zenon_H14. apply refl_equal. % 217.93/218.18 apply zenon_Ha. apply refl_equal. % 217.93/218.18 apply zenon_Ha. apply refl_equal. % 217.93/218.18 (* end of lemma zenon_L263_ *) % 217.93/218.18 assert (zenon_L264_ : (((j (e21)) = (e10))\/(((j (e21)) = (e11))\/(((j (e21)) = (e12))\/(((j (e21)) = (e13))\/((j (e21)) = (e14)))))) -> (~((e10) = (e12))) -> (~((e11) = (e12))) -> ((h (e11)) = (e21)) -> ((j (h (e11))) = (e11)) -> (~((e12) = (e13))) -> ((j (h (e12))) = (e12)) -> ((h (e12)) = (e21)) -> (~((e12) = (e14))) -> False). % 217.93/218.18 do 0 intro. intros zenon_H5f zenon_Hb zenon_H15 zenon_H115 zenon_H105 zenon_H1f zenon_Hc zenon_H56 zenon_H26. % 217.93/218.18 apply (zenon_or_s _ _ zenon_H5f); [ zenon_intro zenon_H51 | zenon_intro zenon_H60 ]. % 217.93/218.18 apply (zenon_L236_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_H60); [ zenon_intro zenon_H53 | zenon_intro zenon_H61 ]. % 217.93/218.18 apply (zenon_L237_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_H61); [ zenon_intro zenon_H54 | zenon_intro zenon_H62 ]. % 217.93/218.18 apply (zenon_L263_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_H62); [ zenon_intro zenon_H58 | zenon_intro zenon_H5a ]. % 217.93/218.18 apply (zenon_L24_); trivial. % 217.93/218.18 apply (zenon_L66_); trivial. % 217.93/218.18 (* end of lemma zenon_L264_ *) % 217.93/218.18 assert (zenon_L265_ : (((j (e22)) = (e10))\/(((j (e22)) = (e11))\/(((j (e22)) = (e12))\/(((j (e22)) = (e13))\/((j (e22)) = (e14)))))) -> ((h (e10)) = (e22)) -> ((j (h (e10))) = (e10)) -> ((op1 (e12) (e12)) = (e10)) -> (~((e10) = (e14))) -> ((op1 (e13) (e13)) = (e10)) -> (~((e10) = (e13))) -> (~((e10) = (e12))) -> (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> ((op2 (e24) (e24)) = (e22)) -> ((j (op2 (e24) (e24))) = (op1 (j (e24)) (j (e24)))) -> (~((e12) = (e14))) -> ((h (e14)) = (e24)) -> ((j (h (e14))) = (e14)) -> (~((e13) = (e14))) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((op1 (e10) (e10)) = (e10)) -> ((op2 (e23) (e23)) = (e24)) -> (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> (~((e10) = (e11))) -> ((op2 (e22) (e22)) = (e23)) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((op1 (e14) (e14)) = (e10)) -> (~((e11) = (e12))) -> (~((e11) = (e13))) -> ((j (h (e11))) = (e11)) -> ((h (e11)) = (e23)) -> (~((e11) = (e14))) -> False). % 217.93/218.18 do 0 intro. intros zenon_Hbb zenon_H134 zenon_H2c zenon_He9 zenon_H47 zenon_Ha8 zenon_H3b zenon_Hb zenon_H9e zenon_H75 zenon_H74 zenon_H26 zenon_He1 zenon_Hc2 zenon_H5b zenon_H8c zenon_H6e zenon_H83 zenon_Hb6 zenon_H93 zenon_Ha3 zenon_Hac zenon_H6f zenon_H15 zenon_H42 zenon_H105 zenon_H122 zenon_Hc8. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hbb); [ zenon_intro zenon_H66 | zenon_intro zenon_Hbc ]. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb6); [ zenon_intro zenon_H86 | zenon_intro zenon_Hb7 ]. % 217.93/218.18 apply (zenon_L92_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb7); [ zenon_intro zenon_Hb2 | zenon_intro zenon_Hb8 ]. % 217.93/218.18 apply (zenon_L96_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb8); [ zenon_intro zenon_Hb3 | zenon_intro zenon_Hb9 ]. % 217.93/218.18 apply (zenon_L199_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb9); [ zenon_intro zenon_Hb4 | zenon_intro zenon_Hb5 ]. % 217.93/218.18 apply (zenon_L196_); trivial. % 217.93/218.18 apply (zenon_L200_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hbc); [ zenon_intro zenon_H68 | zenon_intro zenon_Hbd ]. % 217.93/218.18 apply (zenon_L252_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hbd); [ zenon_intro zenon_H69 | zenon_intro zenon_Hbe ]. % 217.93/218.18 apply (zenon_L203_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hbe); [ zenon_intro zenon_H7d | zenon_intro zenon_Hba ]. % 217.93/218.18 apply (zenon_L123_); trivial. % 217.93/218.18 apply (zenon_L201_); trivial. % 217.93/218.18 (* end of lemma zenon_L265_ *) % 217.93/218.18 assert (zenon_L266_ : (((j (e22)) = (e10))\/(((j (e22)) = (e11))\/(((j (e22)) = (e12))\/(((j (e22)) = (e13))\/((j (e22)) = (e14)))))) -> (~((e11) = (e14))) -> ((h (e11)) = (e23)) -> ((j (h (e11))) = (e11)) -> (~((e11) = (e12))) -> ((h (e10)) = (e22)) -> ((j (h (e10))) = (e10)) -> ((op1 (e12) (e12)) = (e10)) -> (~((e11) = (e13))) -> (~((e12) = (e13))) -> (~((e13) = (e14))) -> ((op1 (e13) (e13)) = (e10)) -> ((h (e13)) = (e24)) -> ((j (h (e13))) = (e13)) -> (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> ((op2 (e23) (e23)) = (e24)) -> ((op1 (e10) (e10)) = (e10)) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((j (op2 (e24) (e24))) = (op1 (j (e24)) (j (e24)))) -> ((op2 (e24) (e24)) = (e22)) -> (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> (~((e10) = (e11))) -> (~((e10) = (e12))) -> (~((e10) = (e13))) -> ((op1 (e14) (e14)) = (e10)) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((op2 (e22) (e22)) = (e23)) -> (~((e10) = (e14))) -> False). % 217.93/218.18 do 0 intro. intros zenon_Hbb zenon_Hc8 zenon_H122 zenon_H105 zenon_H15 zenon_H134 zenon_H2c zenon_He9 zenon_H42 zenon_H1f zenon_H5b zenon_Ha8 zenon_Hf2 zenon_H3c zenon_Hb6 zenon_H83 zenon_H6e zenon_H8c zenon_H74 zenon_H75 zenon_H9e zenon_H93 zenon_Hb zenon_H3b zenon_H6f zenon_Hac zenon_Ha3 zenon_H47. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hbb); [ zenon_intro zenon_H66 | zenon_intro zenon_Hbc ]. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb6); [ zenon_intro zenon_H86 | zenon_intro zenon_Hb7 ]. % 217.93/218.18 apply (zenon_L128_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb7); [ zenon_intro zenon_Hb2 | zenon_intro zenon_Hb8 ]. % 217.93/218.18 apply (zenon_L96_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb8); [ zenon_intro zenon_Hb3 | zenon_intro zenon_Hb9 ]. % 217.93/218.18 apply (zenon_L199_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb9); [ zenon_intro zenon_Hb4 | zenon_intro zenon_Hb5 ]. % 217.93/218.18 apply (zenon_L196_); trivial. % 217.93/218.18 apply (zenon_L200_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hbc); [ zenon_intro zenon_H68 | zenon_intro zenon_Hbd ]. % 217.93/218.18 apply (zenon_L252_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hbd); [ zenon_intro zenon_H69 | zenon_intro zenon_Hbe ]. % 217.93/218.18 apply (zenon_L254_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hbe); [ zenon_intro zenon_H7d | zenon_intro zenon_Hba ]. % 217.93/218.18 apply (zenon_L255_); trivial. % 217.93/218.18 apply (zenon_L80_); trivial. % 217.93/218.18 (* end of lemma zenon_L266_ *) % 217.93/218.18 assert (zenon_L267_ : (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> (~((e12) = (e14))) -> ((h (e12)) = (e24)) -> ((j (h (e12))) = (e12)) -> (~((e12) = (e13))) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((op1 (e10) (e10)) = (e10)) -> ((op2 (e23) (e23)) = (e24)) -> (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> (~((e10) = (e11))) -> (~((e10) = (e12))) -> (~((e10) = (e13))) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((j (e22)) = (e12)) -> ((op1 (e14) (e14)) = (e10)) -> ((op1 (e12) (e12)) = (e10)) -> ((op2 (e22) (e22)) = (e23)) -> (~((e10) = (e14))) -> False). % 217.93/218.18 do 0 intro. intros zenon_Hb6 zenon_H26 zenon_H111 zenon_Hc zenon_H1f zenon_H8c zenon_H6e zenon_H83 zenon_H9e zenon_H93 zenon_Hb zenon_H3b zenon_Hac zenon_H69 zenon_H6f zenon_He9 zenon_Ha3 zenon_H47. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb6); [ zenon_intro zenon_H86 | zenon_intro zenon_Hb7 ]. % 217.93/218.18 apply (zenon_L178_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb7); [ zenon_intro zenon_Hb2 | zenon_intro zenon_Hb8 ]. % 217.93/218.18 apply (zenon_L118_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb8); [ zenon_intro zenon_Hb3 | zenon_intro zenon_Hb9 ]. % 217.93/218.18 apply (zenon_L119_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb9); [ zenon_intro zenon_Hb4 | zenon_intro zenon_Hb5 ]. % 217.93/218.18 apply (zenon_L120_); trivial. % 217.93/218.18 apply (zenon_L146_); trivial. % 217.93/218.18 (* end of lemma zenon_L267_ *) % 217.93/218.18 assert (zenon_L268_ : (~((j (h (e10))) = (j (e23)))) -> ((h (e10)) = (e23)) -> False). % 217.93/218.18 do 0 intro. intros zenon_H13a zenon_H13b. % 217.93/218.18 cut (((h (e10)) = (e23))); [idtac | apply NNPP; zenon_intro zenon_H13c]. % 217.93/218.18 congruence. % 217.93/218.18 exact (zenon_H13c zenon_H13b). % 217.93/218.18 (* end of lemma zenon_L268_ *) % 217.93/218.18 assert (zenon_L269_ : ((j (h (e10))) = (e10)) -> ((h (e10)) = (e23)) -> ((j (e23)) = (e13)) -> (~((e10) = (e13))) -> False). % 217.93/218.18 do 0 intro. intros zenon_H2c zenon_H13b zenon_Hb4 zenon_H3b. % 217.93/218.18 elim (classic ((e13) = (e13))); [ zenon_intro zenon_H20 | zenon_intro zenon_H1d ]. % 217.93/218.18 cut (((e13) = (e13)) = ((e10) = (e13))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H3b. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H20. % 217.93/218.18 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.18 cut (((e13) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H4b]. % 217.93/218.18 congruence. % 217.93/218.18 cut (((j (h (e10))) = (e10)) = ((e13) = (e10))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H4b. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H2c. % 217.93/218.18 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.18 cut (((j (h (e10))) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H4c]. % 217.93/218.18 congruence. % 217.93/218.18 elim (classic ((e13) = (e13))); [ zenon_intro zenon_H20 | zenon_intro zenon_H1d ]. % 217.93/218.18 cut (((e13) = (e13)) = ((j (h (e10))) = (e13))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H4c. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H20. % 217.93/218.18 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.18 cut (((e13) = (j (h (e10))))); [idtac | apply NNPP; zenon_intro zenon_H4d]. % 217.93/218.18 congruence. % 217.93/218.18 elim (classic ((j (h (e10))) = (j (h (e10))))); [ zenon_intro zenon_H35 | zenon_intro zenon_H36 ]. % 217.93/218.18 cut (((j (h (e10))) = (j (h (e10)))) = ((e13) = (j (h (e10))))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H4d. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H35. % 217.93/218.18 cut (((j (h (e10))) = (j (h (e10))))); [idtac | apply NNPP; zenon_intro zenon_H36]. % 217.93/218.18 cut (((j (h (e10))) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H4c]. % 217.93/218.18 congruence. % 217.93/218.18 cut (((j (e23)) = (e13)) = ((j (h (e10))) = (e13))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H4c. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_Hb4. % 217.93/218.18 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.18 cut (((j (e23)) = (j (h (e10))))); [idtac | apply NNPP; zenon_intro zenon_H13d]. % 217.93/218.18 congruence. % 217.93/218.18 elim (classic ((j (h (e10))) = (j (h (e10))))); [ zenon_intro zenon_H35 | zenon_intro zenon_H36 ]. % 217.93/218.18 cut (((j (h (e10))) = (j (h (e10)))) = ((j (e23)) = (j (h (e10))))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H13d. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H35. % 217.93/218.18 cut (((j (h (e10))) = (j (h (e10))))); [idtac | apply NNPP; zenon_intro zenon_H36]. % 217.93/218.18 cut (((j (h (e10))) = (j (e23)))); [idtac | apply NNPP; zenon_intro zenon_H13a]. % 217.93/218.18 congruence. % 217.93/218.18 apply (zenon_L268_); trivial. % 217.93/218.18 apply zenon_H36. apply refl_equal. % 217.93/218.18 apply zenon_H36. apply refl_equal. % 217.93/218.18 apply zenon_H1d. apply refl_equal. % 217.93/218.18 apply zenon_H36. apply refl_equal. % 217.93/218.18 apply zenon_H36. apply refl_equal. % 217.93/218.18 apply zenon_H1d. apply refl_equal. % 217.93/218.18 apply zenon_H1d. apply refl_equal. % 217.93/218.18 apply zenon_H9. apply refl_equal. % 217.93/218.18 apply zenon_H1d. apply refl_equal. % 217.93/218.18 apply zenon_H1d. apply refl_equal. % 217.93/218.18 (* end of lemma zenon_L269_ *) % 217.93/218.18 assert (zenon_L270_ : (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> (~((e11) = (e13))) -> (~((e12) = (e13))) -> (~((e10) = (e13))) -> ((h (e10)) = (e23)) -> ((j (h (e10))) = (e10)) -> ((j (h (e13))) = (e13)) -> ((h (e13)) = (e23)) -> (~((e13) = (e14))) -> False). % 217.93/218.18 do 0 intro. intros zenon_Hb6 zenon_H42 zenon_H1f zenon_H3b zenon_H13b zenon_H2c zenon_H3c zenon_Hdd zenon_H5b. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb6); [ zenon_intro zenon_H86 | zenon_intro zenon_Hb7 ]. % 217.93/218.18 apply (zenon_L114_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb7); [ zenon_intro zenon_Hb2 | zenon_intro zenon_Hb8 ]. % 217.93/218.18 apply (zenon_L99_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb8); [ zenon_intro zenon_Hb3 | zenon_intro zenon_Hb9 ]. % 217.93/218.18 apply (zenon_L169_); trivial. % 217.93/218.18 apply (zenon_or_s _ _ zenon_Hb9); [ zenon_intro zenon_Hb4 | zenon_intro zenon_Hb5 ]. % 217.93/218.18 apply (zenon_L269_); trivial. % 217.93/218.18 apply (zenon_L88_); trivial. % 217.93/218.18 (* end of lemma zenon_L270_ *) % 217.93/218.18 assert (zenon_L271_ : ((j (h (e10))) = (e10)) -> ((h (e10)) = (e23)) -> ((j (e23)) = (e11)) -> (~((e10) = (e11))) -> False). % 217.93/218.18 do 0 intro. intros zenon_H2c zenon_H13b zenon_Hb2 zenon_H93. % 217.93/218.18 elim (classic ((e11) = (e11))); [ zenon_intro zenon_H18 | zenon_intro zenon_H14 ]. % 217.93/218.18 cut (((e11) = (e11)) = ((e10) = (e11))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H93. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H18. % 217.93/218.18 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.18 cut (((e11) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H94]. % 217.93/218.18 congruence. % 217.93/218.18 cut (((j (h (e10))) = (e10)) = ((e11) = (e10))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H94. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H2c. % 217.93/218.18 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.18 cut (((j (h (e10))) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H135]. % 217.93/218.18 congruence. % 217.93/218.18 elim (classic ((e11) = (e11))); [ zenon_intro zenon_H18 | zenon_intro zenon_H14 ]. % 217.93/218.18 cut (((e11) = (e11)) = ((j (h (e10))) = (e11))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H135. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H18. % 217.93/218.18 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.18 cut (((e11) = (j (h (e10))))); [idtac | apply NNPP; zenon_intro zenon_H136]. % 217.93/218.18 congruence. % 217.93/218.18 elim (classic ((j (h (e10))) = (j (h (e10))))); [ zenon_intro zenon_H35 | zenon_intro zenon_H36 ]. % 217.93/218.18 cut (((j (h (e10))) = (j (h (e10)))) = ((e11) = (j (h (e10))))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H136. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H35. % 217.93/218.18 cut (((j (h (e10))) = (j (h (e10))))); [idtac | apply NNPP; zenon_intro zenon_H36]. % 217.93/218.18 cut (((j (h (e10))) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H135]. % 217.93/218.18 congruence. % 217.93/218.18 cut (((j (e23)) = (e11)) = ((j (h (e10))) = (e11))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H135. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_Hb2. % 217.93/218.18 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.18 cut (((j (e23)) = (j (h (e10))))); [idtac | apply NNPP; zenon_intro zenon_H13d]. % 217.93/218.18 congruence. % 217.93/218.18 elim (classic ((j (h (e10))) = (j (h (e10))))); [ zenon_intro zenon_H35 | zenon_intro zenon_H36 ]. % 217.93/218.18 cut (((j (h (e10))) = (j (h (e10)))) = ((j (e23)) = (j (h (e10))))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H13d. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H35. % 217.93/218.18 cut (((j (h (e10))) = (j (h (e10))))); [idtac | apply NNPP; zenon_intro zenon_H36]. % 217.93/218.18 cut (((j (h (e10))) = (j (e23)))); [idtac | apply NNPP; zenon_intro zenon_H13a]. % 217.93/218.18 congruence. % 217.93/218.18 apply (zenon_L268_); trivial. % 217.93/218.18 apply zenon_H36. apply refl_equal. % 217.93/218.18 apply zenon_H36. apply refl_equal. % 217.93/218.18 apply zenon_H14. apply refl_equal. % 217.93/218.18 apply zenon_H36. apply refl_equal. % 217.93/218.18 apply zenon_H36. apply refl_equal. % 217.93/218.18 apply zenon_H14. apply refl_equal. % 217.93/218.18 apply zenon_H14. apply refl_equal. % 217.93/218.18 apply zenon_H9. apply refl_equal. % 217.93/218.18 apply zenon_H14. apply refl_equal. % 217.93/218.18 apply zenon_H14. apply refl_equal. % 217.93/218.18 (* end of lemma zenon_L271_ *) % 217.93/218.18 assert (zenon_L272_ : ((j (h (e10))) = (e10)) -> ((h (e10)) = (e23)) -> ((j (e23)) = (e12)) -> (~((e10) = (e12))) -> False). % 217.93/218.18 do 0 intro. intros zenon_H2c zenon_H13b zenon_Hb3 zenon_Hb. % 217.93/218.18 elim (classic ((e12) = (e12))); [ zenon_intro zenon_H31 | zenon_intro zenon_Ha ]. % 217.93/218.18 cut (((e12) = (e12)) = ((e10) = (e12))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_Hb. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H31. % 217.93/218.18 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.18 cut (((e12) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H32]. % 217.93/218.18 congruence. % 217.93/218.18 cut (((j (h (e10))) = (e10)) = ((e12) = (e10))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H32. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H2c. % 217.93/218.18 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.18 cut (((j (h (e10))) = (e12))); [idtac | apply NNPP; zenon_intro zenon_H33]. % 217.93/218.18 congruence. % 217.93/218.18 elim (classic ((e12) = (e12))); [ zenon_intro zenon_H31 | zenon_intro zenon_Ha ]. % 217.93/218.18 cut (((e12) = (e12)) = ((j (h (e10))) = (e12))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H33. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H31. % 217.93/218.18 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.18 cut (((e12) = (j (h (e10))))); [idtac | apply NNPP; zenon_intro zenon_H34]. % 217.93/218.18 congruence. % 217.93/218.18 elim (classic ((j (h (e10))) = (j (h (e10))))); [ zenon_intro zenon_H35 | zenon_intro zenon_H36 ]. % 217.93/218.18 cut (((j (h (e10))) = (j (h (e10)))) = ((e12) = (j (h (e10))))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H34. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H35. % 217.93/218.18 cut (((j (h (e10))) = (j (h (e10))))); [idtac | apply NNPP; zenon_intro zenon_H36]. % 217.93/218.18 cut (((j (h (e10))) = (e12))); [idtac | apply NNPP; zenon_intro zenon_H33]. % 217.93/218.18 congruence. % 217.93/218.18 cut (((j (e23)) = (e12)) = ((j (h (e10))) = (e12))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H33. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_Hb3. % 217.93/218.18 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.18 cut (((j (e23)) = (j (h (e10))))); [idtac | apply NNPP; zenon_intro zenon_H13d]. % 217.93/218.18 congruence. % 217.93/218.18 elim (classic ((j (h (e10))) = (j (h (e10))))); [ zenon_intro zenon_H35 | zenon_intro zenon_H36 ]. % 217.93/218.18 cut (((j (h (e10))) = (j (h (e10)))) = ((j (e23)) = (j (h (e10))))). % 217.93/218.18 intro zenon_D_pnotp. % 217.93/218.18 apply zenon_H13d. % 217.93/218.18 rewrite <- zenon_D_pnotp. % 217.93/218.18 exact zenon_H35. % 217.93/218.18 cut (((j (h (e10))) = (j (h (e10))))); [idtac | apply NNPP; zenon_intro zenon_H36]. % 217.93/218.18 cut (((j (h (e10))) = (j (e23)))); [idtac | apply NNPP; zenon_intro zenon_H13a]. % 217.93/218.18 congruence. % 217.93/218.18 apply (zenon_L268_); trivial. % 217.93/218.18 apply zenon_H36. apply refl_equal. % 217.93/218.18 apply zenon_H36. apply refl_equal. % 217.93/218.18 apply zenon_Ha. apply refl_equal. % 217.93/218.18 apply zenon_H36. apply refl_equal. % 217.93/218.18 apply zenon_H36. apply refl_equal. % 217.93/218.18 apply zenon_Ha. apply refl_equal. % 217.93/218.18 apply zenon_Ha. apply refl_equal. % 217.93/218.18 apply zenon_H9. apply refl_equal. % 217.93/218.18 apply zenon_Ha. apply refl_equal. % 217.93/218.18 apply zenon_Ha. apply refl_equal. % 217.93/218.18 (* end of lemma zenon_L272_ *) % 217.93/218.18 assert (zenon_L273_ : ((j (h (e10))) = (e10)) -> ((h (e10)) = (e23)) -> ((j (e23)) = (e14)) -> (~((e10) = (e14))) -> False). % 217.93/218.18 do 0 intro. intros zenon_H2c zenon_H13b zenon_Hb5 zenon_H47. % 217.93/218.18 elim (classic ((e14) = (e14))); [ zenon_intro zenon_H27 | zenon_intro zenon_H24 ]. % 217.93/218.18 cut (((e14) = (e14)) = ((e10) = (e14))). % 217.93/218.19 intro zenon_D_pnotp. % 217.93/218.19 apply zenon_H47. % 217.93/218.19 rewrite <- zenon_D_pnotp. % 217.93/218.19 exact zenon_H27. % 217.93/218.19 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.19 cut (((e14) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H48]. % 217.93/218.19 congruence. % 217.93/218.19 cut (((j (h (e10))) = (e10)) = ((e14) = (e10))). % 217.93/218.19 intro zenon_D_pnotp. % 217.93/218.19 apply zenon_H48. % 217.93/218.19 rewrite <- zenon_D_pnotp. % 217.93/218.19 exact zenon_H2c. % 217.93/218.19 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.19 cut (((j (h (e10))) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H49]. % 217.93/218.19 congruence. % 217.93/218.19 elim (classic ((e14) = (e14))); [ zenon_intro zenon_H27 | zenon_intro zenon_H24 ]. % 217.93/218.19 cut (((e14) = (e14)) = ((j (h (e10))) = (e14))). % 217.93/218.19 intro zenon_D_pnotp. % 217.93/218.19 apply zenon_H49. % 217.93/218.19 rewrite <- zenon_D_pnotp. % 217.93/218.19 exact zenon_H27. % 217.93/218.19 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.19 cut (((e14) = (j (h (e10))))); [idtac | apply NNPP; zenon_intro zenon_H4a]. % 217.93/218.19 congruence. % 217.93/218.19 elim (classic ((j (h (e10))) = (j (h (e10))))); [ zenon_intro zenon_H35 | zenon_intro zenon_H36 ]. % 217.93/218.19 cut (((j (h (e10))) = (j (h (e10)))) = ((e14) = (j (h (e10))))). % 217.93/218.19 intro zenon_D_pnotp. % 217.93/218.19 apply zenon_H4a. % 217.93/218.19 rewrite <- zenon_D_pnotp. % 217.93/218.19 exact zenon_H35. % 217.93/218.19 cut (((j (h (e10))) = (j (h (e10))))); [idtac | apply NNPP; zenon_intro zenon_H36]. % 217.93/218.19 cut (((j (h (e10))) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H49]. % 217.93/218.19 congruence. % 217.93/218.19 cut (((j (e23)) = (e14)) = ((j (h (e10))) = (e14))). % 217.93/218.19 intro zenon_D_pnotp. % 217.93/218.19 apply zenon_H49. % 217.93/218.19 rewrite <- zenon_D_pnotp. % 217.93/218.19 exact zenon_Hb5. % 217.93/218.19 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.19 cut (((j (e23)) = (j (h (e10))))); [idtac | apply NNPP; zenon_intro zenon_H13d]. % 217.93/218.19 congruence. % 217.93/218.19 elim (classic ((j (h (e10))) = (j (h (e10))))); [ zenon_intro zenon_H35 | zenon_intro zenon_H36 ]. % 217.93/218.19 cut (((j (h (e10))) = (j (h (e10)))) = ((j (e23)) = (j (h (e10))))). % 217.93/218.19 intro zenon_D_pnotp. % 217.93/218.19 apply zenon_H13d. % 217.93/218.19 rewrite <- zenon_D_pnotp. % 217.93/218.19 exact zenon_H35. % 217.93/218.19 cut (((j (h (e10))) = (j (h (e10))))); [idtac | apply NNPP; zenon_intro zenon_H36]. % 217.93/218.19 cut (((j (h (e10))) = (j (e23)))); [idtac | apply NNPP; zenon_intro zenon_H13a]. % 217.93/218.19 congruence. % 217.93/218.19 apply (zenon_L268_); trivial. % 217.93/218.19 apply zenon_H36. apply refl_equal. % 217.93/218.19 apply zenon_H36. apply refl_equal. % 217.93/218.19 apply zenon_H24. apply refl_equal. % 217.93/218.19 apply zenon_H36. apply refl_equal. % 217.93/218.19 apply zenon_H36. apply refl_equal. % 217.93/218.19 apply zenon_H24. apply refl_equal. % 217.93/218.19 apply zenon_H24. apply refl_equal. % 217.93/218.19 apply zenon_H9. apply refl_equal. % 217.93/218.19 apply zenon_H24. apply refl_equal. % 217.93/218.19 apply zenon_H24. apply refl_equal. % 217.93/218.19 (* end of lemma zenon_L273_ *) % 217.93/218.19 assert (zenon_L274_ : (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> ((op2 (e23) (e23)) = (e24)) -> ((op1 (e10) (e10)) = (e10)) -> ((op1 (e14) (e14)) = (e10)) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((j (h (e13))) = (e13)) -> ((h (e13)) = (e24)) -> (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> (~((e10) = (e11))) -> (~((e10) = (e12))) -> (~((e10) = (e13))) -> ((j (h (e10))) = (e10)) -> ((h (e10)) = (e23)) -> (~((e10) = (e14))) -> False). % 217.93/218.19 do 0 intro. intros zenon_Hb6 zenon_H83 zenon_H6e zenon_H6f zenon_H8c zenon_H3c zenon_Hf2 zenon_H9e zenon_H93 zenon_Hb zenon_H3b zenon_H2c zenon_H13b zenon_H47. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hb6); [ zenon_intro zenon_H86 | zenon_intro zenon_Hb7 ]. % 217.93/218.19 apply (zenon_L128_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hb7); [ zenon_intro zenon_Hb2 | zenon_intro zenon_Hb8 ]. % 217.93/218.19 apply (zenon_L271_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hb8); [ zenon_intro zenon_Hb3 | zenon_intro zenon_Hb9 ]. % 217.93/218.19 apply (zenon_L272_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hb9); [ zenon_intro zenon_Hb4 | zenon_intro zenon_Hb5 ]. % 217.93/218.19 apply (zenon_L269_); trivial. % 217.93/218.19 apply (zenon_L273_); trivial. % 217.93/218.19 (* end of lemma zenon_L274_ *) % 217.93/218.19 assert (zenon_L275_ : (((j (e22)) = (e10))\/(((j (e22)) = (e11))\/(((j (e22)) = (e12))\/(((j (e22)) = (e13))\/((j (e22)) = (e14)))))) -> (~((e10) = (e14))) -> (~((e11) = (e14))) -> ((h (e14)) = (e22)) -> ((j (h (e14))) = (e14)) -> (~((e13) = (e14))) -> ((j (h (e12))) = (e12)) -> ((h (e12)) = (e22)) -> (~((e12) = (e14))) -> False). % 217.93/218.19 do 0 intro. intros zenon_Hbb zenon_H47 zenon_Hc8 zenon_Hd4 zenon_Hc2 zenon_H5b zenon_Hc zenon_Hff zenon_H26. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hbb); [ zenon_intro zenon_H66 | zenon_intro zenon_Hbc ]. % 217.93/218.19 apply (zenon_L69_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hbc); [ zenon_intro zenon_H68 | zenon_intro zenon_Hbd ]. % 217.93/218.19 apply (zenon_L70_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hbd); [ zenon_intro zenon_H69 | zenon_intro zenon_Hbe ]. % 217.93/218.19 apply (zenon_L71_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hbe); [ zenon_intro zenon_H7d | zenon_intro zenon_Hba ]. % 217.93/218.19 apply (zenon_L72_); trivial. % 217.93/218.19 apply (zenon_L149_); trivial. % 217.93/218.19 (* end of lemma zenon_L275_ *) % 217.93/218.19 assert (zenon_L276_ : (((j (e22)) = (e10))\/(((j (e22)) = (e11))\/(((j (e22)) = (e12))\/(((j (e22)) = (e13))\/((j (e22)) = (e14)))))) -> (~((e11) = (e12))) -> ((op1 (e12) (e12)) = (e10)) -> (~((e12) = (e13))) -> ((h (e12)) = (e22)) -> ((j (h (e12))) = (e12)) -> (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> ((h (e14)) = (e23)) -> ((j (h (e14))) = (e14)) -> (~((e10) = (e11))) -> (~((e10) = (e12))) -> (~((e10) = (e13))) -> ((op1 (e14) (e14)) = (e10)) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((op2 (e22) (e22)) = (e23)) -> (~((e10) = (e14))) -> False). % 217.93/218.19 do 0 intro. intros zenon_Hbb zenon_H15 zenon_He9 zenon_H1f zenon_Hff zenon_Hc zenon_Hb6 zenon_Hd9 zenon_Hc2 zenon_H93 zenon_Hb zenon_H3b zenon_H6f zenon_Hac zenon_Ha3 zenon_H47. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hbb); [ zenon_intro zenon_H66 | zenon_intro zenon_Hbc ]. % 217.93/218.19 apply (zenon_L142_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hbc); [ zenon_intro zenon_H68 | zenon_intro zenon_Hbd ]. % 217.93/218.19 apply (zenon_L143_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hbd); [ zenon_intro zenon_H69 | zenon_intro zenon_Hbe ]. % 217.93/218.19 apply (zenon_L246_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hbe); [ zenon_intro zenon_H7d | zenon_intro zenon_Hba ]. % 217.93/218.19 apply (zenon_L148_); trivial. % 217.93/218.19 apply (zenon_L248_); trivial. % 217.93/218.19 (* end of lemma zenon_L276_ *) % 217.93/218.19 assert (zenon_L277_ : (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> ((op2 (e23) (e23)) = (e24)) -> ((op1 (e10) (e10)) = (e10)) -> ((op1 (e14) (e14)) = (e10)) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((j (h (e14))) = (e14)) -> ((h (e14)) = (e24)) -> (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> (~((e10) = (e11))) -> (~((e10) = (e12))) -> (~((e10) = (e13))) -> ((j (h (e10))) = (e10)) -> ((h (e10)) = (e23)) -> (~((e10) = (e14))) -> False). % 217.93/218.19 do 0 intro. intros zenon_Hb6 zenon_H83 zenon_H6e zenon_H6f zenon_H8c zenon_Hc2 zenon_He1 zenon_H9e zenon_H93 zenon_Hb zenon_H3b zenon_H2c zenon_H13b zenon_H47. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hb6); [ zenon_intro zenon_H86 | zenon_intro zenon_Hb7 ]. % 217.93/218.19 apply (zenon_L92_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hb7); [ zenon_intro zenon_Hb2 | zenon_intro zenon_Hb8 ]. % 217.93/218.19 apply (zenon_L271_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hb8); [ zenon_intro zenon_Hb3 | zenon_intro zenon_Hb9 ]. % 217.93/218.19 apply (zenon_L272_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hb9); [ zenon_intro zenon_Hb4 | zenon_intro zenon_Hb5 ]. % 217.93/218.19 apply (zenon_L269_); trivial. % 217.93/218.19 apply (zenon_L273_); trivial. % 217.93/218.19 (* end of lemma zenon_L277_ *) % 217.93/218.19 assert (zenon_L278_ : (((j (e22)) = (e10))\/(((j (e22)) = (e11))\/(((j (e22)) = (e12))\/(((j (e22)) = (e13))\/((j (e22)) = (e14)))))) -> (~((e10) = (e13))) -> (~((e11) = (e13))) -> (~((e12) = (e13))) -> ((h (e12)) = (e22)) -> ((j (h (e12))) = (e12)) -> ((j (h (e13))) = (e13)) -> ((h (e13)) = (e22)) -> (~((e13) = (e14))) -> False). % 217.93/218.19 do 0 intro. intros zenon_Hbb zenon_H3b zenon_H42 zenon_H1f zenon_Hff zenon_Hc zenon_H3c zenon_H64 zenon_H5b. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hbb); [ zenon_intro zenon_H66 | zenon_intro zenon_Hbc ]. % 217.93/218.19 apply (zenon_L28_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hbc); [ zenon_intro zenon_H68 | zenon_intro zenon_Hbd ]. % 217.93/218.19 apply (zenon_L29_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hbd); [ zenon_intro zenon_H69 | zenon_intro zenon_Hbe ]. % 217.93/218.19 apply (zenon_L30_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hbe); [ zenon_intro zenon_H7d | zenon_intro zenon_Hba ]. % 217.93/218.19 apply (zenon_L148_); trivial. % 217.93/218.19 apply (zenon_L53_); trivial. % 217.93/218.19 (* end of lemma zenon_L278_ *) % 217.93/218.19 assert (zenon_L279_ : (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> (~((e10) = (e11))) -> (~((e10) = (e12))) -> (~((e10) = (e13))) -> ((op2 (e22) (e22)) = (e23)) -> ((op1 (e13) (e13)) = (e10)) -> ((op1 (e14) (e14)) = (e10)) -> ((j (e22)) = (e13)) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((j (h (e13))) = (e13)) -> ((h (e13)) = (e23)) -> (~((e13) = (e14))) -> False). % 217.93/218.19 do 0 intro. intros zenon_Hb6 zenon_H93 zenon_Hb zenon_H3b zenon_Ha3 zenon_Ha8 zenon_H6f zenon_H7d zenon_Hac zenon_H3c zenon_Hdd zenon_H5b. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hb6); [ zenon_intro zenon_H86 | zenon_intro zenon_Hb7 ]. % 217.93/218.19 apply (zenon_L114_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hb7); [ zenon_intro zenon_Hb2 | zenon_intro zenon_Hb8 ]. % 217.93/218.19 apply (zenon_L48_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hb8); [ zenon_intro zenon_Hb3 | zenon_intro zenon_Hb9 ]. % 217.93/218.19 apply (zenon_L49_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hb9); [ zenon_intro zenon_Hb4 | zenon_intro zenon_Hb5 ]. % 217.93/218.19 apply (zenon_L50_); trivial. % 217.93/218.19 apply (zenon_L88_); trivial. % 217.93/218.19 (* end of lemma zenon_L279_ *) % 217.93/218.19 assert (zenon_L280_ : (((j (e22)) = (e10))\/(((j (e22)) = (e11))\/(((j (e22)) = (e12))\/(((j (e22)) = (e13))\/((j (e22)) = (e14)))))) -> ((h (e12)) = (e22)) -> ((j (h (e12))) = (e12)) -> (~((e11) = (e12))) -> ((op1 (e12) (e12)) = (e10)) -> ((op1 (e13) (e13)) = (e10)) -> (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> (~((e10) = (e11))) -> (~((e10) = (e12))) -> (~((e10) = (e13))) -> ((op2 (e22) (e22)) = (e23)) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((op1 (e14) (e14)) = (e10)) -> ((j (h (e13))) = (e13)) -> ((h (e13)) = (e23)) -> (~((e13) = (e14))) -> False). % 217.93/218.19 do 0 intro. intros zenon_Hbb zenon_Hff zenon_Hc zenon_H15 zenon_He9 zenon_Ha8 zenon_Hb6 zenon_H93 zenon_Hb zenon_H3b zenon_Ha3 zenon_Hac zenon_H6f zenon_H3c zenon_Hdd zenon_H5b. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hbb); [ zenon_intro zenon_H66 | zenon_intro zenon_Hbc ]. % 217.93/218.19 apply (zenon_L142_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hbc); [ zenon_intro zenon_H68 | zenon_intro zenon_Hbd ]. % 217.93/218.19 apply (zenon_L143_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hbd); [ zenon_intro zenon_H69 | zenon_intro zenon_Hbe ]. % 217.93/218.19 apply (zenon_L121_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hbe); [ zenon_intro zenon_H7d | zenon_intro zenon_Hba ]. % 217.93/218.19 apply (zenon_L279_); trivial. % 217.93/218.19 apply (zenon_L124_); trivial. % 217.93/218.19 (* end of lemma zenon_L280_ *) % 217.93/218.19 assert (zenon_L281_ : (((j (e22)) = (e10))\/(((j (e22)) = (e11))\/(((j (e22)) = (e12))\/(((j (e22)) = (e13))\/((j (e22)) = (e14)))))) -> (~((e11) = (e12))) -> (~((e10) = (e14))) -> ((op2 (e22) (e22)) = (e23)) -> ((op1 (e12) (e12)) = (e10)) -> ((op1 (e14) (e14)) = (e10)) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> (~((e10) = (e13))) -> (~((e10) = (e12))) -> (~((e10) = (e11))) -> (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> ((op2 (e24) (e24)) = (e22)) -> ((j (op2 (e24) (e24))) = (op1 (j (e24)) (j (e24)))) -> (~((e11) = (e13))) -> ((op2 (e23) (e23)) = (e24)) -> ((op1 (e10) (e10)) = (e10)) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((j (h (e13))) = (e13)) -> ((h (e13)) = (e24)) -> (~((e13) = (e14))) -> (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> (~((e12) = (e13))) -> ((j (h (e12))) = (e12)) -> ((h (e12)) = (e22)) -> (~((e12) = (e14))) -> False). % 217.93/218.19 do 0 intro. intros zenon_Hbb zenon_H15 zenon_H47 zenon_Ha3 zenon_He9 zenon_H6f zenon_Hac zenon_H3b zenon_Hb zenon_H93 zenon_H9e zenon_H75 zenon_H74 zenon_H42 zenon_H83 zenon_H6e zenon_H8c zenon_H3c zenon_Hf2 zenon_H5b zenon_Hb6 zenon_H1f zenon_Hc zenon_Hff zenon_H26. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hbb); [ zenon_intro zenon_H66 | zenon_intro zenon_Hbc ]. % 217.93/218.19 apply (zenon_L142_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hbc); [ zenon_intro zenon_H68 | zenon_intro zenon_Hbd ]. % 217.93/218.19 apply (zenon_L143_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hbd); [ zenon_intro zenon_H69 | zenon_intro zenon_Hbe ]. % 217.93/218.19 apply (zenon_L254_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hbe); [ zenon_intro zenon_H7d | zenon_intro zenon_Hba ]. % 217.93/218.19 apply (zenon_L148_); trivial. % 217.93/218.19 apply (zenon_L149_); trivial. % 217.93/218.19 (* end of lemma zenon_L281_ *) % 217.93/218.19 assert (zenon_L282_ : (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> (~((e11) = (e12))) -> (~((e10) = (e12))) -> ((h (e10)) = (e23)) -> ((j (h (e10))) = (e10)) -> (~((e12) = (e13))) -> ((j (h (e12))) = (e12)) -> ((h (e12)) = (e23)) -> (~((e12) = (e14))) -> False). % 217.93/218.19 do 0 intro. intros zenon_Hb6 zenon_H15 zenon_Hb zenon_H13b zenon_H2c zenon_H1f zenon_Hc zenon_H10d zenon_H26. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hb6); [ zenon_intro zenon_H86 | zenon_intro zenon_Hb7 ]. % 217.93/218.19 apply (zenon_L156_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hb7); [ zenon_intro zenon_Hb2 | zenon_intro zenon_Hb8 ]. % 217.93/218.19 apply (zenon_L163_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hb8); [ zenon_intro zenon_Hb3 | zenon_intro zenon_Hb9 ]. % 217.93/218.19 apply (zenon_L272_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hb9); [ zenon_intro zenon_Hb4 | zenon_intro zenon_Hb5 ]. % 217.93/218.19 apply (zenon_L157_); trivial. % 217.93/218.19 apply (zenon_L158_); trivial. % 217.93/218.19 (* end of lemma zenon_L282_ *) % 217.93/218.19 assert (zenon_L283_ : (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> (~((e12) = (e14))) -> ((h (e12)) = (e24)) -> ((j (h (e12))) = (e12)) -> (~((e12) = (e13))) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((op1 (e14) (e14)) = (e10)) -> ((op1 (e10) (e10)) = (e10)) -> ((op2 (e23) (e23)) = (e24)) -> (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> (~((e10) = (e11))) -> (~((e10) = (e12))) -> (~((e10) = (e13))) -> ((j (h (e10))) = (e10)) -> ((h (e10)) = (e23)) -> (~((e10) = (e14))) -> False). % 217.93/218.19 do 0 intro. intros zenon_Hb6 zenon_H26 zenon_H111 zenon_Hc zenon_H1f zenon_H8c zenon_H6f zenon_H6e zenon_H83 zenon_H9e zenon_H93 zenon_Hb zenon_H3b zenon_H2c zenon_H13b zenon_H47. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hb6); [ zenon_intro zenon_H86 | zenon_intro zenon_Hb7 ]. % 217.93/218.19 apply (zenon_L178_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hb7); [ zenon_intro zenon_Hb2 | zenon_intro zenon_Hb8 ]. % 217.93/218.19 apply (zenon_L271_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hb8); [ zenon_intro zenon_Hb3 | zenon_intro zenon_Hb9 ]. % 217.93/218.19 apply (zenon_L272_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hb9); [ zenon_intro zenon_Hb4 | zenon_intro zenon_Hb5 ]. % 217.93/218.19 apply (zenon_L269_); trivial. % 217.93/218.19 apply (zenon_L273_); trivial. % 217.93/218.19 (* end of lemma zenon_L283_ *) % 217.93/218.19 assert (zenon_L284_ : (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> (~((e11) = (e14))) -> (~((e12) = (e14))) -> ((h (e14)) = (e23)) -> ((j (h (e14))) = (e14)) -> (~((e13) = (e14))) -> ((j (h (e10))) = (e10)) -> ((h (e10)) = (e23)) -> (~((e10) = (e14))) -> False). % 217.93/218.19 do 0 intro. intros zenon_Hb6 zenon_Hc8 zenon_H26 zenon_Hd9 zenon_Hc2 zenon_H5b zenon_H2c zenon_H13b zenon_H47. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hb6); [ zenon_intro zenon_H86 | zenon_intro zenon_Hb7 ]. % 217.93/218.19 apply (zenon_L83_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hb7); [ zenon_intro zenon_Hb2 | zenon_intro zenon_Hb8 ]. % 217.93/218.19 apply (zenon_L84_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hb8); [ zenon_intro zenon_Hb3 | zenon_intro zenon_Hb9 ]. % 217.93/218.19 apply (zenon_L85_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hb9); [ zenon_intro zenon_Hb4 | zenon_intro zenon_Hb5 ]. % 217.93/218.19 apply (zenon_L86_); trivial. % 217.93/218.19 apply (zenon_L273_); trivial. % 217.93/218.19 (* end of lemma zenon_L284_ *) % 217.93/218.19 assert (zenon_L285_ : (((h (e14)) = (e20))\/(((h (e14)) = (e21))\/(((h (e14)) = (e22))\/(((h (e14)) = (e23))\/((h (e14)) = (e24)))))) -> ((h (e12)) = (e20)) -> ((j (h (e12))) = (e12)) -> (((j (e20)) = (e10))\/(((j (e20)) = (e11))\/(((j (e20)) = (e12))\/(((j (e20)) = (e13))\/((j (e20)) = (e14)))))) -> ((h (e13)) = (e21)) -> ((j (h (e13))) = (e13)) -> (((j (e21)) = (e10))\/(((j (e21)) = (e11))\/(((j (e21)) = (e12))\/(((j (e21)) = (e13))\/((j (e21)) = (e14)))))) -> ((op2 (e22) (e22)) = (e23)) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((op2 (e24) (e24)) = (e22)) -> ((j (op2 (e24) (e24))) = (op1 (j (e24)) (j (e24)))) -> (((j (e22)) = (e10))\/(((j (e22)) = (e11))\/(((j (e22)) = (e12))\/(((j (e22)) = (e13))\/((j (e22)) = (e14)))))) -> (~((e13) = (e14))) -> (~((e12) = (e14))) -> (~((e11) = (e14))) -> (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> ((op2 (e23) (e23)) = (e24)) -> ((op1 (e10) (e10)) = (e10)) -> ((op1 (e14) (e14)) = (e10)) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((j (h (e14))) = (e14)) -> (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> (~((e10) = (e11))) -> (~((e10) = (e12))) -> (~((e10) = (e13))) -> ((j (h (e10))) = (e10)) -> ((h (e10)) = (e23)) -> (~((e10) = (e14))) -> False). % 217.93/218.19 do 0 intro. intros zenon_Hf7 zenon_H7 zenon_Hc zenon_H2b zenon_H4f zenon_H3c zenon_H5f zenon_Ha3 zenon_Hac zenon_H75 zenon_H74 zenon_Hbb zenon_H5b zenon_H26 zenon_Hc8 zenon_Hb6 zenon_H83 zenon_H6e zenon_H6f zenon_H8c zenon_Hc2 zenon_H9e zenon_H93 zenon_Hb zenon_H3b zenon_H2c zenon_H13b zenon_H47. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf7); [ zenon_intro zenon_Hc0 | zenon_intro zenon_Hfb ]. % 217.93/218.19 apply (zenon_L210_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfb); [ zenon_intro zenon_Hd0 | zenon_intro zenon_Hfc ]. % 217.93/218.19 apply (zenon_L154_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfc); [ zenon_intro zenon_Hd4 | zenon_intro zenon_Hfd ]. % 217.93/218.19 apply (zenon_L81_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfd); [ zenon_intro zenon_Hd9 | zenon_intro zenon_He1 ]. % 217.93/218.19 apply (zenon_L284_); trivial. % 217.93/218.19 apply (zenon_L277_); trivial. % 217.93/218.19 (* end of lemma zenon_L285_ *) % 217.93/218.19 assert (zenon_L286_ : (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> ((op2 (e23) (e23)) = (e24)) -> ((op1 (e10) (e10)) = (e10)) -> ((op1 (e14) (e14)) = (e10)) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((j (op2 (e24) (e24))) = (op1 (j (e24)) (j (e24)))) -> ((op2 (e24) (e24)) = (e22)) -> ((j (e22)) = (e12)) -> (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> (~((e10) = (e11))) -> (~((e10) = (e12))) -> (~((e10) = (e13))) -> ((j (h (e10))) = (e10)) -> ((h (e10)) = (e23)) -> (~((e10) = (e14))) -> False). % 217.93/218.19 do 0 intro. intros zenon_Hb6 zenon_H83 zenon_H6e zenon_H6f zenon_H8c zenon_H74 zenon_H75 zenon_H69 zenon_H9e zenon_H93 zenon_Hb zenon_H3b zenon_H2c zenon_H13b zenon_H47. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hb6); [ zenon_intro zenon_H86 | zenon_intro zenon_Hb7 ]. % 217.93/218.19 apply (zenon_L145_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hb7); [ zenon_intro zenon_Hb2 | zenon_intro zenon_Hb8 ]. % 217.93/218.19 apply (zenon_L271_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hb8); [ zenon_intro zenon_Hb3 | zenon_intro zenon_Hb9 ]. % 217.93/218.19 apply (zenon_L272_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hb9); [ zenon_intro zenon_Hb4 | zenon_intro zenon_Hb5 ]. % 217.93/218.19 apply (zenon_L269_); trivial. % 217.93/218.19 apply (zenon_L273_); trivial. % 217.93/218.19 (* end of lemma zenon_L286_ *) % 217.93/218.19 assert (zenon_L287_ : (((j (e22)) = (e10))\/(((j (e22)) = (e11))\/(((j (e22)) = (e12))\/(((j (e22)) = (e13))\/((j (e22)) = (e14)))))) -> ((h (e11)) = (e22)) -> ((j (h (e11))) = (e11)) -> ((h (e13)) = (e22)) -> ((j (h (e13))) = (e13)) -> (~((e11) = (e13))) -> ((h (e10)) = (e23)) -> ((j (h (e10))) = (e10)) -> (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> ((op2 (e23) (e23)) = (e24)) -> ((op1 (e10) (e10)) = (e10)) -> ((j (op2 (e23) (e23))) = (op1 (j (e23)) (j (e23)))) -> ((j (op2 (e24) (e24))) = (op1 (j (e24)) (j (e24)))) -> ((op2 (e24) (e24)) = (e22)) -> (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> (~((e10) = (e11))) -> (~((e10) = (e12))) -> (~((e10) = (e13))) -> ((op1 (e14) (e14)) = (e10)) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((op2 (e22) (e22)) = (e23)) -> (~((e10) = (e14))) -> False). % 217.93/218.19 do 0 intro. intros zenon_Hbb zenon_H11b zenon_H105 zenon_H64 zenon_H3c zenon_H42 zenon_H13b zenon_H2c zenon_Hb6 zenon_H83 zenon_H6e zenon_H8c zenon_H74 zenon_H75 zenon_H9e zenon_H93 zenon_Hb zenon_H3b zenon_H6f zenon_Hac zenon_Ha3 zenon_H47. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hbb); [ zenon_intro zenon_H66 | zenon_intro zenon_Hbc ]. % 217.93/218.19 apply (zenon_L191_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hbc); [ zenon_intro zenon_H68 | zenon_intro zenon_Hbd ]. % 217.93/218.19 apply (zenon_L29_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hbd); [ zenon_intro zenon_H69 | zenon_intro zenon_Hbe ]. % 217.93/218.19 apply (zenon_L286_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hbe); [ zenon_intro zenon_H7d | zenon_intro zenon_Hba ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hb6); [ zenon_intro zenon_H86 | zenon_intro zenon_Hb7 ]. % 217.93/218.19 apply (zenon_L43_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hb7); [ zenon_intro zenon_Hb2 | zenon_intro zenon_Hb8 ]. % 217.93/218.19 apply (zenon_L271_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hb8); [ zenon_intro zenon_Hb3 | zenon_intro zenon_Hb9 ]. % 217.93/218.19 apply (zenon_L272_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hb9); [ zenon_intro zenon_Hb4 | zenon_intro zenon_Hb5 ]. % 217.93/218.19 apply (zenon_L269_); trivial. % 217.93/218.19 apply (zenon_L273_); trivial. % 217.93/218.19 apply (zenon_L80_); trivial. % 217.93/218.19 (* end of lemma zenon_L287_ *) % 217.93/218.19 assert (zenon_L288_ : (~((j (h (e10))) = (j (e24)))) -> ((h (e10)) = (e24)) -> False). % 217.93/218.19 do 0 intro. intros zenon_H13e zenon_H13f. % 217.93/218.19 cut (((h (e10)) = (e24))); [idtac | apply NNPP; zenon_intro zenon_H140]. % 217.93/218.19 congruence. % 217.93/218.19 exact (zenon_H140 zenon_H13f). % 217.93/218.19 (* end of lemma zenon_L288_ *) % 217.93/218.19 assert (zenon_L289_ : ((j (h (e10))) = (e10)) -> ((h (e10)) = (e24)) -> ((j (e24)) = (e11)) -> (~((e10) = (e11))) -> False). % 217.93/218.19 do 0 intro. intros zenon_H2c zenon_H13f zenon_H92 zenon_H93. % 217.93/218.19 elim (classic ((e11) = (e11))); [ zenon_intro zenon_H18 | zenon_intro zenon_H14 ]. % 217.93/218.19 cut (((e11) = (e11)) = ((e10) = (e11))). % 217.93/218.19 intro zenon_D_pnotp. % 217.93/218.19 apply zenon_H93. % 217.93/218.19 rewrite <- zenon_D_pnotp. % 217.93/218.19 exact zenon_H18. % 217.93/218.19 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.19 cut (((e11) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H94]. % 217.93/218.19 congruence. % 217.93/218.19 cut (((j (h (e10))) = (e10)) = ((e11) = (e10))). % 217.93/218.19 intro zenon_D_pnotp. % 217.93/218.19 apply zenon_H94. % 217.93/218.19 rewrite <- zenon_D_pnotp. % 217.93/218.19 exact zenon_H2c. % 217.93/218.19 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.19 cut (((j (h (e10))) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H135]. % 217.93/218.19 congruence. % 217.93/218.19 elim (classic ((e11) = (e11))); [ zenon_intro zenon_H18 | zenon_intro zenon_H14 ]. % 217.93/218.19 cut (((e11) = (e11)) = ((j (h (e10))) = (e11))). % 217.93/218.19 intro zenon_D_pnotp. % 217.93/218.19 apply zenon_H135. % 217.93/218.19 rewrite <- zenon_D_pnotp. % 217.93/218.19 exact zenon_H18. % 217.93/218.19 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.19 cut (((e11) = (j (h (e10))))); [idtac | apply NNPP; zenon_intro zenon_H136]. % 217.93/218.19 congruence. % 217.93/218.19 elim (classic ((j (h (e10))) = (j (h (e10))))); [ zenon_intro zenon_H35 | zenon_intro zenon_H36 ]. % 217.93/218.19 cut (((j (h (e10))) = (j (h (e10)))) = ((e11) = (j (h (e10))))). % 217.93/218.19 intro zenon_D_pnotp. % 217.93/218.19 apply zenon_H136. % 217.93/218.19 rewrite <- zenon_D_pnotp. % 217.93/218.19 exact zenon_H35. % 217.93/218.19 cut (((j (h (e10))) = (j (h (e10))))); [idtac | apply NNPP; zenon_intro zenon_H36]. % 217.93/218.19 cut (((j (h (e10))) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H135]. % 217.93/218.19 congruence. % 217.93/218.19 cut (((j (e24)) = (e11)) = ((j (h (e10))) = (e11))). % 217.93/218.19 intro zenon_D_pnotp. % 217.93/218.19 apply zenon_H135. % 217.93/218.19 rewrite <- zenon_D_pnotp. % 217.93/218.19 exact zenon_H92. % 217.93/218.19 cut (((e11) = (e11))); [idtac | apply NNPP; zenon_intro zenon_H14]. % 217.93/218.19 cut (((j (e24)) = (j (h (e10))))); [idtac | apply NNPP; zenon_intro zenon_H141]. % 217.93/218.19 congruence. % 217.93/218.19 elim (classic ((j (h (e10))) = (j (h (e10))))); [ zenon_intro zenon_H35 | zenon_intro zenon_H36 ]. % 217.93/218.19 cut (((j (h (e10))) = (j (h (e10)))) = ((j (e24)) = (j (h (e10))))). % 217.93/218.19 intro zenon_D_pnotp. % 217.93/218.19 apply zenon_H141. % 217.93/218.19 rewrite <- zenon_D_pnotp. % 217.93/218.19 exact zenon_H35. % 217.93/218.19 cut (((j (h (e10))) = (j (h (e10))))); [idtac | apply NNPP; zenon_intro zenon_H36]. % 217.93/218.19 cut (((j (h (e10))) = (j (e24)))); [idtac | apply NNPP; zenon_intro zenon_H13e]. % 217.93/218.19 congruence. % 217.93/218.19 apply (zenon_L288_); trivial. % 217.93/218.19 apply zenon_H36. apply refl_equal. % 217.93/218.19 apply zenon_H36. apply refl_equal. % 217.93/218.19 apply zenon_H14. apply refl_equal. % 217.93/218.19 apply zenon_H36. apply refl_equal. % 217.93/218.19 apply zenon_H36. apply refl_equal. % 217.93/218.19 apply zenon_H14. apply refl_equal. % 217.93/218.19 apply zenon_H14. apply refl_equal. % 217.93/218.19 apply zenon_H9. apply refl_equal. % 217.93/218.19 apply zenon_H14. apply refl_equal. % 217.93/218.19 apply zenon_H14. apply refl_equal. % 217.93/218.19 (* end of lemma zenon_L289_ *) % 217.93/218.19 assert (zenon_L290_ : ((j (h (e10))) = (e10)) -> ((h (e10)) = (e24)) -> ((j (e24)) = (e12)) -> (~((e10) = (e12))) -> False). % 217.93/218.19 do 0 intro. intros zenon_H2c zenon_H13f zenon_H97 zenon_Hb. % 217.93/218.19 elim (classic ((e12) = (e12))); [ zenon_intro zenon_H31 | zenon_intro zenon_Ha ]. % 217.93/218.19 cut (((e12) = (e12)) = ((e10) = (e12))). % 217.93/218.19 intro zenon_D_pnotp. % 217.93/218.19 apply zenon_Hb. % 217.93/218.19 rewrite <- zenon_D_pnotp. % 217.93/218.19 exact zenon_H31. % 217.93/218.19 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.19 cut (((e12) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H32]. % 217.93/218.19 congruence. % 217.93/218.19 cut (((j (h (e10))) = (e10)) = ((e12) = (e10))). % 217.93/218.19 intro zenon_D_pnotp. % 217.93/218.19 apply zenon_H32. % 217.93/218.19 rewrite <- zenon_D_pnotp. % 217.93/218.19 exact zenon_H2c. % 217.93/218.19 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.19 cut (((j (h (e10))) = (e12))); [idtac | apply NNPP; zenon_intro zenon_H33]. % 217.93/218.19 congruence. % 217.93/218.19 elim (classic ((e12) = (e12))); [ zenon_intro zenon_H31 | zenon_intro zenon_Ha ]. % 217.93/218.19 cut (((e12) = (e12)) = ((j (h (e10))) = (e12))). % 217.93/218.19 intro zenon_D_pnotp. % 217.93/218.19 apply zenon_H33. % 217.93/218.19 rewrite <- zenon_D_pnotp. % 217.93/218.19 exact zenon_H31. % 217.93/218.19 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.19 cut (((e12) = (j (h (e10))))); [idtac | apply NNPP; zenon_intro zenon_H34]. % 217.93/218.19 congruence. % 217.93/218.19 elim (classic ((j (h (e10))) = (j (h (e10))))); [ zenon_intro zenon_H35 | zenon_intro zenon_H36 ]. % 217.93/218.19 cut (((j (h (e10))) = (j (h (e10)))) = ((e12) = (j (h (e10))))). % 217.93/218.19 intro zenon_D_pnotp. % 217.93/218.19 apply zenon_H34. % 217.93/218.19 rewrite <- zenon_D_pnotp. % 217.93/218.19 exact zenon_H35. % 217.93/218.19 cut (((j (h (e10))) = (j (h (e10))))); [idtac | apply NNPP; zenon_intro zenon_H36]. % 217.93/218.19 cut (((j (h (e10))) = (e12))); [idtac | apply NNPP; zenon_intro zenon_H33]. % 217.93/218.19 congruence. % 217.93/218.19 cut (((j (e24)) = (e12)) = ((j (h (e10))) = (e12))). % 217.93/218.19 intro zenon_D_pnotp. % 217.93/218.19 apply zenon_H33. % 217.93/218.19 rewrite <- zenon_D_pnotp. % 217.93/218.19 exact zenon_H97. % 217.93/218.19 cut (((e12) = (e12))); [idtac | apply NNPP; zenon_intro zenon_Ha]. % 217.93/218.19 cut (((j (e24)) = (j (h (e10))))); [idtac | apply NNPP; zenon_intro zenon_H141]. % 217.93/218.19 congruence. % 217.93/218.19 elim (classic ((j (h (e10))) = (j (h (e10))))); [ zenon_intro zenon_H35 | zenon_intro zenon_H36 ]. % 217.93/218.19 cut (((j (h (e10))) = (j (h (e10)))) = ((j (e24)) = (j (h (e10))))). % 217.93/218.19 intro zenon_D_pnotp. % 217.93/218.19 apply zenon_H141. % 217.93/218.19 rewrite <- zenon_D_pnotp. % 217.93/218.19 exact zenon_H35. % 217.93/218.19 cut (((j (h (e10))) = (j (h (e10))))); [idtac | apply NNPP; zenon_intro zenon_H36]. % 217.93/218.19 cut (((j (h (e10))) = (j (e24)))); [idtac | apply NNPP; zenon_intro zenon_H13e]. % 217.93/218.19 congruence. % 217.93/218.19 apply (zenon_L288_); trivial. % 217.93/218.19 apply zenon_H36. apply refl_equal. % 217.93/218.19 apply zenon_H36. apply refl_equal. % 217.93/218.19 apply zenon_Ha. apply refl_equal. % 217.93/218.19 apply zenon_H36. apply refl_equal. % 217.93/218.19 apply zenon_H36. apply refl_equal. % 217.93/218.19 apply zenon_Ha. apply refl_equal. % 217.93/218.19 apply zenon_Ha. apply refl_equal. % 217.93/218.19 apply zenon_H9. apply refl_equal. % 217.93/218.19 apply zenon_Ha. apply refl_equal. % 217.93/218.19 apply zenon_Ha. apply refl_equal. % 217.93/218.19 (* end of lemma zenon_L290_ *) % 217.93/218.19 assert (zenon_L291_ : ((j (h (e10))) = (e10)) -> ((h (e10)) = (e24)) -> ((j (e24)) = (e13)) -> (~((e10) = (e13))) -> False). % 217.93/218.19 do 0 intro. intros zenon_H2c zenon_H13f zenon_H9a zenon_H3b. % 217.93/218.19 elim (classic ((e13) = (e13))); [ zenon_intro zenon_H20 | zenon_intro zenon_H1d ]. % 217.93/218.19 cut (((e13) = (e13)) = ((e10) = (e13))). % 217.93/218.19 intro zenon_D_pnotp. % 217.93/218.19 apply zenon_H3b. % 217.93/218.19 rewrite <- zenon_D_pnotp. % 217.93/218.19 exact zenon_H20. % 217.93/218.19 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.19 cut (((e13) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H4b]. % 217.93/218.19 congruence. % 217.93/218.19 cut (((j (h (e10))) = (e10)) = ((e13) = (e10))). % 217.93/218.19 intro zenon_D_pnotp. % 217.93/218.19 apply zenon_H4b. % 217.93/218.19 rewrite <- zenon_D_pnotp. % 217.93/218.19 exact zenon_H2c. % 217.93/218.19 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.19 cut (((j (h (e10))) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H4c]. % 217.93/218.19 congruence. % 217.93/218.19 elim (classic ((e13) = (e13))); [ zenon_intro zenon_H20 | zenon_intro zenon_H1d ]. % 217.93/218.19 cut (((e13) = (e13)) = ((j (h (e10))) = (e13))). % 217.93/218.19 intro zenon_D_pnotp. % 217.93/218.19 apply zenon_H4c. % 217.93/218.19 rewrite <- zenon_D_pnotp. % 217.93/218.19 exact zenon_H20. % 217.93/218.19 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.19 cut (((e13) = (j (h (e10))))); [idtac | apply NNPP; zenon_intro zenon_H4d]. % 217.93/218.19 congruence. % 217.93/218.19 elim (classic ((j (h (e10))) = (j (h (e10))))); [ zenon_intro zenon_H35 | zenon_intro zenon_H36 ]. % 217.93/218.19 cut (((j (h (e10))) = (j (h (e10)))) = ((e13) = (j (h (e10))))). % 217.93/218.19 intro zenon_D_pnotp. % 217.93/218.19 apply zenon_H4d. % 217.93/218.19 rewrite <- zenon_D_pnotp. % 217.93/218.19 exact zenon_H35. % 217.93/218.19 cut (((j (h (e10))) = (j (h (e10))))); [idtac | apply NNPP; zenon_intro zenon_H36]. % 217.93/218.19 cut (((j (h (e10))) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H4c]. % 217.93/218.19 congruence. % 217.93/218.19 cut (((j (e24)) = (e13)) = ((j (h (e10))) = (e13))). % 217.93/218.19 intro zenon_D_pnotp. % 217.93/218.19 apply zenon_H4c. % 217.93/218.19 rewrite <- zenon_D_pnotp. % 217.93/218.19 exact zenon_H9a. % 217.93/218.19 cut (((e13) = (e13))); [idtac | apply NNPP; zenon_intro zenon_H1d]. % 217.93/218.19 cut (((j (e24)) = (j (h (e10))))); [idtac | apply NNPP; zenon_intro zenon_H141]. % 217.93/218.19 congruence. % 217.93/218.19 elim (classic ((j (h (e10))) = (j (h (e10))))); [ zenon_intro zenon_H35 | zenon_intro zenon_H36 ]. % 217.93/218.19 cut (((j (h (e10))) = (j (h (e10)))) = ((j (e24)) = (j (h (e10))))). % 217.93/218.19 intro zenon_D_pnotp. % 217.93/218.19 apply zenon_H141. % 217.93/218.19 rewrite <- zenon_D_pnotp. % 217.93/218.19 exact zenon_H35. % 217.93/218.19 cut (((j (h (e10))) = (j (h (e10))))); [idtac | apply NNPP; zenon_intro zenon_H36]. % 217.93/218.19 cut (((j (h (e10))) = (j (e24)))); [idtac | apply NNPP; zenon_intro zenon_H13e]. % 217.93/218.19 congruence. % 217.93/218.19 apply (zenon_L288_); trivial. % 217.93/218.19 apply zenon_H36. apply refl_equal. % 217.93/218.19 apply zenon_H36. apply refl_equal. % 217.93/218.19 apply zenon_H1d. apply refl_equal. % 217.93/218.19 apply zenon_H36. apply refl_equal. % 217.93/218.19 apply zenon_H36. apply refl_equal. % 217.93/218.19 apply zenon_H1d. apply refl_equal. % 217.93/218.19 apply zenon_H1d. apply refl_equal. % 217.93/218.19 apply zenon_H9. apply refl_equal. % 217.93/218.19 apply zenon_H1d. apply refl_equal. % 217.93/218.19 apply zenon_H1d. apply refl_equal. % 217.93/218.19 (* end of lemma zenon_L291_ *) % 217.93/218.19 assert (zenon_L292_ : ((j (h (e10))) = (e10)) -> ((h (e10)) = (e24)) -> ((j (e24)) = (e14)) -> (~((e10) = (e14))) -> False). % 217.93/218.19 do 0 intro. intros zenon_H2c zenon_H13f zenon_H9b zenon_H47. % 217.93/218.19 elim (classic ((e14) = (e14))); [ zenon_intro zenon_H27 | zenon_intro zenon_H24 ]. % 217.93/218.19 cut (((e14) = (e14)) = ((e10) = (e14))). % 217.93/218.19 intro zenon_D_pnotp. % 217.93/218.19 apply zenon_H47. % 217.93/218.19 rewrite <- zenon_D_pnotp. % 217.93/218.19 exact zenon_H27. % 217.93/218.19 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.19 cut (((e14) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H48]. % 217.93/218.19 congruence. % 217.93/218.19 cut (((j (h (e10))) = (e10)) = ((e14) = (e10))). % 217.93/218.19 intro zenon_D_pnotp. % 217.93/218.19 apply zenon_H48. % 217.93/218.19 rewrite <- zenon_D_pnotp. % 217.93/218.19 exact zenon_H2c. % 217.93/218.19 cut (((e10) = (e10))); [idtac | apply NNPP; zenon_intro zenon_H9]. % 217.93/218.19 cut (((j (h (e10))) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H49]. % 217.93/218.19 congruence. % 217.93/218.19 elim (classic ((e14) = (e14))); [ zenon_intro zenon_H27 | zenon_intro zenon_H24 ]. % 217.93/218.19 cut (((e14) = (e14)) = ((j (h (e10))) = (e14))). % 217.93/218.19 intro zenon_D_pnotp. % 217.93/218.19 apply zenon_H49. % 217.93/218.19 rewrite <- zenon_D_pnotp. % 217.93/218.19 exact zenon_H27. % 217.93/218.19 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.19 cut (((e14) = (j (h (e10))))); [idtac | apply NNPP; zenon_intro zenon_H4a]. % 217.93/218.19 congruence. % 217.93/218.19 elim (classic ((j (h (e10))) = (j (h (e10))))); [ zenon_intro zenon_H35 | zenon_intro zenon_H36 ]. % 217.93/218.19 cut (((j (h (e10))) = (j (h (e10)))) = ((e14) = (j (h (e10))))). % 217.93/218.19 intro zenon_D_pnotp. % 217.93/218.19 apply zenon_H4a. % 217.93/218.19 rewrite <- zenon_D_pnotp. % 217.93/218.19 exact zenon_H35. % 217.93/218.19 cut (((j (h (e10))) = (j (h (e10))))); [idtac | apply NNPP; zenon_intro zenon_H36]. % 217.93/218.19 cut (((j (h (e10))) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H49]. % 217.93/218.19 congruence. % 217.93/218.19 cut (((j (e24)) = (e14)) = ((j (h (e10))) = (e14))). % 217.93/218.19 intro zenon_D_pnotp. % 217.93/218.19 apply zenon_H49. % 217.93/218.19 rewrite <- zenon_D_pnotp. % 217.93/218.19 exact zenon_H9b. % 217.93/218.19 cut (((e14) = (e14))); [idtac | apply NNPP; zenon_intro zenon_H24]. % 217.93/218.19 cut (((j (e24)) = (j (h (e10))))); [idtac | apply NNPP; zenon_intro zenon_H141]. % 217.93/218.19 congruence. % 217.93/218.19 elim (classic ((j (h (e10))) = (j (h (e10))))); [ zenon_intro zenon_H35 | zenon_intro zenon_H36 ]. % 217.93/218.19 cut (((j (h (e10))) = (j (h (e10)))) = ((j (e24)) = (j (h (e10))))). % 217.93/218.19 intro zenon_D_pnotp. % 217.93/218.19 apply zenon_H141. % 217.93/218.19 rewrite <- zenon_D_pnotp. % 217.93/218.19 exact zenon_H35. % 217.93/218.19 cut (((j (h (e10))) = (j (h (e10))))); [idtac | apply NNPP; zenon_intro zenon_H36]. % 217.93/218.19 cut (((j (h (e10))) = (j (e24)))); [idtac | apply NNPP; zenon_intro zenon_H13e]. % 217.93/218.19 congruence. % 217.93/218.19 apply (zenon_L288_); trivial. % 217.93/218.19 apply zenon_H36. apply refl_equal. % 217.93/218.19 apply zenon_H36. apply refl_equal. % 217.93/218.19 apply zenon_H24. apply refl_equal. % 217.93/218.19 apply zenon_H36. apply refl_equal. % 217.93/218.19 apply zenon_H36. apply refl_equal. % 217.93/218.19 apply zenon_H24. apply refl_equal. % 217.93/218.19 apply zenon_H24. apply refl_equal. % 217.93/218.19 apply zenon_H9. apply refl_equal. % 217.93/218.19 apply zenon_H24. apply refl_equal. % 217.93/218.19 apply zenon_H24. apply refl_equal. % 217.93/218.19 (* end of lemma zenon_L292_ *) % 217.93/218.19 assert (zenon_L293_ : (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> ((j (e22)) = (e13)) -> ((op2 (e24) (e24)) = (e22)) -> ((op1 (e10) (e10)) = (e10)) -> ((op1 (e14) (e14)) = (e10)) -> ((j (op2 (e24) (e24))) = (op1 (j (e24)) (j (e24)))) -> (~((e10) = (e11))) -> (~((e10) = (e12))) -> (~((e10) = (e13))) -> ((j (h (e10))) = (e10)) -> ((h (e10)) = (e24)) -> (~((e10) = (e14))) -> False). % 217.93/218.19 do 0 intro. intros zenon_H9e zenon_H7d zenon_H75 zenon_H6e zenon_H6f zenon_H74 zenon_H93 zenon_Hb zenon_H3b zenon_H2c zenon_H13f zenon_H47. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H9e); [ zenon_intro zenon_H6b | zenon_intro zenon_H9f ]. % 217.93/218.19 apply (zenon_L34_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H9f); [ zenon_intro zenon_H92 | zenon_intro zenon_Ha0 ]. % 217.93/218.19 apply (zenon_L289_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Ha0); [ zenon_intro zenon_H97 | zenon_intro zenon_Ha1 ]. % 217.93/218.19 apply (zenon_L290_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Ha1); [ zenon_intro zenon_H9a | zenon_intro zenon_H9b ]. % 217.93/218.19 apply (zenon_L291_); trivial. % 217.93/218.19 apply (zenon_L292_); trivial. % 217.93/218.19 (* end of lemma zenon_L293_ *) % 217.93/218.19 assert (zenon_L294_ : (((j (e22)) = (e10))\/(((j (e22)) = (e11))\/(((j (e22)) = (e12))\/(((j (e22)) = (e13))\/((j (e22)) = (e14)))))) -> (~((e11) = (e13))) -> (~((e12) = (e13))) -> (~((e10) = (e14))) -> ((h (e10)) = (e24)) -> ((j (h (e10))) = (e10)) -> (~((e10) = (e13))) -> (~((e10) = (e12))) -> (~((e10) = (e11))) -> ((j (op2 (e24) (e24))) = (op1 (j (e24)) (j (e24)))) -> ((op1 (e14) (e14)) = (e10)) -> ((op1 (e10) (e10)) = (e10)) -> ((op2 (e24) (e24)) = (e22)) -> (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> ((j (h (e13))) = (e13)) -> ((h (e13)) = (e22)) -> (~((e13) = (e14))) -> False). % 217.93/218.19 do 0 intro. intros zenon_Hbb zenon_H42 zenon_H1f zenon_H47 zenon_H13f zenon_H2c zenon_H3b zenon_Hb zenon_H93 zenon_H74 zenon_H6f zenon_H6e zenon_H75 zenon_H9e zenon_H3c zenon_H64 zenon_H5b. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hbb); [ zenon_intro zenon_H66 | zenon_intro zenon_Hbc ]. % 217.93/218.19 apply (zenon_L28_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hbc); [ zenon_intro zenon_H68 | zenon_intro zenon_Hbd ]. % 217.93/218.19 apply (zenon_L29_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hbd); [ zenon_intro zenon_H69 | zenon_intro zenon_Hbe ]. % 217.93/218.19 apply (zenon_L30_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hbe); [ zenon_intro zenon_H7d | zenon_intro zenon_Hba ]. % 217.93/218.19 apply (zenon_L293_); trivial. % 217.93/218.19 apply (zenon_L53_); trivial. % 217.93/218.19 (* end of lemma zenon_L294_ *) % 217.93/218.19 assert (zenon_L295_ : (((j (e22)) = (e10))\/(((j (e22)) = (e11))\/(((j (e22)) = (e12))\/(((j (e22)) = (e13))\/((j (e22)) = (e14)))))) -> (~((e10) = (e14))) -> (~((e11) = (e14))) -> (~((e12) = (e14))) -> ((h (e14)) = (e22)) -> ((j (h (e14))) = (e14)) -> (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> (~((e10) = (e11))) -> (~((e10) = (e12))) -> (~((e10) = (e13))) -> ((op2 (e22) (e22)) = (e23)) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((op1 (e14) (e14)) = (e10)) -> ((j (h (e13))) = (e13)) -> ((h (e13)) = (e23)) -> (~((e13) = (e14))) -> False). % 217.93/218.19 do 0 intro. intros zenon_Hbb zenon_H47 zenon_Hc8 zenon_H26 zenon_Hd4 zenon_Hc2 zenon_Hb6 zenon_H93 zenon_Hb zenon_H3b zenon_Ha3 zenon_Hac zenon_H6f zenon_H3c zenon_Hdd zenon_H5b. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hbb); [ zenon_intro zenon_H66 | zenon_intro zenon_Hbc ]. % 217.93/218.19 apply (zenon_L69_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hbc); [ zenon_intro zenon_H68 | zenon_intro zenon_Hbd ]. % 217.93/218.19 apply (zenon_L70_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hbd); [ zenon_intro zenon_H69 | zenon_intro zenon_Hbe ]. % 217.93/218.19 apply (zenon_L71_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hbe); [ zenon_intro zenon_H7d | zenon_intro zenon_Hba ]. % 217.93/218.19 apply (zenon_L72_); trivial. % 217.93/218.19 apply (zenon_L124_); trivial. % 217.93/218.19 (* end of lemma zenon_L295_ *) % 217.93/218.19 assert (zenon_L296_ : (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> (~((e11) = (e14))) -> (~((e12) = (e14))) -> ((h (e14)) = (e24)) -> ((j (h (e14))) = (e14)) -> (~((e13) = (e14))) -> ((j (h (e10))) = (e10)) -> ((h (e10)) = (e24)) -> (~((e10) = (e14))) -> False). % 217.93/218.19 do 0 intro. intros zenon_H9e zenon_Hc8 zenon_H26 zenon_He1 zenon_Hc2 zenon_H5b zenon_H2c zenon_H13f zenon_H47. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H9e); [ zenon_intro zenon_H6b | zenon_intro zenon_H9f ]. % 217.93/218.19 apply (zenon_L91_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H9f); [ zenon_intro zenon_H92 | zenon_intro zenon_Ha0 ]. % 217.93/218.19 apply (zenon_L122_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Ha0); [ zenon_intro zenon_H97 | zenon_intro zenon_Ha1 ]. % 217.93/218.19 apply (zenon_L105_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Ha1); [ zenon_intro zenon_H9a | zenon_intro zenon_H9b ]. % 217.93/218.19 apply (zenon_L113_); trivial. % 217.93/218.19 apply (zenon_L292_); trivial. % 217.93/218.19 (* end of lemma zenon_L296_ *) % 217.93/218.19 assert (zenon_L297_ : (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> (~((e11) = (e13))) -> (~((e12) = (e13))) -> (~((e10) = (e13))) -> ((h (e10)) = (e24)) -> ((j (h (e10))) = (e10)) -> ((j (h (e13))) = (e13)) -> ((h (e13)) = (e24)) -> (~((e13) = (e14))) -> False). % 217.93/218.19 do 0 intro. intros zenon_H9e zenon_H42 zenon_H1f zenon_H3b zenon_H13f zenon_H2c zenon_H3c zenon_Hf2 zenon_H5b. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H9e); [ zenon_intro zenon_H6b | zenon_intro zenon_H9f ]. % 217.93/218.19 apply (zenon_L127_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H9f); [ zenon_intro zenon_H92 | zenon_intro zenon_Ha0 ]. % 217.93/218.19 apply (zenon_L129_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Ha0); [ zenon_intro zenon_H97 | zenon_intro zenon_Ha1 ]. % 217.93/218.19 apply (zenon_L130_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Ha1); [ zenon_intro zenon_H9a | zenon_intro zenon_H9b ]. % 217.93/218.19 apply (zenon_L291_); trivial. % 217.93/218.19 apply (zenon_L131_); trivial. % 217.93/218.19 (* end of lemma zenon_L297_ *) % 217.93/218.19 assert (zenon_L298_ : (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> ((j (e22)) = (e11)) -> ((op2 (e24) (e24)) = (e22)) -> ((op1 (e10) (e10)) = (e10)) -> ((op1 (e14) (e14)) = (e10)) -> ((j (op2 (e24) (e24))) = (op1 (j (e24)) (j (e24)))) -> (~((e10) = (e11))) -> (~((e10) = (e12))) -> (~((e10) = (e13))) -> ((j (h (e10))) = (e10)) -> ((h (e10)) = (e24)) -> (~((e10) = (e14))) -> False). % 217.93/218.19 do 0 intro. intros zenon_H9e zenon_H68 zenon_H75 zenon_H6e zenon_H6f zenon_H74 zenon_H93 zenon_Hb zenon_H3b zenon_H2c zenon_H13f zenon_H47. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H9e); [ zenon_intro zenon_H6b | zenon_intro zenon_H9f ]. % 217.93/218.19 apply (zenon_L100_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H9f); [ zenon_intro zenon_H92 | zenon_intro zenon_Ha0 ]. % 217.93/218.19 apply (zenon_L289_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Ha0); [ zenon_intro zenon_H97 | zenon_intro zenon_Ha1 ]. % 217.93/218.19 apply (zenon_L290_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Ha1); [ zenon_intro zenon_H9a | zenon_intro zenon_H9b ]. % 217.93/218.19 apply (zenon_L291_); trivial. % 217.93/218.19 apply (zenon_L292_); trivial. % 217.93/218.19 (* end of lemma zenon_L298_ *) % 217.93/218.19 assert (zenon_L299_ : (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> ((j (e22)) = (e12)) -> ((op2 (e24) (e24)) = (e22)) -> ((op1 (e10) (e10)) = (e10)) -> ((op1 (e14) (e14)) = (e10)) -> ((j (op2 (e24) (e24))) = (op1 (j (e24)) (j (e24)))) -> (~((e10) = (e11))) -> (~((e10) = (e12))) -> (~((e10) = (e13))) -> ((j (h (e10))) = (e10)) -> ((h (e10)) = (e24)) -> (~((e10) = (e14))) -> False). % 217.93/218.19 do 0 intro. intros zenon_H9e zenon_H69 zenon_H75 zenon_H6e zenon_H6f zenon_H74 zenon_H93 zenon_Hb zenon_H3b zenon_H2c zenon_H13f zenon_H47. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H9e); [ zenon_intro zenon_H6b | zenon_intro zenon_H9f ]. % 217.93/218.19 apply (zenon_L144_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H9f); [ zenon_intro zenon_H92 | zenon_intro zenon_Ha0 ]. % 217.93/218.19 apply (zenon_L289_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Ha0); [ zenon_intro zenon_H97 | zenon_intro zenon_Ha1 ]. % 217.93/218.19 apply (zenon_L290_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Ha1); [ zenon_intro zenon_H9a | zenon_intro zenon_H9b ]. % 217.93/218.19 apply (zenon_L291_); trivial. % 217.93/218.19 apply (zenon_L292_); trivial. % 217.93/218.19 (* end of lemma zenon_L299_ *) % 217.93/218.19 assert (zenon_L300_ : (((j (e22)) = (e10))\/(((j (e22)) = (e11))\/(((j (e22)) = (e12))\/(((j (e22)) = (e13))\/((j (e22)) = (e14)))))) -> ((h (e12)) = (e22)) -> ((j (h (e12))) = (e12)) -> ((h (e10)) = (e24)) -> ((j (h (e10))) = (e10)) -> ((j (op2 (e24) (e24))) = (op1 (j (e24)) (j (e24)))) -> ((op1 (e10) (e10)) = (e10)) -> ((op2 (e24) (e24)) = (e22)) -> (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> ((h (e14)) = (e23)) -> ((j (h (e14))) = (e14)) -> (~((e10) = (e11))) -> (~((e10) = (e12))) -> (~((e10) = (e13))) -> ((op1 (e14) (e14)) = (e10)) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((op2 (e22) (e22)) = (e23)) -> (~((e10) = (e14))) -> False). % 217.93/218.19 do 0 intro. intros zenon_Hbb zenon_Hff zenon_Hc zenon_H13f zenon_H2c zenon_H74 zenon_H6e zenon_H75 zenon_H9e zenon_Hb6 zenon_Hd9 zenon_Hc2 zenon_H93 zenon_Hb zenon_H3b zenon_H6f zenon_Hac zenon_Ha3 zenon_H47. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hbb); [ zenon_intro zenon_H66 | zenon_intro zenon_Hbc ]. % 217.93/218.19 apply (zenon_L142_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hbc); [ zenon_intro zenon_H68 | zenon_intro zenon_Hbd ]. % 217.93/218.19 apply (zenon_L298_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hbd); [ zenon_intro zenon_H69 | zenon_intro zenon_Hbe ]. % 217.93/218.19 apply (zenon_L299_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hbe); [ zenon_intro zenon_H7d | zenon_intro zenon_Hba ]. % 217.93/218.19 apply (zenon_L293_); trivial. % 217.93/218.19 apply (zenon_L248_); trivial. % 217.93/218.19 (* end of lemma zenon_L300_ *) % 217.93/218.19 assert (zenon_L301_ : (((j (e22)) = (e10))\/(((j (e22)) = (e11))\/(((j (e22)) = (e12))\/(((j (e22)) = (e13))\/((j (e22)) = (e14)))))) -> ((h (e12)) = (e22)) -> ((j (h (e12))) = (e12)) -> (~((e11) = (e12))) -> (~((e10) = (e14))) -> ((h (e10)) = (e24)) -> ((j (h (e10))) = (e10)) -> ((j (op2 (e24) (e24))) = (op1 (j (e24)) (j (e24)))) -> ((op1 (e10) (e10)) = (e10)) -> ((op2 (e24) (e24)) = (e22)) -> (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> ((op1 (e13) (e13)) = (e10)) -> (((j (e23)) = (e10))\/(((j (e23)) = (e11))\/(((j (e23)) = (e12))\/(((j (e23)) = (e13))\/((j (e23)) = (e14)))))) -> (~((e10) = (e11))) -> (~((e10) = (e12))) -> (~((e10) = (e13))) -> ((op2 (e22) (e22)) = (e23)) -> ((j (op2 (e22) (e22))) = (op1 (j (e22)) (j (e22)))) -> ((op1 (e14) (e14)) = (e10)) -> ((j (h (e13))) = (e13)) -> ((h (e13)) = (e23)) -> (~((e13) = (e14))) -> False). % 217.93/218.19 do 0 intro. intros zenon_Hbb zenon_Hff zenon_Hc zenon_H15 zenon_H47 zenon_H13f zenon_H2c zenon_H74 zenon_H6e zenon_H75 zenon_H9e zenon_Ha8 zenon_Hb6 zenon_H93 zenon_Hb zenon_H3b zenon_Ha3 zenon_Hac zenon_H6f zenon_H3c zenon_Hdd zenon_H5b. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hbb); [ zenon_intro zenon_H66 | zenon_intro zenon_Hbc ]. % 217.93/218.19 apply (zenon_L142_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hbc); [ zenon_intro zenon_H68 | zenon_intro zenon_Hbd ]. % 217.93/218.19 apply (zenon_L143_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hbd); [ zenon_intro zenon_H69 | zenon_intro zenon_Hbe ]. % 217.93/218.19 apply (zenon_L299_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hbe); [ zenon_intro zenon_H7d | zenon_intro zenon_Hba ]. % 217.93/218.19 apply (zenon_L279_); trivial. % 217.93/218.19 apply (zenon_L124_); trivial. % 217.93/218.19 (* end of lemma zenon_L301_ *) % 217.93/218.19 assert (zenon_L302_ : (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> (~((e11) = (e12))) -> (~((e10) = (e12))) -> ((h (e10)) = (e24)) -> ((j (h (e10))) = (e10)) -> (~((e12) = (e13))) -> ((j (h (e12))) = (e12)) -> ((h (e12)) = (e24)) -> (~((e12) = (e14))) -> False). % 217.93/218.19 do 0 intro. intros zenon_H9e zenon_H15 zenon_Hb zenon_H13f zenon_H2c zenon_H1f zenon_Hc zenon_H111 zenon_H26. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H9e); [ zenon_intro zenon_H6b | zenon_intro zenon_H9f ]. % 217.93/218.19 apply (zenon_L177_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H9f); [ zenon_intro zenon_H92 | zenon_intro zenon_Ha0 ]. % 217.93/218.19 apply (zenon_L179_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Ha0); [ zenon_intro zenon_H97 | zenon_intro zenon_Ha1 ]. % 217.93/218.19 apply (zenon_L290_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Ha1); [ zenon_intro zenon_H9a | zenon_intro zenon_H9b ]. % 217.93/218.19 apply (zenon_L173_); trivial. % 217.93/218.19 apply (zenon_L174_); trivial. % 217.93/218.19 (* end of lemma zenon_L302_ *) % 217.93/218.19 assert (zenon_L303_ : (((j (e24)) = (e10))\/(((j (e24)) = (e11))\/(((j (e24)) = (e12))\/(((j (e24)) = (e13))\/((j (e24)) = (e14)))))) -> ((j (e22)) = (e14)) -> ((op2 (e24) (e24)) = (e22)) -> ((op1 (e10) (e10)) = (e10)) -> ((op1 (e14) (e14)) = (e10)) -> ((j (op2 (e24) (e24))) = (op1 (j (e24)) (j (e24)))) -> (~((e10) = (e11))) -> (~((e10) = (e12))) -> (~((e10) = (e13))) -> ((j (h (e10))) = (e10)) -> ((h (e10)) = (e24)) -> (~((e10) = (e14))) -> False). % 217.93/218.19 do 0 intro. intros zenon_H9e zenon_Hba zenon_H75 zenon_H6e zenon_H6f zenon_H74 zenon_H93 zenon_Hb zenon_H3b zenon_H2c zenon_H13f zenon_H47. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H9e); [ zenon_intro zenon_H6b | zenon_intro zenon_H9f ]. % 217.93/218.19 apply (zenon_L73_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H9f); [ zenon_intro zenon_H92 | zenon_intro zenon_Ha0 ]. % 217.93/218.19 apply (zenon_L289_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Ha0); [ zenon_intro zenon_H97 | zenon_intro zenon_Ha1 ]. % 217.93/218.19 apply (zenon_L290_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Ha1); [ zenon_intro zenon_H9a | zenon_intro zenon_H9b ]. % 217.93/218.19 apply (zenon_L291_); trivial. % 217.93/218.19 apply (zenon_L292_); trivial. % 217.93/218.19 (* end of lemma zenon_L303_ *) % 217.93/218.19 apply NNPP. intro zenon_G. % 217.93/218.19 apply (zenon_and_s _ _ ax1). zenon_intro zenon_H93. zenon_intro zenon_H142. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H142). zenon_intro zenon_Hb. zenon_intro zenon_H143. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H143). zenon_intro zenon_H3b. zenon_intro zenon_H144. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H144). zenon_intro zenon_H47. zenon_intro zenon_H145. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H145). zenon_intro zenon_H15. zenon_intro zenon_H146. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H146). zenon_intro zenon_H42. zenon_intro zenon_H147. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H147). zenon_intro zenon_Hc8. zenon_intro zenon_H148. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H148). zenon_intro zenon_H1f. zenon_intro zenon_H149. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H149). zenon_intro zenon_H26. zenon_intro zenon_H5b. % 217.93/218.19 apply (zenon_and_s _ _ ax4). zenon_intro zenon_H6e. zenon_intro zenon_H14a. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H14a). zenon_intro zenon_H14c. zenon_intro zenon_H14b. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H14b). zenon_intro zenon_H14e. zenon_intro zenon_H14d. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H14d). zenon_intro zenon_H150. zenon_intro zenon_H14f. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H14f). zenon_intro zenon_H152. zenon_intro zenon_H151. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H151). zenon_intro zenon_H154. zenon_intro zenon_H153. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H153). zenon_intro zenon_H156. zenon_intro zenon_H155. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H155). zenon_intro zenon_H158. zenon_intro zenon_H157. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H157). zenon_intro zenon_H15a. zenon_intro zenon_H159. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H159). zenon_intro zenon_H15c. zenon_intro zenon_H15b. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H15b). zenon_intro zenon_H15e. zenon_intro zenon_H15d. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H15d). zenon_intro zenon_H160. zenon_intro zenon_H15f. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H15f). zenon_intro zenon_He9. zenon_intro zenon_H161. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H161). zenon_intro zenon_H163. zenon_intro zenon_H162. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H162). zenon_intro zenon_H165. zenon_intro zenon_H164. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H164). zenon_intro zenon_H167. zenon_intro zenon_H166. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H166). zenon_intro zenon_H169. zenon_intro zenon_H168. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H168). zenon_intro zenon_H16b. zenon_intro zenon_H16a. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H16a). zenon_intro zenon_Ha8. zenon_intro zenon_H16c. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H16c). zenon_intro zenon_H16e. zenon_intro zenon_H16d. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H16d). zenon_intro zenon_H170. zenon_intro zenon_H16f. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H16f). zenon_intro zenon_H172. zenon_intro zenon_H171. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H171). zenon_intro zenon_H174. zenon_intro zenon_H173. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H173). zenon_intro zenon_H175. zenon_intro zenon_H6f. % 217.93/218.19 apply (zenon_and_s _ _ ax5). zenon_intro zenon_H177. zenon_intro zenon_H176. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H176). zenon_intro zenon_H179. zenon_intro zenon_H178. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H178). zenon_intro zenon_H17b. zenon_intro zenon_H17a. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H17a). zenon_intro zenon_H17d. zenon_intro zenon_H17c. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H17c). zenon_intro zenon_H17f. zenon_intro zenon_H17e. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H17e). zenon_intro zenon_H181. zenon_intro zenon_H180. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H180). zenon_intro zenon_H183. zenon_intro zenon_H182. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H182). zenon_intro zenon_H185. zenon_intro zenon_H184. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H184). zenon_intro zenon_H187. zenon_intro zenon_H186. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H186). zenon_intro zenon_H189. zenon_intro zenon_H188. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H188). zenon_intro zenon_H18b. zenon_intro zenon_H18a. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H18a). zenon_intro zenon_H18d. zenon_intro zenon_H18c. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H18c). zenon_intro zenon_Ha3. zenon_intro zenon_H18e. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H18e). zenon_intro zenon_H190. zenon_intro zenon_H18f. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H18f). zenon_intro zenon_H192. zenon_intro zenon_H191. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H191). zenon_intro zenon_H194. zenon_intro zenon_H193. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H193). zenon_intro zenon_H196. zenon_intro zenon_H195. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H195). zenon_intro zenon_H198. zenon_intro zenon_H197. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H197). zenon_intro zenon_H83. zenon_intro zenon_H199. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H199). zenon_intro zenon_H19b. zenon_intro zenon_H19a. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H19a). zenon_intro zenon_H19d. zenon_intro zenon_H19c. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H19c). zenon_intro zenon_H19f. zenon_intro zenon_H19e. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H19e). zenon_intro zenon_H1a1. zenon_intro zenon_H1a0. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H1a0). zenon_intro zenon_H1a2. zenon_intro zenon_H75. % 217.93/218.19 apply (zenon_notimply_s _ _ zenon_G). zenon_intro zenon_H1a4. zenon_intro zenon_H1a3. % 217.93/218.19 apply zenon_H1a3. zenon_intro zenon_H1a5. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H1a5). zenon_intro zenon_H1a7. zenon_intro zenon_H1a6. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H1a6). zenon_intro zenon_H1a9. zenon_intro zenon_H1a8. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H1a8). zenon_intro zenon_H1ab. zenon_intro zenon_H1aa. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H1aa). zenon_intro zenon_H1ad. zenon_intro zenon_H1ac. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H1ac). zenon_intro zenon_H1af. zenon_intro zenon_H1ae. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H1ae). zenon_intro zenon_H1b1. zenon_intro zenon_H1b0. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H1b0). zenon_intro zenon_H1b3. zenon_intro zenon_H1b2. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H1b2). zenon_intro zenon_H1b5. zenon_intro zenon_H1b4. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H1b4). zenon_intro zenon_H1b7. zenon_intro zenon_H1b6. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H1b6). zenon_intro zenon_H1b9. zenon_intro zenon_H1b8. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H1b8). zenon_intro zenon_H1bb. zenon_intro zenon_H1ba. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H1ba). zenon_intro zenon_H1bd. zenon_intro zenon_H1bc. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H1bc). zenon_intro zenon_H1bf. zenon_intro zenon_H1be. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H1be). zenon_intro zenon_H1c1. zenon_intro zenon_H1c0. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H1c0). zenon_intro zenon_H1c3. zenon_intro zenon_H1c2. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H1c2). zenon_intro zenon_H1c5. zenon_intro zenon_H1c4. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H1c4). zenon_intro zenon_H1c7. zenon_intro zenon_H1c6. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H1c6). zenon_intro zenon_H1c9. zenon_intro zenon_H1c8. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H1c8). zenon_intro zenon_H1cb. zenon_intro zenon_H1ca. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H1ca). zenon_intro zenon_H1cd. zenon_intro zenon_H1cc. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H1cc). zenon_intro zenon_H1cf. zenon_intro zenon_H1ce. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H1ce). zenon_intro zenon_H1d1. zenon_intro zenon_H1d0. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H1d0). zenon_intro zenon_H1d3. zenon_intro zenon_H1d2. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H1d2). zenon_intro zenon_H1d5. zenon_intro zenon_H1d4. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H1d4). zenon_intro zenon_H1d7. zenon_intro zenon_H1d6. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H1d6). zenon_intro zenon_H1d9. zenon_intro zenon_H1d8. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H1d8). zenon_intro zenon_H1db. zenon_intro zenon_H1da. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H1da). zenon_intro zenon_H1dd. zenon_intro zenon_H1dc. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H1dc). zenon_intro zenon_H1df. zenon_intro zenon_H1de. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H1de). zenon_intro zenon_H1e1. zenon_intro zenon_H1e0. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H1e0). zenon_intro zenon_H1e3. zenon_intro zenon_H1e2. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H1e2). zenon_intro zenon_H1e5. zenon_intro zenon_H1e4. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H1e4). zenon_intro zenon_H1e7. zenon_intro zenon_H1e6. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H1e6). zenon_intro zenon_H1e9. zenon_intro zenon_H1e8. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H1e8). zenon_intro zenon_H1eb. zenon_intro zenon_H1ea. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H1ea). zenon_intro zenon_H1ed. zenon_intro zenon_H1ec. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H1ec). zenon_intro zenon_H1ef. zenon_intro zenon_H1ee. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H1ee). zenon_intro zenon_Hac. zenon_intro zenon_H1f0. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H1f0). zenon_intro zenon_H1f2. zenon_intro zenon_H1f1. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H1f1). zenon_intro zenon_H1f4. zenon_intro zenon_H1f3. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H1f3). zenon_intro zenon_H1f6. zenon_intro zenon_H1f5. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H1f5). zenon_intro zenon_H1f8. zenon_intro zenon_H1f7. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H1f7). zenon_intro zenon_H1fa. zenon_intro zenon_H1f9. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H1f9). zenon_intro zenon_H8c. zenon_intro zenon_H1fb. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H1fb). zenon_intro zenon_H1fd. zenon_intro zenon_H1fc. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H1fc). zenon_intro zenon_H1ff. zenon_intro zenon_H1fe. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H1fe). zenon_intro zenon_H201. zenon_intro zenon_H200. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H200). zenon_intro zenon_H203. zenon_intro zenon_H202. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H202). zenon_intro zenon_H205. zenon_intro zenon_H204. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H204). zenon_intro zenon_H74. zenon_intro zenon_H206. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H206). zenon_intro zenon_H208. zenon_intro zenon_H207. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H207). zenon_intro zenon_H20a. zenon_intro zenon_H209. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H209). zenon_intro zenon_H20c. zenon_intro zenon_H20b. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H20b). zenon_intro zenon_H20e. zenon_intro zenon_H20d. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H20d). zenon_intro zenon_H210. zenon_intro zenon_H20f. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H20f). zenon_intro zenon_H2c. zenon_intro zenon_H211. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H211). zenon_intro zenon_H105. zenon_intro zenon_H212. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H212). zenon_intro zenon_Hc. zenon_intro zenon_H213. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H213). zenon_intro zenon_H3c. zenon_intro zenon_Hc2. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H1a4). zenon_intro zenon_H215. zenon_intro zenon_H214. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H214). zenon_intro zenon_H217. zenon_intro zenon_H216. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H216). zenon_intro zenon_H12c. zenon_intro zenon_H218. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H218). zenon_intro zenon_Hf6. zenon_intro zenon_H219. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H219). zenon_intro zenon_Hf7. zenon_intro zenon_H21a. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H21a). zenon_intro zenon_H2b. zenon_intro zenon_H21b. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H21b). zenon_intro zenon_H5f. zenon_intro zenon_H21c. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H21c). zenon_intro zenon_Hbb. zenon_intro zenon_H21d. % 217.93/218.19 apply (zenon_and_s _ _ zenon_H21d). zenon_intro zenon_Hb6. zenon_intro zenon_H9e. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H215); [ zenon_intro zenon_H1b | zenon_intro zenon_H21e ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H217); [ zenon_intro zenon_H103 | zenon_intro zenon_H21f ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H12c); [ zenon_intro zenon_H7 | zenon_intro zenon_H12d ]. % 217.93/218.19 apply (zenon_L12_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H12d); [ zenon_intro zenon_H56 | zenon_intro zenon_H12e ]. % 217.93/218.19 apply (zenon_L140_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H12e); [ zenon_intro zenon_Hff | zenon_intro zenon_H12f ]. % 217.93/218.19 apply (zenon_L150_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H12f); [ zenon_intro zenon_H10d | zenon_intro zenon_H111 ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf6); [ zenon_intro zenon_H39 | zenon_intro zenon_Hf8 ]. % 217.93/218.19 apply (zenon_L18_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf8); [ zenon_intro zenon_H4f | zenon_intro zenon_Hf9 ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf7); [ zenon_intro zenon_Hc0 | zenon_intro zenon_Hfb ]. % 217.93/218.19 apply (zenon_L153_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfb); [ zenon_intro zenon_Hd0 | zenon_intro zenon_Hfc ]. % 217.93/218.19 apply (zenon_L154_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfc); [ zenon_intro zenon_Hd4 | zenon_intro zenon_Hfd ]. % 217.93/218.19 apply (zenon_L160_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfd); [ zenon_intro zenon_Hd9 | zenon_intro zenon_He1 ]. % 217.93/218.19 apply (zenon_L161_); trivial. % 217.93/218.19 apply (zenon_L167_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf9); [ zenon_intro zenon_H64 | zenon_intro zenon_Hfa ]. % 217.93/218.19 apply (zenon_L168_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfa); [ zenon_intro zenon_Hdd | zenon_intro zenon_Hf2 ]. % 217.93/218.19 apply (zenon_L170_); trivial. % 217.93/218.19 apply (zenon_L171_); trivial. % 217.93/218.19 apply (zenon_L187_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H21f); [ zenon_intro zenon_H115 | zenon_intro zenon_H220 ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H12c); [ zenon_intro zenon_H7 | zenon_intro zenon_H12d ]. % 217.93/218.19 apply (zenon_L12_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H12d); [ zenon_intro zenon_H56 | zenon_intro zenon_H12e ]. % 217.93/218.19 apply (zenon_L140_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H12e); [ zenon_intro zenon_Hff | zenon_intro zenon_H12f ]. % 217.93/218.19 apply (zenon_L150_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H12f); [ zenon_intro zenon_H10d | zenon_intro zenon_H111 ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf6); [ zenon_intro zenon_H39 | zenon_intro zenon_Hf8 ]. % 217.93/218.19 apply (zenon_L18_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf8); [ zenon_intro zenon_H4f | zenon_intro zenon_Hf9 ]. % 217.93/218.19 apply (zenon_L190_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf9); [ zenon_intro zenon_H64 | zenon_intro zenon_Hfa ]. % 217.93/218.19 apply (zenon_L54_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfa); [ zenon_intro zenon_Hdd | zenon_intro zenon_Hf2 ]. % 217.93/218.19 apply (zenon_L170_); trivial. % 217.93/218.19 apply (zenon_L171_); trivial. % 217.93/218.19 apply (zenon_L187_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H220); [ zenon_intro zenon_H11b | zenon_intro zenon_H221 ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H12c); [ zenon_intro zenon_H7 | zenon_intro zenon_H12d ]. % 217.93/218.19 apply (zenon_L12_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H12d); [ zenon_intro zenon_H56 | zenon_intro zenon_H12e ]. % 217.93/218.19 apply (zenon_L140_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H12e); [ zenon_intro zenon_Hff | zenon_intro zenon_H12f ]. % 217.93/218.19 apply (zenon_L150_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H12f); [ zenon_intro zenon_H10d | zenon_intro zenon_H111 ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf6); [ zenon_intro zenon_H39 | zenon_intro zenon_Hf8 ]. % 217.93/218.19 apply (zenon_L18_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf8); [ zenon_intro zenon_H4f | zenon_intro zenon_Hf9 ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf7); [ zenon_intro zenon_Hc0 | zenon_intro zenon_Hfb ]. % 217.93/218.19 apply (zenon_L60_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfb); [ zenon_intro zenon_Hd0 | zenon_intro zenon_Hfc ]. % 217.93/218.19 apply (zenon_L154_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfc); [ zenon_intro zenon_Hd4 | zenon_intro zenon_Hfd ]. % 217.93/218.19 apply (zenon_L81_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfd); [ zenon_intro zenon_Hd9 | zenon_intro zenon_He1 ]. % 217.93/218.19 apply (zenon_L161_); trivial. % 217.93/218.19 apply (zenon_L192_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf9); [ zenon_intro zenon_H64 | zenon_intro zenon_Hfa ]. % 217.93/218.19 apply (zenon_L168_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfa); [ zenon_intro zenon_Hdd | zenon_intro zenon_Hf2 ]. % 217.93/218.19 apply (zenon_L170_); trivial. % 217.93/218.19 apply (zenon_L171_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf6); [ zenon_intro zenon_H39 | zenon_intro zenon_Hf8 ]. % 217.93/218.19 apply (zenon_L18_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf8); [ zenon_intro zenon_H4f | zenon_intro zenon_Hf9 ]. % 217.93/218.19 apply (zenon_L184_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf9); [ zenon_intro zenon_H64 | zenon_intro zenon_Hfa ]. % 217.93/218.19 apply (zenon_L194_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfa); [ zenon_intro zenon_Hdd | zenon_intro zenon_Hf2 ]. % 217.93/218.19 apply (zenon_L185_); trivial. % 217.93/218.19 apply (zenon_L186_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H221); [ zenon_intro zenon_H122 | zenon_intro zenon_H129 ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H12c); [ zenon_intro zenon_H7 | zenon_intro zenon_H12d ]. % 217.93/218.19 apply (zenon_L12_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H12d); [ zenon_intro zenon_H56 | zenon_intro zenon_H12e ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf6); [ zenon_intro zenon_H39 | zenon_intro zenon_Hf8 ]. % 217.93/218.19 apply (zenon_L18_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf8); [ zenon_intro zenon_H4f | zenon_intro zenon_Hf9 ]. % 217.93/218.19 apply (zenon_L26_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf9); [ zenon_intro zenon_H64 | zenon_intro zenon_Hfa ]. % 217.93/218.19 apply (zenon_L54_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfa); [ zenon_intro zenon_Hdd | zenon_intro zenon_Hf2 ]. % 217.93/218.19 apply (zenon_L197_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf7); [ zenon_intro zenon_Hc0 | zenon_intro zenon_Hfb ]. % 217.93/218.19 apply (zenon_L60_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfb); [ zenon_intro zenon_Hd0 | zenon_intro zenon_Hfc ]. % 217.93/218.19 apply (zenon_L67_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfc); [ zenon_intro zenon_Hd4 | zenon_intro zenon_Hfd ]. % 217.93/218.19 apply (zenon_L202_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfd); [ zenon_intro zenon_Hd9 | zenon_intro zenon_He1 ]. % 217.93/218.19 apply (zenon_L138_); trivial. % 217.93/218.19 apply (zenon_L139_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H12e); [ zenon_intro zenon_Hff | zenon_intro zenon_H12f ]. % 217.93/218.19 apply (zenon_L204_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H12f); [ zenon_intro zenon_H10d | zenon_intro zenon_H111 ]. % 217.93/218.19 apply (zenon_L205_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf6); [ zenon_intro zenon_H39 | zenon_intro zenon_Hf8 ]. % 217.93/218.19 apply (zenon_L18_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf8); [ zenon_intro zenon_H4f | zenon_intro zenon_Hf9 ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf7); [ zenon_intro zenon_Hc0 | zenon_intro zenon_Hfb ]. % 217.93/218.19 apply (zenon_L60_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfb); [ zenon_intro zenon_Hd0 | zenon_intro zenon_Hfc ]. % 217.93/218.19 apply (zenon_L154_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfc); [ zenon_intro zenon_Hd4 | zenon_intro zenon_Hfd ]. % 217.93/218.19 apply (zenon_L202_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfd); [ zenon_intro zenon_Hd9 | zenon_intro zenon_He1 ]. % 217.93/218.19 apply (zenon_L206_); trivial. % 217.93/218.19 apply (zenon_L183_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf9); [ zenon_intro zenon_H64 | zenon_intro zenon_Hfa ]. % 217.93/218.19 apply (zenon_L208_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfa); [ zenon_intro zenon_Hdd | zenon_intro zenon_Hf2 ]. % 217.93/218.19 apply (zenon_L185_); trivial. % 217.93/218.19 apply (zenon_L186_); trivial. % 217.93/218.19 apply (zenon_L229_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H21e); [ zenon_intro zenon_H131 | zenon_intro zenon_H222 ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H12c); [ zenon_intro zenon_H7 | zenon_intro zenon_H12d ]. % 217.93/218.19 apply (zenon_L235_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H12d); [ zenon_intro zenon_H56 | zenon_intro zenon_H12e ]. % 217.93/218.19 apply (zenon_L239_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H12e); [ zenon_intro zenon_Hff | zenon_intro zenon_H12f ]. % 217.93/218.19 apply (zenon_L150_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H12f); [ zenon_intro zenon_H10d | zenon_intro zenon_H111 ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf6); [ zenon_intro zenon_H39 | zenon_intro zenon_Hf8 ]. % 217.93/218.19 apply (zenon_L240_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf8); [ zenon_intro zenon_H4f | zenon_intro zenon_Hf9 ]. % 217.93/218.19 apply (zenon_L232_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf9); [ zenon_intro zenon_H64 | zenon_intro zenon_Hfa ]. % 217.93/218.19 apply (zenon_L168_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfa); [ zenon_intro zenon_Hdd | zenon_intro zenon_Hf2 ]. % 217.93/218.19 apply (zenon_L170_); trivial. % 217.93/218.19 apply (zenon_L171_); trivial. % 217.93/218.19 apply (zenon_L242_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H222); [ zenon_intro zenon_H134 | zenon_intro zenon_H223 ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H217); [ zenon_intro zenon_H103 | zenon_intro zenon_H21f ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H12c); [ zenon_intro zenon_H7 | zenon_intro zenon_H12d ]. % 217.93/218.19 apply (zenon_L243_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H12d); [ zenon_intro zenon_H56 | zenon_intro zenon_H12e ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf6); [ zenon_intro zenon_H39 | zenon_intro zenon_Hf8 ]. % 217.93/218.19 apply (zenon_L244_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf8); [ zenon_intro zenon_H4f | zenon_intro zenon_Hf9 ]. % 217.93/218.19 apply (zenon_L26_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf9); [ zenon_intro zenon_H64 | zenon_intro zenon_Hfa ]. % 217.93/218.19 apply (zenon_L251_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfa); [ zenon_intro zenon_Hdd | zenon_intro zenon_Hf2 ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf7); [ zenon_intro zenon_Hc0 | zenon_intro zenon_Hfb ]. % 217.93/218.19 apply (zenon_L153_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfb); [ zenon_intro zenon_Hd0 | zenon_intro zenon_Hfc ]. % 217.93/218.19 apply (zenon_L67_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfc); [ zenon_intro zenon_Hd4 | zenon_intro zenon_Hfd ]. % 217.93/218.19 apply (zenon_L81_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfd); [ zenon_intro zenon_Hd9 | zenon_intro zenon_He1 ]. % 217.93/218.19 apply (zenon_L89_); trivial. % 217.93/218.19 apply (zenon_L253_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf7); [ zenon_intro zenon_Hc0 | zenon_intro zenon_Hfb ]. % 217.93/218.19 apply (zenon_L153_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfb); [ zenon_intro zenon_Hd0 | zenon_intro zenon_Hfc ]. % 217.93/218.19 apply (zenon_L67_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfc); [ zenon_intro zenon_Hd4 | zenon_intro zenon_Hfd ]. % 217.93/218.19 apply (zenon_L81_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfd); [ zenon_intro zenon_Hd9 | zenon_intro zenon_He1 ]. % 217.93/218.19 apply (zenon_L256_); trivial. % 217.93/218.19 apply (zenon_L139_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H12e); [ zenon_intro zenon_Hff | zenon_intro zenon_H12f ]. % 217.93/218.19 apply (zenon_L150_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H12f); [ zenon_intro zenon_H10d | zenon_intro zenon_H111 ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf6); [ zenon_intro zenon_H39 | zenon_intro zenon_Hf8 ]. % 217.93/218.19 apply (zenon_L244_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf8); [ zenon_intro zenon_H4f | zenon_intro zenon_Hf9 ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf7); [ zenon_intro zenon_Hc0 | zenon_intro zenon_Hfb ]. % 217.93/218.19 apply (zenon_L153_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfb); [ zenon_intro zenon_Hd0 | zenon_intro zenon_Hfc ]. % 217.93/218.19 apply (zenon_L154_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfc); [ zenon_intro zenon_Hd4 | zenon_intro zenon_Hfd ]. % 217.93/218.19 apply (zenon_L81_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfd); [ zenon_intro zenon_Hd9 | zenon_intro zenon_He1 ]. % 217.93/218.19 apply (zenon_L161_); trivial. % 217.93/218.19 apply (zenon_L257_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf9); [ zenon_intro zenon_H64 | zenon_intro zenon_Hfa ]. % 217.93/218.19 apply (zenon_L168_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfa); [ zenon_intro zenon_Hdd | zenon_intro zenon_Hf2 ]. % 217.93/218.19 apply (zenon_L170_); trivial. % 217.93/218.19 apply (zenon_L258_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf6); [ zenon_intro zenon_H39 | zenon_intro zenon_Hf8 ]. % 217.93/218.19 apply (zenon_L244_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf8); [ zenon_intro zenon_H4f | zenon_intro zenon_Hf9 ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf7); [ zenon_intro zenon_Hc0 | zenon_intro zenon_Hfb ]. % 217.93/218.19 apply (zenon_L153_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfb); [ zenon_intro zenon_Hd0 | zenon_intro zenon_Hfc ]. % 217.93/218.19 apply (zenon_L154_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfc); [ zenon_intro zenon_Hd4 | zenon_intro zenon_Hfd ]. % 217.93/218.19 apply (zenon_L176_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfd); [ zenon_intro zenon_Hd9 | zenon_intro zenon_He1 ]. % 217.93/218.19 apply (zenon_L259_); trivial. % 217.93/218.19 apply (zenon_L183_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf9); [ zenon_intro zenon_H64 | zenon_intro zenon_Hfa ]. % 217.93/218.19 apply (zenon_L54_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfa); [ zenon_intro zenon_Hdd | zenon_intro zenon_Hf2 ]. % 217.93/218.19 apply (zenon_L185_); trivial. % 217.93/218.19 apply (zenon_L186_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H21f); [ zenon_intro zenon_H115 | zenon_intro zenon_H220 ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H12c); [ zenon_intro zenon_H7 | zenon_intro zenon_H12d ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf6); [ zenon_intro zenon_H39 | zenon_intro zenon_Hf8 ]. % 217.93/218.19 apply (zenon_L209_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf8); [ zenon_intro zenon_H4f | zenon_intro zenon_Hf9 ]. % 217.93/218.19 apply (zenon_L190_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf9); [ zenon_intro zenon_H64 | zenon_intro zenon_Hfa ]. % 217.93/218.19 apply (zenon_L262_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfa); [ zenon_intro zenon_Hdd | zenon_intro zenon_Hf2 ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf7); [ zenon_intro zenon_Hc0 | zenon_intro zenon_Hfb ]. % 217.93/218.19 apply (zenon_L210_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfb); [ zenon_intro zenon_Hd0 | zenon_intro zenon_Hfc ]. % 217.93/218.19 apply (zenon_L261_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfc); [ zenon_intro zenon_Hd4 | zenon_intro zenon_Hfd ]. % 217.93/218.19 apply (zenon_L81_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfd); [ zenon_intro zenon_Hd9 | zenon_intro zenon_He1 ]. % 217.93/218.19 apply (zenon_L89_); trivial. % 217.93/218.19 apply (zenon_L253_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf7); [ zenon_intro zenon_Hc0 | zenon_intro zenon_Hfb ]. % 217.93/218.19 apply (zenon_L210_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfb); [ zenon_intro zenon_Hd0 | zenon_intro zenon_Hfc ]. % 217.93/218.19 apply (zenon_L261_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfc); [ zenon_intro zenon_Hd4 | zenon_intro zenon_Hfd ]. % 217.93/218.19 apply (zenon_L81_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfd); [ zenon_intro zenon_Hd9 | zenon_intro zenon_He1 ]. % 217.93/218.19 apply (zenon_L256_); trivial. % 217.93/218.19 apply (zenon_L139_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H12d); [ zenon_intro zenon_H56 | zenon_intro zenon_H12e ]. % 217.93/218.19 apply (zenon_L264_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H12e); [ zenon_intro zenon_Hff | zenon_intro zenon_H12f ]. % 217.93/218.19 apply (zenon_L150_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H12f); [ zenon_intro zenon_H10d | zenon_intro zenon_H111 ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf6); [ zenon_intro zenon_H39 | zenon_intro zenon_Hf8 ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf7); [ zenon_intro zenon_Hc0 | zenon_intro zenon_Hfb ]. % 217.93/218.19 apply (zenon_L224_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfb); [ zenon_intro zenon_Hd0 | zenon_intro zenon_Hfc ]. % 217.93/218.19 apply (zenon_L261_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfc); [ zenon_intro zenon_Hd4 | zenon_intro zenon_Hfd ]. % 217.93/218.19 apply (zenon_L160_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfd); [ zenon_intro zenon_Hd9 | zenon_intro zenon_He1 ]. % 217.93/218.19 apply (zenon_L161_); trivial. % 217.93/218.19 apply (zenon_L257_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf8); [ zenon_intro zenon_H4f | zenon_intro zenon_Hf9 ]. % 217.93/218.19 apply (zenon_L190_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf9); [ zenon_intro zenon_H64 | zenon_intro zenon_Hfa ]. % 217.93/218.19 apply (zenon_L168_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfa); [ zenon_intro zenon_Hdd | zenon_intro zenon_Hf2 ]. % 217.93/218.19 apply (zenon_L170_); trivial. % 217.93/218.19 apply (zenon_L258_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf6); [ zenon_intro zenon_H39 | zenon_intro zenon_Hf8 ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf7); [ zenon_intro zenon_Hc0 | zenon_intro zenon_Hfb ]. % 217.93/218.19 apply (zenon_L224_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfb); [ zenon_intro zenon_Hd0 | zenon_intro zenon_Hfc ]. % 217.93/218.19 apply (zenon_L261_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfc); [ zenon_intro zenon_Hd4 | zenon_intro zenon_Hfd ]. % 217.93/218.19 apply (zenon_L176_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfd); [ zenon_intro zenon_Hd9 | zenon_intro zenon_He1 ]. % 217.93/218.19 apply (zenon_L259_); trivial. % 217.93/218.19 apply (zenon_L183_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf8); [ zenon_intro zenon_H4f | zenon_intro zenon_Hf9 ]. % 217.93/218.19 apply (zenon_L190_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf9); [ zenon_intro zenon_H64 | zenon_intro zenon_Hfa ]. % 217.93/218.19 apply (zenon_L54_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfa); [ zenon_intro zenon_Hdd | zenon_intro zenon_Hf2 ]. % 217.93/218.19 apply (zenon_L185_); trivial. % 217.93/218.19 apply (zenon_L186_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H220); [ zenon_intro zenon_H11b | zenon_intro zenon_H221 ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hbb); [ zenon_intro zenon_H66 | zenon_intro zenon_Hbc ]. % 217.93/218.19 apply (zenon_L191_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hbc); [ zenon_intro zenon_H68 | zenon_intro zenon_Hbd ]. % 217.93/218.19 apply (zenon_L252_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hbd); [ zenon_intro zenon_H69 | zenon_intro zenon_Hbe ]. % 217.93/218.19 apply (zenon_L147_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hbe); [ zenon_intro zenon_H7d | zenon_intro zenon_Hba ]. % 217.93/218.19 apply (zenon_L52_); trivial. % 217.93/218.19 apply (zenon_L80_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H221); [ zenon_intro zenon_H122 | zenon_intro zenon_H129 ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H12c); [ zenon_intro zenon_H7 | zenon_intro zenon_H12d ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf6); [ zenon_intro zenon_H39 | zenon_intro zenon_Hf8 ]. % 217.93/218.19 apply (zenon_L209_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf8); [ zenon_intro zenon_H4f | zenon_intro zenon_Hf9 ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf7); [ zenon_intro zenon_Hc0 | zenon_intro zenon_Hfb ]. % 217.93/218.19 apply (zenon_L210_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfb); [ zenon_intro zenon_Hd0 | zenon_intro zenon_Hfc ]. % 217.93/218.19 apply (zenon_L154_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfc); [ zenon_intro zenon_Hd4 | zenon_intro zenon_Hfd ]. % 217.93/218.19 apply (zenon_L202_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfd); [ zenon_intro zenon_Hd9 | zenon_intro zenon_He1 ]. % 217.93/218.19 apply (zenon_L206_); trivial. % 217.93/218.19 apply (zenon_L265_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf9); [ zenon_intro zenon_H64 | zenon_intro zenon_Hfa ]. % 217.93/218.19 apply (zenon_L208_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfa); [ zenon_intro zenon_Hdd | zenon_intro zenon_Hf2 ]. % 217.93/218.19 apply (zenon_L197_); trivial. % 217.93/218.19 apply (zenon_L266_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H12d); [ zenon_intro zenon_H56 | zenon_intro zenon_H12e ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf6); [ zenon_intro zenon_H39 | zenon_intro zenon_Hf8 ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf7); [ zenon_intro zenon_Hc0 | zenon_intro zenon_Hfb ]. % 217.93/218.19 apply (zenon_L224_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfb); [ zenon_intro zenon_Hd0 | zenon_intro zenon_Hfc ]. % 217.93/218.19 apply (zenon_L67_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfc); [ zenon_intro zenon_Hd4 | zenon_intro zenon_Hfd ]. % 217.93/218.19 apply (zenon_L81_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfd); [ zenon_intro zenon_Hd9 | zenon_intro zenon_He1 ]. % 217.93/218.19 apply (zenon_L206_); trivial. % 217.93/218.19 apply (zenon_L265_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf8); [ zenon_intro zenon_H4f | zenon_intro zenon_Hf9 ]. % 217.93/218.19 apply (zenon_L26_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf9); [ zenon_intro zenon_H64 | zenon_intro zenon_Hfa ]. % 217.93/218.19 apply (zenon_L208_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfa); [ zenon_intro zenon_Hdd | zenon_intro zenon_Hf2 ]. % 217.93/218.19 apply (zenon_L197_); trivial. % 217.93/218.19 apply (zenon_L266_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H12e); [ zenon_intro zenon_Hff | zenon_intro zenon_H12f ]. % 217.93/218.19 apply (zenon_L204_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H12f); [ zenon_intro zenon_H10d | zenon_intro zenon_H111 ]. % 217.93/218.19 apply (zenon_L205_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hbb); [ zenon_intro zenon_H66 | zenon_intro zenon_Hbc ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hb6); [ zenon_intro zenon_H86 | zenon_intro zenon_Hb7 ]. % 217.93/218.19 apply (zenon_L178_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hb7); [ zenon_intro zenon_Hb2 | zenon_intro zenon_Hb8 ]. % 217.93/218.19 apply (zenon_L96_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hb8); [ zenon_intro zenon_Hb3 | zenon_intro zenon_Hb9 ]. % 217.93/218.19 apply (zenon_L199_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hb9); [ zenon_intro zenon_Hb4 | zenon_intro zenon_Hb5 ]. % 217.93/218.19 apply (zenon_L196_); trivial. % 217.93/218.19 apply (zenon_L200_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hbc); [ zenon_intro zenon_H68 | zenon_intro zenon_Hbd ]. % 217.93/218.19 apply (zenon_L252_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hbd); [ zenon_intro zenon_H69 | zenon_intro zenon_Hbe ]. % 217.93/218.19 apply (zenon_L267_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hbe); [ zenon_intro zenon_H7d | zenon_intro zenon_Hba ]. % 217.93/218.19 apply (zenon_L193_); trivial. % 217.93/218.19 apply (zenon_L175_); trivial. % 217.93/218.19 apply (zenon_L229_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H223); [ zenon_intro zenon_H13b | zenon_intro zenon_H13f ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H217); [ zenon_intro zenon_H103 | zenon_intro zenon_H21f ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H12c); [ zenon_intro zenon_H7 | zenon_intro zenon_H12d ]. % 217.93/218.19 apply (zenon_L243_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H12d); [ zenon_intro zenon_H56 | zenon_intro zenon_H12e ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf6); [ zenon_intro zenon_H39 | zenon_intro zenon_Hf8 ]. % 217.93/218.19 apply (zenon_L244_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf8); [ zenon_intro zenon_H4f | zenon_intro zenon_Hf9 ]. % 217.93/218.19 apply (zenon_L26_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf9); [ zenon_intro zenon_H64 | zenon_intro zenon_Hfa ]. % 217.93/218.19 apply (zenon_L251_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfa); [ zenon_intro zenon_Hdd | zenon_intro zenon_Hf2 ]. % 217.93/218.19 apply (zenon_L270_); trivial. % 217.93/218.19 apply (zenon_L274_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H12e); [ zenon_intro zenon_Hff | zenon_intro zenon_H12f ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf6); [ zenon_intro zenon_H39 | zenon_intro zenon_Hf8 ]. % 217.93/218.19 apply (zenon_L244_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf8); [ zenon_intro zenon_H4f | zenon_intro zenon_Hf9 ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf7); [ zenon_intro zenon_Hc0 | zenon_intro zenon_Hfb ]. % 217.93/218.19 apply (zenon_L153_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfb); [ zenon_intro zenon_Hd0 | zenon_intro zenon_Hfc ]. % 217.93/218.19 apply (zenon_L154_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfc); [ zenon_intro zenon_Hd4 | zenon_intro zenon_Hfd ]. % 217.93/218.19 apply (zenon_L275_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfd); [ zenon_intro zenon_Hd9 | zenon_intro zenon_He1 ]. % 217.93/218.19 apply (zenon_L276_); trivial. % 217.93/218.19 apply (zenon_L277_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf9); [ zenon_intro zenon_H64 | zenon_intro zenon_Hfa ]. % 217.93/218.19 apply (zenon_L278_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfa); [ zenon_intro zenon_Hdd | zenon_intro zenon_Hf2 ]. % 217.93/218.19 apply (zenon_L280_); trivial. % 217.93/218.19 apply (zenon_L281_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H12f); [ zenon_intro zenon_H10d | zenon_intro zenon_H111 ]. % 217.93/218.19 apply (zenon_L282_); trivial. % 217.93/218.19 apply (zenon_L283_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H21f); [ zenon_intro zenon_H115 | zenon_intro zenon_H220 ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H12c); [ zenon_intro zenon_H7 | zenon_intro zenon_H12d ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf6); [ zenon_intro zenon_H39 | zenon_intro zenon_Hf8 ]. % 217.93/218.19 apply (zenon_L209_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf8); [ zenon_intro zenon_H4f | zenon_intro zenon_Hf9 ]. % 217.93/218.19 apply (zenon_L285_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf9); [ zenon_intro zenon_H64 | zenon_intro zenon_Hfa ]. % 217.93/218.19 apply (zenon_L262_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfa); [ zenon_intro zenon_Hdd | zenon_intro zenon_Hf2 ]. % 217.93/218.19 apply (zenon_L270_); trivial. % 217.93/218.19 apply (zenon_L274_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H12d); [ zenon_intro zenon_H56 | zenon_intro zenon_H12e ]. % 217.93/218.19 apply (zenon_L264_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H12e); [ zenon_intro zenon_Hff | zenon_intro zenon_H12f ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf6); [ zenon_intro zenon_H39 | zenon_intro zenon_Hf8 ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf7); [ zenon_intro zenon_Hc0 | zenon_intro zenon_Hfb ]. % 217.93/218.19 apply (zenon_L224_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfb); [ zenon_intro zenon_Hd0 | zenon_intro zenon_Hfc ]. % 217.93/218.19 apply (zenon_L261_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfc); [ zenon_intro zenon_Hd4 | zenon_intro zenon_Hfd ]. % 217.93/218.19 apply (zenon_L275_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfd); [ zenon_intro zenon_Hd9 | zenon_intro zenon_He1 ]. % 217.93/218.19 apply (zenon_L276_); trivial. % 217.93/218.19 apply (zenon_L277_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf8); [ zenon_intro zenon_H4f | zenon_intro zenon_Hf9 ]. % 217.93/218.19 apply (zenon_L190_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf9); [ zenon_intro zenon_H64 | zenon_intro zenon_Hfa ]. % 217.93/218.19 apply (zenon_L278_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfa); [ zenon_intro zenon_Hdd | zenon_intro zenon_Hf2 ]. % 217.93/218.19 apply (zenon_L280_); trivial. % 217.93/218.19 apply (zenon_L281_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H12f); [ zenon_intro zenon_H10d | zenon_intro zenon_H111 ]. % 217.93/218.19 apply (zenon_L282_); trivial. % 217.93/218.19 apply (zenon_L283_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H220); [ zenon_intro zenon_H11b | zenon_intro zenon_H221 ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H12c); [ zenon_intro zenon_H7 | zenon_intro zenon_H12d ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf6); [ zenon_intro zenon_H39 | zenon_intro zenon_Hf8 ]. % 217.93/218.19 apply (zenon_L209_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf8); [ zenon_intro zenon_H4f | zenon_intro zenon_Hf9 ]. % 217.93/218.19 apply (zenon_L285_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf9); [ zenon_intro zenon_H64 | zenon_intro zenon_Hfa ]. % 217.93/218.19 apply (zenon_L287_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfa); [ zenon_intro zenon_Hdd | zenon_intro zenon_Hf2 ]. % 217.93/218.19 apply (zenon_L270_); trivial. % 217.93/218.19 apply (zenon_L274_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H12d); [ zenon_intro zenon_H56 | zenon_intro zenon_H12e ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf6); [ zenon_intro zenon_H39 | zenon_intro zenon_Hf8 ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf7); [ zenon_intro zenon_Hc0 | zenon_intro zenon_Hfb ]. % 217.93/218.19 apply (zenon_L224_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfb); [ zenon_intro zenon_Hd0 | zenon_intro zenon_Hfc ]. % 217.93/218.19 apply (zenon_L67_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfc); [ zenon_intro zenon_Hd4 | zenon_intro zenon_Hfd ]. % 217.93/218.19 apply (zenon_L81_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfd); [ zenon_intro zenon_Hd9 | zenon_intro zenon_He1 ]. % 217.93/218.19 apply (zenon_L284_); trivial. % 217.93/218.19 apply (zenon_L277_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf8); [ zenon_intro zenon_H4f | zenon_intro zenon_Hf9 ]. % 217.93/218.19 apply (zenon_L26_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf9); [ zenon_intro zenon_H64 | zenon_intro zenon_Hfa ]. % 217.93/218.19 apply (zenon_L287_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfa); [ zenon_intro zenon_Hdd | zenon_intro zenon_Hf2 ]. % 217.93/218.19 apply (zenon_L270_); trivial. % 217.93/218.19 apply (zenon_L274_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H12e); [ zenon_intro zenon_Hff | zenon_intro zenon_H12f ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hbb); [ zenon_intro zenon_H66 | zenon_intro zenon_Hbc ]. % 217.93/218.19 apply (zenon_L191_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hbc); [ zenon_intro zenon_H68 | zenon_intro zenon_Hbd ]. % 217.93/218.19 apply (zenon_L143_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hbd); [ zenon_intro zenon_H69 | zenon_intro zenon_Hbe ]. % 217.93/218.19 apply (zenon_L286_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hbe); [ zenon_intro zenon_H7d | zenon_intro zenon_Hba ]. % 217.93/218.19 apply (zenon_L148_); trivial. % 217.93/218.19 apply (zenon_L149_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H12f); [ zenon_intro zenon_H10d | zenon_intro zenon_H111 ]. % 217.93/218.19 apply (zenon_L282_); trivial. % 217.93/218.19 apply (zenon_L283_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H221); [ zenon_intro zenon_H122 | zenon_intro zenon_H129 ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hb6); [ zenon_intro zenon_H86 | zenon_intro zenon_Hb7 ]. % 217.93/218.19 apply (zenon_L198_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hb7); [ zenon_intro zenon_Hb2 | zenon_intro zenon_Hb8 ]. % 217.93/218.19 apply (zenon_L271_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hb8); [ zenon_intro zenon_Hb3 | zenon_intro zenon_Hb9 ]. % 217.93/218.19 apply (zenon_L199_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hb9); [ zenon_intro zenon_Hb4 | zenon_intro zenon_Hb5 ]. % 217.93/218.19 apply (zenon_L196_); trivial. % 217.93/218.19 apply (zenon_L200_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H12c); [ zenon_intro zenon_H7 | zenon_intro zenon_H12d ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf6); [ zenon_intro zenon_H39 | zenon_intro zenon_Hf8 ]. % 217.93/218.19 apply (zenon_L209_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf8); [ zenon_intro zenon_H4f | zenon_intro zenon_Hf9 ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf7); [ zenon_intro zenon_Hc0 | zenon_intro zenon_Hfb ]. % 217.93/218.19 apply (zenon_L210_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfb); [ zenon_intro zenon_Hd0 | zenon_intro zenon_Hfc ]. % 217.93/218.19 apply (zenon_L154_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfc); [ zenon_intro zenon_Hd4 | zenon_intro zenon_Hfd ]. % 217.93/218.19 apply (zenon_L226_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfd); [ zenon_intro zenon_Hd9 | zenon_intro zenon_He1 ]. % 217.93/218.19 apply (zenon_L284_); trivial. % 217.93/218.19 apply (zenon_L217_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf9); [ zenon_intro zenon_H64 | zenon_intro zenon_Hfa ]. % 217.93/218.19 apply (zenon_L220_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfa); [ zenon_intro zenon_Hdd | zenon_intro zenon_Hf2 ]. % 217.93/218.19 apply (zenon_L270_); trivial. % 217.93/218.19 apply (zenon_L222_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H12d); [ zenon_intro zenon_H56 | zenon_intro zenon_H12e ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf6); [ zenon_intro zenon_H39 | zenon_intro zenon_Hf8 ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf7); [ zenon_intro zenon_Hc0 | zenon_intro zenon_Hfb ]. % 217.93/218.19 apply (zenon_L224_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfb); [ zenon_intro zenon_Hd0 | zenon_intro zenon_Hfc ]. % 217.93/218.19 apply (zenon_L67_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfc); [ zenon_intro zenon_Hd4 | zenon_intro zenon_Hfd ]. % 217.93/218.19 apply (zenon_L226_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfd); [ zenon_intro zenon_Hd9 | zenon_intro zenon_He1 ]. % 217.93/218.19 apply (zenon_L284_); trivial. % 217.93/218.19 apply (zenon_L217_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf8); [ zenon_intro zenon_H4f | zenon_intro zenon_Hf9 ]. % 217.93/218.19 apply (zenon_L26_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf9); [ zenon_intro zenon_H64 | zenon_intro zenon_Hfa ]. % 217.93/218.19 apply (zenon_L220_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfa); [ zenon_intro zenon_Hdd | zenon_intro zenon_Hf2 ]. % 217.93/218.19 apply (zenon_L270_); trivial. % 217.93/218.19 apply (zenon_L222_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H12e); [ zenon_intro zenon_Hff | zenon_intro zenon_H12f ]. % 217.93/218.19 apply (zenon_L227_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H12f); [ zenon_intro zenon_H10d | zenon_intro zenon_H111 ]. % 217.93/218.19 apply (zenon_L282_); trivial. % 217.93/218.19 apply (zenon_L228_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H217); [ zenon_intro zenon_H103 | zenon_intro zenon_H21f ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H12c); [ zenon_intro zenon_H7 | zenon_intro zenon_H12d ]. % 217.93/218.19 apply (zenon_L243_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H12d); [ zenon_intro zenon_H56 | zenon_intro zenon_H12e ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf6); [ zenon_intro zenon_H39 | zenon_intro zenon_Hf8 ]. % 217.93/218.19 apply (zenon_L244_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf8); [ zenon_intro zenon_H4f | zenon_intro zenon_Hf9 ]. % 217.93/218.19 apply (zenon_L26_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf9); [ zenon_intro zenon_H64 | zenon_intro zenon_Hfa ]. % 217.93/218.19 apply (zenon_L294_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfa); [ zenon_intro zenon_Hdd | zenon_intro zenon_Hf2 ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf7); [ zenon_intro zenon_Hc0 | zenon_intro zenon_Hfb ]. % 217.93/218.19 apply (zenon_L153_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfb); [ zenon_intro zenon_Hd0 | zenon_intro zenon_Hfc ]. % 217.93/218.19 apply (zenon_L67_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfc); [ zenon_intro zenon_Hd4 | zenon_intro zenon_Hfd ]. % 217.93/218.19 apply (zenon_L295_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfd); [ zenon_intro zenon_Hd9 | zenon_intro zenon_He1 ]. % 217.93/218.19 apply (zenon_L89_); trivial. % 217.93/218.19 apply (zenon_L296_); trivial. % 217.93/218.19 apply (zenon_L297_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H12e); [ zenon_intro zenon_Hff | zenon_intro zenon_H12f ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf6); [ zenon_intro zenon_H39 | zenon_intro zenon_Hf8 ]. % 217.93/218.19 apply (zenon_L244_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf8); [ zenon_intro zenon_H4f | zenon_intro zenon_Hf9 ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf7); [ zenon_intro zenon_Hc0 | zenon_intro zenon_Hfb ]. % 217.93/218.19 apply (zenon_L153_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfb); [ zenon_intro zenon_Hd0 | zenon_intro zenon_Hfc ]. % 217.93/218.19 apply (zenon_L154_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfc); [ zenon_intro zenon_Hd4 | zenon_intro zenon_Hfd ]. % 217.93/218.19 apply (zenon_L275_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfd); [ zenon_intro zenon_Hd9 | zenon_intro zenon_He1 ]. % 217.93/218.19 apply (zenon_L300_); trivial. % 217.93/218.19 apply (zenon_L296_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf9); [ zenon_intro zenon_H64 | zenon_intro zenon_Hfa ]. % 217.93/218.19 apply (zenon_L278_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfa); [ zenon_intro zenon_Hdd | zenon_intro zenon_Hf2 ]. % 217.93/218.19 apply (zenon_L301_); trivial. % 217.93/218.19 apply (zenon_L297_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H12f); [ zenon_intro zenon_H10d | zenon_intro zenon_H111 ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf6); [ zenon_intro zenon_H39 | zenon_intro zenon_Hf8 ]. % 217.93/218.19 apply (zenon_L244_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf8); [ zenon_intro zenon_H4f | zenon_intro zenon_Hf9 ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf7); [ zenon_intro zenon_Hc0 | zenon_intro zenon_Hfb ]. % 217.93/218.19 apply (zenon_L153_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfb); [ zenon_intro zenon_Hd0 | zenon_intro zenon_Hfc ]. % 217.93/218.19 apply (zenon_L154_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfc); [ zenon_intro zenon_Hd4 | zenon_intro zenon_Hfd ]. % 217.93/218.19 apply (zenon_L160_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfd); [ zenon_intro zenon_Hd9 | zenon_intro zenon_He1 ]. % 217.93/218.19 apply (zenon_L161_); trivial. % 217.93/218.19 apply (zenon_L296_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf9); [ zenon_intro zenon_H64 | zenon_intro zenon_Hfa ]. % 217.93/218.19 apply (zenon_L168_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfa); [ zenon_intro zenon_Hdd | zenon_intro zenon_Hf2 ]. % 217.93/218.19 apply (zenon_L170_); trivial. % 217.93/218.19 apply (zenon_L297_); trivial. % 217.93/218.19 apply (zenon_L302_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H21f); [ zenon_intro zenon_H115 | zenon_intro zenon_H220 ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H12c); [ zenon_intro zenon_H7 | zenon_intro zenon_H12d ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf6); [ zenon_intro zenon_H39 | zenon_intro zenon_Hf8 ]. % 217.93/218.19 apply (zenon_L209_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf8); [ zenon_intro zenon_H4f | zenon_intro zenon_Hf9 ]. % 217.93/218.19 apply (zenon_L190_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf9); [ zenon_intro zenon_H64 | zenon_intro zenon_Hfa ]. % 217.93/218.19 apply (zenon_L294_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfa); [ zenon_intro zenon_Hdd | zenon_intro zenon_Hf2 ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf7); [ zenon_intro zenon_Hc0 | zenon_intro zenon_Hfb ]. % 217.93/218.19 apply (zenon_L210_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfb); [ zenon_intro zenon_Hd0 | zenon_intro zenon_Hfc ]. % 217.93/218.19 apply (zenon_L261_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfc); [ zenon_intro zenon_Hd4 | zenon_intro zenon_Hfd ]. % 217.93/218.19 apply (zenon_L295_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfd); [ zenon_intro zenon_Hd9 | zenon_intro zenon_He1 ]. % 217.93/218.19 apply (zenon_L89_); trivial. % 217.93/218.19 apply (zenon_L296_); trivial. % 217.93/218.19 apply (zenon_L297_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H12d); [ zenon_intro zenon_H56 | zenon_intro zenon_H12e ]. % 217.93/218.19 apply (zenon_L264_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H12e); [ zenon_intro zenon_Hff | zenon_intro zenon_H12f ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf6); [ zenon_intro zenon_H39 | zenon_intro zenon_Hf8 ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf7); [ zenon_intro zenon_Hc0 | zenon_intro zenon_Hfb ]. % 217.93/218.19 apply (zenon_L224_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfb); [ zenon_intro zenon_Hd0 | zenon_intro zenon_Hfc ]. % 217.93/218.19 apply (zenon_L261_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfc); [ zenon_intro zenon_Hd4 | zenon_intro zenon_Hfd ]. % 217.93/218.19 apply (zenon_L275_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfd); [ zenon_intro zenon_Hd9 | zenon_intro zenon_He1 ]. % 217.93/218.19 apply (zenon_L300_); trivial. % 217.93/218.19 apply (zenon_L296_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf8); [ zenon_intro zenon_H4f | zenon_intro zenon_Hf9 ]. % 217.93/218.19 apply (zenon_L190_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf9); [ zenon_intro zenon_H64 | zenon_intro zenon_Hfa ]. % 217.93/218.19 apply (zenon_L278_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfa); [ zenon_intro zenon_Hdd | zenon_intro zenon_Hf2 ]. % 217.93/218.19 apply (zenon_L301_); trivial. % 217.93/218.19 apply (zenon_L297_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H12f); [ zenon_intro zenon_H10d | zenon_intro zenon_H111 ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf6); [ zenon_intro zenon_H39 | zenon_intro zenon_Hf8 ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf7); [ zenon_intro zenon_Hc0 | zenon_intro zenon_Hfb ]. % 217.93/218.19 apply (zenon_L224_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfb); [ zenon_intro zenon_Hd0 | zenon_intro zenon_Hfc ]. % 217.93/218.19 apply (zenon_L261_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfc); [ zenon_intro zenon_Hd4 | zenon_intro zenon_Hfd ]. % 217.93/218.19 apply (zenon_L160_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfd); [ zenon_intro zenon_Hd9 | zenon_intro zenon_He1 ]. % 217.93/218.19 apply (zenon_L161_); trivial. % 217.93/218.19 apply (zenon_L296_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf8); [ zenon_intro zenon_H4f | zenon_intro zenon_Hf9 ]. % 217.93/218.19 apply (zenon_L190_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf9); [ zenon_intro zenon_H64 | zenon_intro zenon_Hfa ]. % 217.93/218.19 apply (zenon_L168_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfa); [ zenon_intro zenon_Hdd | zenon_intro zenon_Hf2 ]. % 217.93/218.19 apply (zenon_L170_); trivial. % 217.93/218.19 apply (zenon_L297_); trivial. % 217.93/218.19 apply (zenon_L302_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H220); [ zenon_intro zenon_H11b | zenon_intro zenon_H221 ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hbb); [ zenon_intro zenon_H66 | zenon_intro zenon_Hbc ]. % 217.93/218.19 apply (zenon_L191_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hbc); [ zenon_intro zenon_H68 | zenon_intro zenon_Hbd ]. % 217.93/218.19 apply (zenon_L298_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hbd); [ zenon_intro zenon_H69 | zenon_intro zenon_Hbe ]. % 217.93/218.19 apply (zenon_L299_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hbe); [ zenon_intro zenon_H7d | zenon_intro zenon_Hba ]. % 217.93/218.19 apply (zenon_L293_); trivial. % 217.93/218.19 apply (zenon_L303_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H221); [ zenon_intro zenon_H122 | zenon_intro zenon_H129 ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H12c); [ zenon_intro zenon_H7 | zenon_intro zenon_H12d ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf6); [ zenon_intro zenon_H39 | zenon_intro zenon_Hf8 ]. % 217.93/218.19 apply (zenon_L209_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf8); [ zenon_intro zenon_H4f | zenon_intro zenon_Hf9 ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf7); [ zenon_intro zenon_Hc0 | zenon_intro zenon_Hfb ]. % 217.93/218.19 apply (zenon_L210_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfb); [ zenon_intro zenon_Hd0 | zenon_intro zenon_Hfc ]. % 217.93/218.19 apply (zenon_L154_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfc); [ zenon_intro zenon_Hd4 | zenon_intro zenon_Hfd ]. % 217.93/218.19 apply (zenon_L202_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfd); [ zenon_intro zenon_Hd9 | zenon_intro zenon_He1 ]. % 217.93/218.19 apply (zenon_L206_); trivial. % 217.93/218.19 apply (zenon_L296_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf9); [ zenon_intro zenon_H64 | zenon_intro zenon_Hfa ]. % 217.93/218.19 apply (zenon_L208_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfa); [ zenon_intro zenon_Hdd | zenon_intro zenon_Hf2 ]. % 217.93/218.19 apply (zenon_L197_); trivial. % 217.93/218.19 apply (zenon_L297_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H12d); [ zenon_intro zenon_H56 | zenon_intro zenon_H12e ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf6); [ zenon_intro zenon_H39 | zenon_intro zenon_Hf8 ]. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf7); [ zenon_intro zenon_Hc0 | zenon_intro zenon_Hfb ]. % 217.93/218.19 apply (zenon_L224_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfb); [ zenon_intro zenon_Hd0 | zenon_intro zenon_Hfc ]. % 217.93/218.19 apply (zenon_L67_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfc); [ zenon_intro zenon_Hd4 | zenon_intro zenon_Hfd ]. % 217.93/218.19 apply (zenon_L202_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfd); [ zenon_intro zenon_Hd9 | zenon_intro zenon_He1 ]. % 217.93/218.19 apply (zenon_L206_); trivial. % 217.93/218.19 apply (zenon_L296_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf8); [ zenon_intro zenon_H4f | zenon_intro zenon_Hf9 ]. % 217.93/218.19 apply (zenon_L26_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hf9); [ zenon_intro zenon_H64 | zenon_intro zenon_Hfa ]. % 217.93/218.19 apply (zenon_L208_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Hfa); [ zenon_intro zenon_Hdd | zenon_intro zenon_Hf2 ]. % 217.93/218.19 apply (zenon_L197_); trivial. % 217.93/218.19 apply (zenon_L297_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H12e); [ zenon_intro zenon_Hff | zenon_intro zenon_H12f ]. % 217.93/218.19 apply (zenon_L204_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H12f); [ zenon_intro zenon_H10d | zenon_intro zenon_H111 ]. % 217.93/218.19 apply (zenon_L205_); trivial. % 217.93/218.19 apply (zenon_L302_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H9e); [ zenon_intro zenon_H6b | zenon_intro zenon_H9f ]. % 217.93/218.19 apply (zenon_L212_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_H9f); [ zenon_intro zenon_H92 | zenon_intro zenon_Ha0 ]. % 217.93/218.19 apply (zenon_L289_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Ha0); [ zenon_intro zenon_H97 | zenon_intro zenon_Ha1 ]. % 217.93/218.19 apply (zenon_L213_); trivial. % 217.93/218.19 apply (zenon_or_s _ _ zenon_Ha1); [ zenon_intro zenon_H9a | zenon_intro zenon_H9b ]. % 217.93/218.19 apply (zenon_L214_); trivial. % 217.93/218.19 apply (zenon_L215_); trivial. % 217.93/218.19 Qed. % 217.93/218.19 % SZS output end Proof % 217.93/218.19 (* END-PROOF *) % 217.93/218.19 nodes searched: 3522080 % 217.93/218.19 max branch formulas: 5747 % 217.93/218.19 proof nodes created: 3159 % 217.93/218.19 formulas created: 7249705 % 217.93/218.19 %------------------------------------------------------------------------------