Metamath Proof Explorer


Theorem in-ax8

Description: A proof of ax-8 that does not rely on ax-8 . It employs df-in to perform alpha-renaming and eliminates disjoint variable conditions using ax-9 . Since the nature of this result is unclear, usage of this theorem is discouraged, and this method should not be applied to eliminate axiom dependencies. (Contributed by GG, 1-Aug-2025) (Proof modification is discouraged.) (New usage is discouraged.)

Ref Expression
Assertion in-ax8 ( 𝑥 = 𝑦 → ( 𝑥𝑧𝑦𝑧 ) )

Proof

Step Hyp Ref Expression
1 ax7 ( 𝑥 = 𝑦 → ( 𝑥 = 𝑤𝑦 = 𝑤 ) )
2 ax12v2 ( 𝑥 = 𝑤 → ( ( 𝑥𝑡𝑥𝑡 ) → ∀ 𝑥 ( 𝑥 = 𝑤 → ( 𝑥𝑡𝑥𝑡 ) ) ) )
3 2 imp ( ( 𝑥 = 𝑤 ∧ ( 𝑥𝑡𝑥𝑡 ) ) → ∀ 𝑥 ( 𝑥 = 𝑤 → ( 𝑥𝑡𝑥𝑡 ) ) )
4 sb6 ( [ 𝑤 / 𝑥 ] ( 𝑥𝑡𝑥𝑡 ) ↔ ∀ 𝑥 ( 𝑥 = 𝑤 → ( 𝑥𝑡𝑥𝑡 ) ) )
5 df-in ( 𝑡𝑡 ) = { 𝑥 ∣ ( 𝑥𝑡𝑥𝑡 ) }
6 df-in ( 𝑡𝑡 ) = { 𝑦 ∣ ( 𝑦𝑡𝑦𝑡 ) }
7 5 6 eqtr3i { 𝑥 ∣ ( 𝑥𝑡𝑥𝑡 ) } = { 𝑦 ∣ ( 𝑦𝑡𝑦𝑡 ) }
8 dfcleq ( { 𝑥 ∣ ( 𝑥𝑡𝑥𝑡 ) } = { 𝑦 ∣ ( 𝑦𝑡𝑦𝑡 ) } ↔ ∀ 𝑤 ( 𝑤 ∈ { 𝑥 ∣ ( 𝑥𝑡𝑥𝑡 ) } ↔ 𝑤 ∈ { 𝑦 ∣ ( 𝑦𝑡𝑦𝑡 ) } ) )
9 7 8 mpbi 𝑤 ( 𝑤 ∈ { 𝑥 ∣ ( 𝑥𝑡𝑥𝑡 ) } ↔ 𝑤 ∈ { 𝑦 ∣ ( 𝑦𝑡𝑦𝑡 ) } )
10 9 spi ( 𝑤 ∈ { 𝑥 ∣ ( 𝑥𝑡𝑥𝑡 ) } ↔ 𝑤 ∈ { 𝑦 ∣ ( 𝑦𝑡𝑦𝑡 ) } )
11 df-clab ( 𝑤 ∈ { 𝑥 ∣ ( 𝑥𝑡𝑥𝑡 ) } ↔ [ 𝑤 / 𝑥 ] ( 𝑥𝑡𝑥𝑡 ) )
12 df-clab ( 𝑤 ∈ { 𝑦 ∣ ( 𝑦𝑡𝑦𝑡 ) } ↔ [ 𝑤 / 𝑦 ] ( 𝑦𝑡𝑦𝑡 ) )
13 10 11 12 3bitr3i ( [ 𝑤 / 𝑥 ] ( 𝑥𝑡𝑥𝑡 ) ↔ [ 𝑤 / 𝑦 ] ( 𝑦𝑡𝑦𝑡 ) )
14 4 13 bitr3i ( ∀ 𝑥 ( 𝑥 = 𝑤 → ( 𝑥𝑡𝑥𝑡 ) ) ↔ [ 𝑤 / 𝑦 ] ( 𝑦𝑡𝑦𝑡 ) )
15 sb6 ( [ 𝑤 / 𝑦 ] ( 𝑦𝑡𝑦𝑡 ) ↔ ∀ 𝑦 ( 𝑦 = 𝑤 → ( 𝑦𝑡𝑦𝑡 ) ) )
16 14 15 sylbb ( ∀ 𝑥 ( 𝑥 = 𝑤 → ( 𝑥𝑡𝑥𝑡 ) ) → ∀ 𝑦 ( 𝑦 = 𝑤 → ( 𝑦𝑡𝑦𝑡 ) ) )
17 sp ( ∀ 𝑦 ( 𝑦 = 𝑤 → ( 𝑦𝑡𝑦𝑡 ) ) → ( 𝑦 = 𝑤 → ( 𝑦𝑡𝑦𝑡 ) ) )
18 3 16 17 3syl ( ( 𝑥 = 𝑤 ∧ ( 𝑥𝑡𝑥𝑡 ) ) → ( 𝑦 = 𝑤 → ( 𝑦𝑡𝑦𝑡 ) ) )
19 18 ex ( 𝑥 = 𝑤 → ( ( 𝑥𝑡𝑥𝑡 ) → ( 𝑦 = 𝑤 → ( 𝑦𝑡𝑦𝑡 ) ) ) )
20 19 com23 ( 𝑥 = 𝑤 → ( 𝑦 = 𝑤 → ( ( 𝑥𝑡𝑥𝑡 ) → ( 𝑦𝑡𝑦𝑡 ) ) ) )
21 1 20 sylcom ( 𝑥 = 𝑦 → ( 𝑥 = 𝑤 → ( ( 𝑥𝑡𝑥𝑡 ) → ( 𝑦𝑡𝑦𝑡 ) ) ) )
22 21 com12 ( 𝑥 = 𝑤 → ( 𝑥 = 𝑦 → ( ( 𝑥𝑡𝑥𝑡 ) → ( 𝑦𝑡𝑦𝑡 ) ) ) )
23 22 equcoms ( 𝑤 = 𝑥 → ( 𝑥 = 𝑦 → ( ( 𝑥𝑡𝑥𝑡 ) → ( 𝑦𝑡𝑦𝑡 ) ) ) )
24 ax6ev 𝑤 𝑤 = 𝑥
25 23 24 exlimiiv ( 𝑥 = 𝑦 → ( ( 𝑥𝑡𝑥𝑡 ) → ( 𝑦𝑡𝑦𝑡 ) ) )
26 pm4.24 ( 𝑥𝑡 ↔ ( 𝑥𝑡𝑥𝑡 ) )
27 pm4.24 ( 𝑦𝑡 ↔ ( 𝑦𝑡𝑦𝑡 ) )
28 25 26 27 3imtr4g ( 𝑥 = 𝑦 → ( 𝑥𝑡𝑦𝑡 ) )
29 ax9 ( 𝑧 = 𝑡 → ( 𝑥𝑧𝑥𝑡 ) )
30 29 equcoms ( 𝑡 = 𝑧 → ( 𝑥𝑧𝑥𝑡 ) )
31 ax9 ( 𝑡 = 𝑧 → ( 𝑦𝑡𝑦𝑧 ) )
32 30 31 imim12d ( 𝑡 = 𝑧 → ( ( 𝑥𝑡𝑦𝑡 ) → ( 𝑥𝑧𝑦𝑧 ) ) )
33 28 32 syl5 ( 𝑡 = 𝑧 → ( 𝑥 = 𝑦 → ( 𝑥𝑧𝑦𝑧 ) ) )
34 ax6ev 𝑡 𝑡 = 𝑧
35 33 34 exlimiiv ( 𝑥 = 𝑦 → ( 𝑥𝑧𝑦𝑧 ) )