Metamath Proof Explorer


Theorem mh-setindnd

Description: A version of mh-setind with no distinct variable conditions. (Contributed by Matthew House, 5-Mar-2026) (New usage is discouraged.)

Ref Expression
Assertion mh-setindnd ( ∀ 𝑦 ( ∀ 𝑥 ( 𝑥𝑦𝜑 ) → ∀ 𝑥 ( 𝑥 = 𝑦 → ∀ 𝑦 𝜑 ) ) → 𝜑 )

Proof

Step Hyp Ref Expression
1 sp ( ∀ 𝑦 𝜑𝜑 )
2 1 imim2i ( ( 𝑥𝑦 → ∀ 𝑦 𝜑 ) → ( 𝑥𝑦𝜑 ) )
3 2 alimi ( ∀ 𝑥 ( 𝑥𝑦 → ∀ 𝑦 𝜑 ) → ∀ 𝑥 ( 𝑥𝑦𝜑 ) )
4 3 imim1i ( ( ∀ 𝑥 ( 𝑥𝑦𝜑 ) → ∀ 𝑥 ( 𝑥 = 𝑦 → ∀ 𝑦 𝜑 ) ) → ( ∀ 𝑥 ( 𝑥𝑦 → ∀ 𝑦 𝜑 ) → ∀ 𝑥 ( 𝑥 = 𝑦 → ∀ 𝑦 𝜑 ) ) )
5 4 alimi ( ∀ 𝑦 ( ∀ 𝑥 ( 𝑥𝑦𝜑 ) → ∀ 𝑥 ( 𝑥 = 𝑦 → ∀ 𝑦 𝜑 ) ) → ∀ 𝑦 ( ∀ 𝑥 ( 𝑥𝑦 → ∀ 𝑦 𝜑 ) → ∀ 𝑥 ( 𝑥 = 𝑦 → ∀ 𝑦 𝜑 ) ) )
6 elirrv ¬ 𝑥𝑥
7 elequ2 ( 𝑥 = 𝑦 → ( 𝑥𝑥𝑥𝑦 ) )
8 6 7 mtbii ( 𝑥 = 𝑦 → ¬ 𝑥𝑦 )
9 8 pm2.21d ( 𝑥 = 𝑦 → ( 𝑥𝑦 → ∀ 𝑦 𝜑 ) )
10 9 alimi ( ∀ 𝑥 𝑥 = 𝑦 → ∀ 𝑥 ( 𝑥𝑦 → ∀ 𝑦 𝜑 ) )
11 sp ( ∀ 𝑥 𝑥 = 𝑦𝑥 = 𝑦 )
12 1 a1i ( ∀ 𝑥 𝑥 = 𝑦 → ( ∀ 𝑦 𝜑𝜑 ) )
13 11 12 embantd ( ∀ 𝑥 𝑥 = 𝑦 → ( ( 𝑥 = 𝑦 → ∀ 𝑦 𝜑 ) → 𝜑 ) )
14 13 spsd ( ∀ 𝑥 𝑥 = 𝑦 → ( ∀ 𝑥 ( 𝑥 = 𝑦 → ∀ 𝑦 𝜑 ) → 𝜑 ) )
15 10 14 embantd ( ∀ 𝑥 𝑥 = 𝑦 → ( ( ∀ 𝑥 ( 𝑥𝑦 → ∀ 𝑦 𝜑 ) → ∀ 𝑥 ( 𝑥 = 𝑦 → ∀ 𝑦 𝜑 ) ) → 𝜑 ) )
16 15 spsd ( ∀ 𝑥 𝑥 = 𝑦 → ( ∀ 𝑦 ( ∀ 𝑥 ( 𝑥𝑦 → ∀ 𝑦 𝜑 ) → ∀ 𝑥 ( 𝑥 = 𝑦 → ∀ 𝑦 𝜑 ) ) → 𝜑 ) )
17 nfnae 𝑦 ¬ ∀ 𝑥 𝑥 = 𝑦
18 nfnae 𝑥 ¬ ∀ 𝑥 𝑥 = 𝑦
19 dveel1 ( ¬ ∀ 𝑦 𝑦 = 𝑥 → ( 𝑥𝑧 → ∀ 𝑦 𝑥𝑧 ) )
20 19 naecoms ( ¬ ∀ 𝑥 𝑥 = 𝑦 → ( 𝑥𝑧 → ∀ 𝑦 𝑥𝑧 ) )
21 17 20 nf5d ( ¬ ∀ 𝑥 𝑥 = 𝑦 → Ⅎ 𝑦 𝑥𝑧 )
22 nfa1 𝑦𝑦 𝜑
23 22 a1i ( ¬ ∀ 𝑥 𝑥 = 𝑦 → Ⅎ 𝑦𝑦 𝜑 )
24 21 23 nfimd ( ¬ ∀ 𝑥 𝑥 = 𝑦 → Ⅎ 𝑦 ( 𝑥𝑧 → ∀ 𝑦 𝜑 ) )
25 18 24 nfald ( ¬ ∀ 𝑥 𝑥 = 𝑦 → Ⅎ 𝑦𝑥 ( 𝑥𝑧 → ∀ 𝑦 𝜑 ) )
26 nfeqf1 ( ¬ ∀ 𝑦 𝑦 = 𝑥 → Ⅎ 𝑦 𝑥 = 𝑧 )
27 26 naecoms ( ¬ ∀ 𝑥 𝑥 = 𝑦 → Ⅎ 𝑦 𝑥 = 𝑧 )
28 27 23 nfimd ( ¬ ∀ 𝑥 𝑥 = 𝑦 → Ⅎ 𝑦 ( 𝑥 = 𝑧 → ∀ 𝑦 𝜑 ) )
29 18 28 nfald ( ¬ ∀ 𝑥 𝑥 = 𝑦 → Ⅎ 𝑦𝑥 ( 𝑥 = 𝑧 → ∀ 𝑦 𝜑 ) )
30 25 29 nfimd ( ¬ ∀ 𝑥 𝑥 = 𝑦 → Ⅎ 𝑦 ( ∀ 𝑥 ( 𝑥𝑧 → ∀ 𝑦 𝜑 ) → ∀ 𝑥 ( 𝑥 = 𝑧 → ∀ 𝑦 𝜑 ) ) )
31 nfeqf2 ( ¬ ∀ 𝑥 𝑥 = 𝑦 → Ⅎ 𝑥 𝑧 = 𝑦 )
32 18 31 nfan1 𝑥 ( ¬ ∀ 𝑥 𝑥 = 𝑦𝑧 = 𝑦 )
33 elequ2 ( 𝑧 = 𝑦 → ( 𝑥𝑧𝑥𝑦 ) )
34 33 imbi1d ( 𝑧 = 𝑦 → ( ( 𝑥𝑧 → ∀ 𝑦 𝜑 ) ↔ ( 𝑥𝑦 → ∀ 𝑦 𝜑 ) ) )
35 34 adantl ( ( ¬ ∀ 𝑥 𝑥 = 𝑦𝑧 = 𝑦 ) → ( ( 𝑥𝑧 → ∀ 𝑦 𝜑 ) ↔ ( 𝑥𝑦 → ∀ 𝑦 𝜑 ) ) )
36 32 35 albid ( ( ¬ ∀ 𝑥 𝑥 = 𝑦𝑧 = 𝑦 ) → ( ∀ 𝑥 ( 𝑥𝑧 → ∀ 𝑦 𝜑 ) ↔ ∀ 𝑥 ( 𝑥𝑦 → ∀ 𝑦 𝜑 ) ) )
37 equequ2 ( 𝑧 = 𝑦 → ( 𝑥 = 𝑧𝑥 = 𝑦 ) )
38 37 imbi1d ( 𝑧 = 𝑦 → ( ( 𝑥 = 𝑧 → ∀ 𝑦 𝜑 ) ↔ ( 𝑥 = 𝑦 → ∀ 𝑦 𝜑 ) ) )
39 38 adantl ( ( ¬ ∀ 𝑥 𝑥 = 𝑦𝑧 = 𝑦 ) → ( ( 𝑥 = 𝑧 → ∀ 𝑦 𝜑 ) ↔ ( 𝑥 = 𝑦 → ∀ 𝑦 𝜑 ) ) )
40 32 39 albid ( ( ¬ ∀ 𝑥 𝑥 = 𝑦𝑧 = 𝑦 ) → ( ∀ 𝑥 ( 𝑥 = 𝑧 → ∀ 𝑦 𝜑 ) ↔ ∀ 𝑥 ( 𝑥 = 𝑦 → ∀ 𝑦 𝜑 ) ) )
41 36 40 imbi12d ( ( ¬ ∀ 𝑥 𝑥 = 𝑦𝑧 = 𝑦 ) → ( ( ∀ 𝑥 ( 𝑥𝑧 → ∀ 𝑦 𝜑 ) → ∀ 𝑥 ( 𝑥 = 𝑧 → ∀ 𝑦 𝜑 ) ) ↔ ( ∀ 𝑥 ( 𝑥𝑦 → ∀ 𝑦 𝜑 ) → ∀ 𝑥 ( 𝑥 = 𝑦 → ∀ 𝑦 𝜑 ) ) ) )
42 41 ex ( ¬ ∀ 𝑥 𝑥 = 𝑦 → ( 𝑧 = 𝑦 → ( ( ∀ 𝑥 ( 𝑥𝑧 → ∀ 𝑦 𝜑 ) → ∀ 𝑥 ( 𝑥 = 𝑧 → ∀ 𝑦 𝜑 ) ) ↔ ( ∀ 𝑥 ( 𝑥𝑦 → ∀ 𝑦 𝜑 ) → ∀ 𝑥 ( 𝑥 = 𝑦 → ∀ 𝑦 𝜑 ) ) ) ) )
43 17 30 42 cbvaldw ( ¬ ∀ 𝑥 𝑥 = 𝑦 → ( ∀ 𝑧 ( ∀ 𝑥 ( 𝑥𝑧 → ∀ 𝑦 𝜑 ) → ∀ 𝑥 ( 𝑥 = 𝑧 → ∀ 𝑦 𝜑 ) ) ↔ ∀ 𝑦 ( ∀ 𝑥 ( 𝑥𝑦 → ∀ 𝑦 𝜑 ) → ∀ 𝑥 ( 𝑥 = 𝑦 → ∀ 𝑦 𝜑 ) ) ) )
44 mh-setind ( ∀ 𝑧 ( ∀ 𝑥 ( 𝑥𝑧 → ∀ 𝑦 𝜑 ) → ∀ 𝑥 ( 𝑥 = 𝑧 → ∀ 𝑦 𝜑 ) ) → ∀ 𝑦 𝜑 )
45 44 19.21bi ( ∀ 𝑧 ( ∀ 𝑥 ( 𝑥𝑧 → ∀ 𝑦 𝜑 ) → ∀ 𝑥 ( 𝑥 = 𝑧 → ∀ 𝑦 𝜑 ) ) → 𝜑 )
46 43 45 biimtrrdi ( ¬ ∀ 𝑥 𝑥 = 𝑦 → ( ∀ 𝑦 ( ∀ 𝑥 ( 𝑥𝑦 → ∀ 𝑦 𝜑 ) → ∀ 𝑥 ( 𝑥 = 𝑦 → ∀ 𝑦 𝜑 ) ) → 𝜑 ) )
47 16 46 pm2.61i ( ∀ 𝑦 ( ∀ 𝑥 ( 𝑥𝑦 → ∀ 𝑦 𝜑 ) → ∀ 𝑥 ( 𝑥 = 𝑦 → ∀ 𝑦 𝜑 ) ) → 𝜑 )
48 5 47 syl ( ∀ 𝑦 ( ∀ 𝑥 ( 𝑥𝑦𝜑 ) → ∀ 𝑥 ( 𝑥 = 𝑦 → ∀ 𝑦 𝜑 ) ) → 𝜑 )