Theorem impsingle-step20 1642

Description: Derivation of impsingle-step20 from ax-mp 5 and impsingle 1635. It is used as a lemma in proofs of imim1 83 and peirce 205 from impsingle 1635. It is Step 20 in Lukasiewicz, where it appears as 'CCCCrppCspCCCpqrCsp' using parenthesis-free prefix notation. (Contributed by Larry Lesyna and Jeffrey P. Machado, 2-Aug-2023.) (Proof modification is discouraged.) (New usage is discouraged.)

Assertion

Ref	Expression
impsingle-step20	⊢ ((((𝜑 → 𝜓) → 𝜓) → (𝜒 → 𝜓)) → (((𝜓 → 𝜃) → 𝜑) → (𝜒 → 𝜓)))

Proof of Theorem impsingle-step20

Step	Hyp	Ref	Expression
1		impsingle-step19 1641	. 2 ⊢ ((((𝜒 → 𝜓) → 𝜃) → (𝜑 → 𝜓)) → (((𝜓 → 𝜃) → 𝜑) → (𝜒 → 𝜓)))
2		impsingle 1635	. . 3 ⊢ (((𝜏 → 𝜁) → 𝜎) → ((𝜎 → 𝜏) → (𝜌 → 𝜏)))
3		impsingle 1635	. . . 4 ⊢ ((((((𝜓 → 𝜃) → 𝜑) → (𝜒 → 𝜓)) → 𝜂) → (((𝜒 → 𝜓) → 𝜃) → (𝜑 → 𝜓))) → (((((𝜒 → 𝜓) → 𝜃) → (𝜑 → 𝜓)) → (((𝜓 → 𝜃) → 𝜑) → (𝜒 → 𝜓))) → ((((𝜑 → 𝜓) → 𝜓) → (𝜒 → 𝜓)) → (((𝜓 → 𝜃) → 𝜑) → (𝜒 → 𝜓)))))
4		impsingle 1635	. . . . . . . . 9 ⊢ ((((𝜒 → 𝜓) → 𝜏) → ((𝜑 → 𝜓) → 𝜓)) → ((((𝜑 → 𝜓) → 𝜓) → (𝜒 → 𝜓)) → (((𝜓 → 𝜃) → 𝜑) → (𝜒 → 𝜓))))
5		impsingle-step8 1637	. . . . . . . . 9 ⊢ (((((𝜒 → 𝜓) → 𝜏) → ((𝜑 → 𝜓) → 𝜓)) → ((((𝜑 → 𝜓) → 𝜓) → (𝜒 → 𝜓)) → (((𝜓 → 𝜃) → 𝜑) → (𝜒 → 𝜓)))) → (((𝜑 → 𝜓) → 𝜓) → ((((𝜑 → 𝜓) → 𝜓) → (𝜒 → 𝜓)) → (((𝜓 → 𝜃) → 𝜑) → (𝜒 → 𝜓)))))
6	4, 5	ax-mp 5	. . . . . . . 8 ⊢ (((𝜑 → 𝜓) → 𝜓) → ((((𝜑 → 𝜓) → 𝜓) → (𝜒 → 𝜓)) → (((𝜓 → 𝜃) → 𝜑) → (𝜒 → 𝜓))))
7		impsingle 1635	. . . . . . . 8 ⊢ ((((𝜑 → 𝜓) → 𝜓) → ((((𝜑 → 𝜓) → 𝜓) → (𝜒 → 𝜓)) → (((𝜓 → 𝜃) → 𝜑) → (𝜒 → 𝜓)))) → ((((((𝜑 → 𝜓) → 𝜓) → (𝜒 → 𝜓)) → (((𝜓 → 𝜃) → 𝜑) → (𝜒 → 𝜓))) → (𝜑 → 𝜓)) → (((𝜒 → 𝜓) → 𝜃) → (𝜑 → 𝜓))))
8	6, 7	ax-mp 5	. . . . . . 7 ⊢ ((((((𝜑 → 𝜓) → 𝜓) → (𝜒 → 𝜓)) → (((𝜓 → 𝜃) → 𝜑) → (𝜒 → 𝜓))) → (𝜑 → 𝜓)) → (((𝜒 → 𝜓) → 𝜃) → (𝜑 → 𝜓)))
9		impsingle 1635	. . . . . . 7 ⊢ (((((((𝜑 → 𝜓) → 𝜓) → (𝜒 → 𝜓)) → (((𝜓 → 𝜃) → 𝜑) → (𝜒 → 𝜓))) → (𝜑 → 𝜓)) → (((𝜒 → 𝜓) → 𝜃) → (𝜑 → 𝜓))) → (((((𝜒 → 𝜓) → 𝜃) → (𝜑 → 𝜓)) → ((((𝜑 → 𝜓) → 𝜓) → (𝜒 → 𝜓)) → (((𝜓 → 𝜃) → 𝜑) → (𝜒 → 𝜓)))) → (((((𝜒 → 𝜓) → 𝜃) → (𝜑 → 𝜓)) → (((𝜓 → 𝜃) → 𝜑) → (𝜒 → 𝜓))) → ((((𝜑 → 𝜓) → 𝜓) → (𝜒 → 𝜓)) → (((𝜓 → 𝜃) → 𝜑) → (𝜒 → 𝜓))))))
10	8, 9	ax-mp 5	. . . . . 6 ⊢ (((((𝜒 → 𝜓) → 𝜃) → (𝜑 → 𝜓)) → ((((𝜑 → 𝜓) → 𝜓) → (𝜒 → 𝜓)) → (((𝜓 → 𝜃) → 𝜑) → (𝜒 → 𝜓)))) → (((((𝜒 → 𝜓) → 𝜃) → (𝜑 → 𝜓)) → (((𝜓 → 𝜃) → 𝜑) → (𝜒 → 𝜓))) → ((((𝜑 → 𝜓) → 𝜓) → (𝜒 → 𝜓)) → (((𝜓 → 𝜃) → 𝜑) → (𝜒 → 𝜓)))))
11		impsingle 1635	. . . . . 6 ⊢ ((((((𝜒 → 𝜓) → 𝜃) → (𝜑 → 𝜓)) → ((((𝜑 → 𝜓) → 𝜓) → (𝜒 → 𝜓)) → (((𝜓 → 𝜃) → 𝜑) → (𝜒 → 𝜓)))) → (((((𝜒 → 𝜓) → 𝜃) → (𝜑 → 𝜓)) → (((𝜓 → 𝜃) → 𝜑) → (𝜒 → 𝜓))) → ((((𝜑 → 𝜓) → 𝜓) → (𝜒 → 𝜓)) → (((𝜓 → 𝜃) → 𝜑) → (𝜒 → 𝜓))))) → (((((((𝜒 → 𝜓) → 𝜃) → (𝜑 → 𝜓)) → (((𝜓 → 𝜃) → 𝜑) → (𝜒 → 𝜓))) → ((((𝜑 → 𝜓) → 𝜓) → (𝜒 → 𝜓)) → (((𝜓 → 𝜃) → 𝜑) → (𝜒 → 𝜓)))) → (((𝜒 → 𝜓) → 𝜃) → (𝜑 → 𝜓))) → (((((𝜓 → 𝜃) → 𝜑) → (𝜒 → 𝜓)) → 𝜂) → (((𝜒 → 𝜓) → 𝜃) → (𝜑 → 𝜓)))))
12	10, 11	ax-mp 5	. . . . 5 ⊢ (((((((𝜒 → 𝜓) → 𝜃) → (𝜑 → 𝜓)) → (((𝜓 → 𝜃) → 𝜑) → (𝜒 → 𝜓))) → ((((𝜑 → 𝜓) → 𝜓) → (𝜒 → 𝜓)) → (((𝜓 → 𝜃) → 𝜑) → (𝜒 → 𝜓)))) → (((𝜒 → 𝜓) → 𝜃) → (𝜑 → 𝜓))) → (((((𝜓 → 𝜃) → 𝜑) → (𝜒 → 𝜓)) → 𝜂) → (((𝜒 → 𝜓) → 𝜃) → (𝜑 → 𝜓))))
13		impsingle 1635	. . . . 5 ⊢ ((((((((𝜒 → 𝜓) → 𝜃) → (𝜑 → 𝜓)) → (((𝜓 → 𝜃) → 𝜑) → (𝜒 → 𝜓))) → ((((𝜑 → 𝜓) → 𝜓) → (𝜒 → 𝜓)) → (((𝜓 → 𝜃) → 𝜑) → (𝜒 → 𝜓)))) → (((𝜒 → 𝜓) → 𝜃) → (𝜑 → 𝜓))) → (((((𝜓 → 𝜃) → 𝜑) → (𝜒 → 𝜓)) → 𝜂) → (((𝜒 → 𝜓) → 𝜃) → (𝜑 → 𝜓)))) → (((((((𝜓 → 𝜃) → 𝜑) → (𝜒 → 𝜓)) → 𝜂) → (((𝜒 → 𝜓) → 𝜃) → (𝜑 → 𝜓))) → (((((𝜒 → 𝜓) → 𝜃) → (𝜑 → 𝜓)) → (((𝜓 → 𝜃) → 𝜑) → (𝜒 → 𝜓))) → ((((𝜑 → 𝜓) → 𝜓) → (𝜒 → 𝜓)) → (((𝜓 → 𝜃) → 𝜑) → (𝜒 → 𝜓))))) → ((((𝜏 → 𝜁) → 𝜎) → ((𝜎 → 𝜏) → (𝜌 → 𝜏))) → (((((𝜒 → 𝜓) → 𝜃) → (𝜑 → 𝜓)) → (((𝜓 → 𝜃) → 𝜑) → (𝜒 → 𝜓))) → ((((𝜑 → 𝜓) → 𝜓) → (𝜒 → 𝜓)) → (((𝜓 → 𝜃) → 𝜑) → (𝜒 → 𝜓)))))))
14	12, 13	ax-mp 5	. . . 4 ⊢ (((((((𝜓 → 𝜃) → 𝜑) → (𝜒 → 𝜓)) → 𝜂) → (((𝜒 → 𝜓) → 𝜃) → (𝜑 → 𝜓))) → (((((𝜒 → 𝜓) → 𝜃) → (𝜑 → 𝜓)) → (((𝜓 → 𝜃) → 𝜑) → (𝜒 → 𝜓))) → ((((𝜑 → 𝜓) → 𝜓) → (𝜒 → 𝜓)) → (((𝜓 → 𝜃) → 𝜑) → (𝜒 → 𝜓))))) → ((((𝜏 → 𝜁) → 𝜎) → ((𝜎 → 𝜏) → (𝜌 → 𝜏))) → (((((𝜒 → 𝜓) → 𝜃) → (𝜑 → 𝜓)) → (((𝜓 → 𝜃) → 𝜑) → (𝜒 → 𝜓))) → ((((𝜑 → 𝜓) → 𝜓) → (𝜒 → 𝜓)) → (((𝜓 → 𝜃) → 𝜑) → (𝜒 → 𝜓))))))
15	3, 14	ax-mp 5	. . 3 ⊢ ((((𝜏 → 𝜁) → 𝜎) → ((𝜎 → 𝜏) → (𝜌 → 𝜏))) → (((((𝜒 → 𝜓) → 𝜃) → (𝜑 → 𝜓)) → (((𝜓 → 𝜃) → 𝜑) → (𝜒 → 𝜓))) → ((((𝜑 → 𝜓) → 𝜓) → (𝜒 → 𝜓)) → (((𝜓 → 𝜃) → 𝜑) → (𝜒 → 𝜓)))))
16	2, 15	ax-mp 5	. 2 ⊢ (((((𝜒 → 𝜓) → 𝜃) → (𝜑 → 𝜓)) → (((𝜓 → 𝜃) → 𝜑) → (𝜒 → 𝜓))) → ((((𝜑 → 𝜓) → 𝜓) → (𝜒 → 𝜓)) → (((𝜓 → 𝜃) → 𝜑) → (𝜒 → 𝜓))))
17	1, 16	ax-mp 5	1 ⊢ ((((𝜑 → 𝜓) → 𝜓) → (𝜒 → 𝜓)) → (((𝜓 → 𝜃) → 𝜑) → (𝜒 → 𝜓)))

Syntax hints:   → wi 4

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8

This theorem is referenced by:  impsingle-step21  1643  impsingle-step25  1645