Metamath Proof Explorer


Theorem axuntco

Description: Derivation of ax-un from ax-tco . Use ax-un instead. (Contributed by Matthew House, 6-Apr-2026) (Proof modification is discouraged.) (New usage is discouraged.)

Ref Expression
Assertion axuntco 𝑦𝑧 ( ∃ 𝑤 ( 𝑧𝑤𝑤𝑥 ) → 𝑧𝑦 )

Proof

Step Hyp Ref Expression
1 ax-tco 𝑦 ( 𝑥𝑦 ∧ ∀ 𝑣 ( 𝑣𝑦 → ∀ 𝑢 ( 𝑢𝑣𝑢𝑦 ) ) )
2 elequ1 ( 𝑣 = 𝑥 → ( 𝑣𝑦𝑥𝑦 ) )
3 elequ2 ( 𝑣 = 𝑥 → ( 𝑢𝑣𝑢𝑥 ) )
4 3 imbi1d ( 𝑣 = 𝑥 → ( ( 𝑢𝑣𝑢𝑦 ) ↔ ( 𝑢𝑥𝑢𝑦 ) ) )
5 4 albidv ( 𝑣 = 𝑥 → ( ∀ 𝑢 ( 𝑢𝑣𝑢𝑦 ) ↔ ∀ 𝑢 ( 𝑢𝑥𝑢𝑦 ) ) )
6 2 5 imbi12d ( 𝑣 = 𝑥 → ( ( 𝑣𝑦 → ∀ 𝑢 ( 𝑢𝑣𝑢𝑦 ) ) ↔ ( 𝑥𝑦 → ∀ 𝑢 ( 𝑢𝑥𝑢𝑦 ) ) ) )
7 6 spvv ( ∀ 𝑣 ( 𝑣𝑦 → ∀ 𝑢 ( 𝑢𝑣𝑢𝑦 ) ) → ( 𝑥𝑦 → ∀ 𝑢 ( 𝑢𝑥𝑢𝑦 ) ) )
8 elequ1 ( 𝑢 = 𝑤 → ( 𝑢𝑥𝑤𝑥 ) )
9 elequ1 ( 𝑢 = 𝑤 → ( 𝑢𝑦𝑤𝑦 ) )
10 8 9 imbi12d ( 𝑢 = 𝑤 → ( ( 𝑢𝑥𝑢𝑦 ) ↔ ( 𝑤𝑥𝑤𝑦 ) ) )
11 10 spvv ( ∀ 𝑢 ( 𝑢𝑥𝑢𝑦 ) → ( 𝑤𝑥𝑤𝑦 ) )
12 7 11 syl6 ( ∀ 𝑣 ( 𝑣𝑦 → ∀ 𝑢 ( 𝑢𝑣𝑢𝑦 ) ) → ( 𝑥𝑦 → ( 𝑤𝑥𝑤𝑦 ) ) )
13 elequ1 ( 𝑣 = 𝑤 → ( 𝑣𝑦𝑤𝑦 ) )
14 elequ2 ( 𝑣 = 𝑤 → ( 𝑢𝑣𝑢𝑤 ) )
15 14 imbi1d ( 𝑣 = 𝑤 → ( ( 𝑢𝑣𝑢𝑦 ) ↔ ( 𝑢𝑤𝑢𝑦 ) ) )
16 15 albidv ( 𝑣 = 𝑤 → ( ∀ 𝑢 ( 𝑢𝑣𝑢𝑦 ) ↔ ∀ 𝑢 ( 𝑢𝑤𝑢𝑦 ) ) )
17 13 16 imbi12d ( 𝑣 = 𝑤 → ( ( 𝑣𝑦 → ∀ 𝑢 ( 𝑢𝑣𝑢𝑦 ) ) ↔ ( 𝑤𝑦 → ∀ 𝑢 ( 𝑢𝑤𝑢𝑦 ) ) ) )
18 17 spvv ( ∀ 𝑣 ( 𝑣𝑦 → ∀ 𝑢 ( 𝑢𝑣𝑢𝑦 ) ) → ( 𝑤𝑦 → ∀ 𝑢 ( 𝑢𝑤𝑢𝑦 ) ) )
19 elequ1 ( 𝑢 = 𝑧 → ( 𝑢𝑤𝑧𝑤 ) )
20 elequ1 ( 𝑢 = 𝑧 → ( 𝑢𝑦𝑧𝑦 ) )
21 19 20 imbi12d ( 𝑢 = 𝑧 → ( ( 𝑢𝑤𝑢𝑦 ) ↔ ( 𝑧𝑤𝑧𝑦 ) ) )
22 21 spvv ( ∀ 𝑢 ( 𝑢𝑤𝑢𝑦 ) → ( 𝑧𝑤𝑧𝑦 ) )
23 18 22 syl6 ( ∀ 𝑣 ( 𝑣𝑦 → ∀ 𝑢 ( 𝑢𝑣𝑢𝑦 ) ) → ( 𝑤𝑦 → ( 𝑧𝑤𝑧𝑦 ) ) )
24 12 23 syl6d ( ∀ 𝑣 ( 𝑣𝑦 → ∀ 𝑢 ( 𝑢𝑣𝑢𝑦 ) ) → ( 𝑥𝑦 → ( 𝑤𝑥 → ( 𝑧𝑤𝑧𝑦 ) ) ) )
25 24 impcom ( ( 𝑥𝑦 ∧ ∀ 𝑣 ( 𝑣𝑦 → ∀ 𝑢 ( 𝑢𝑣𝑢𝑦 ) ) ) → ( 𝑤𝑥 → ( 𝑧𝑤𝑧𝑦 ) ) )
26 25 impcomd ( ( 𝑥𝑦 ∧ ∀ 𝑣 ( 𝑣𝑦 → ∀ 𝑢 ( 𝑢𝑣𝑢𝑦 ) ) ) → ( ( 𝑧𝑤𝑤𝑥 ) → 𝑧𝑦 ) )
27 26 exlimdv ( ( 𝑥𝑦 ∧ ∀ 𝑣 ( 𝑣𝑦 → ∀ 𝑢 ( 𝑢𝑣𝑢𝑦 ) ) ) → ( ∃ 𝑤 ( 𝑧𝑤𝑤𝑥 ) → 𝑧𝑦 ) )
28 27 alrimiv ( ( 𝑥𝑦 ∧ ∀ 𝑣 ( 𝑣𝑦 → ∀ 𝑢 ( 𝑢𝑣𝑢𝑦 ) ) ) → ∀ 𝑧 ( ∃ 𝑤 ( 𝑧𝑤𝑤𝑥 ) → 𝑧𝑦 ) )
29 1 28 eximii 𝑦𝑧 ( ∃ 𝑤 ( 𝑧𝑤𝑤𝑥 ) → 𝑧𝑦 )