Metamath Proof Explorer


Theorem filbcmb

Description: Combine a finite set of lower bounds. (Contributed by Jeff Madsen, 2-Sep-2009)

Ref Expression
Assertion filbcmb ( ( 𝐴 ∈ Fin ∧ 𝐴 ≠ ∅ ∧ 𝐵 ⊆ ℝ ) → ( ∀ 𝑥𝐴𝑦𝐵𝑧𝐵 ( 𝑦𝑧𝜑 ) → ∃ 𝑦𝐵𝑧𝐵 ( 𝑦𝑧 → ∀ 𝑥𝐴 𝜑 ) ) )

Proof

Step Hyp Ref Expression
1 reex ℝ ∈ V
2 1 ssex ( 𝐵 ⊆ ℝ → 𝐵 ∈ V )
3 indexfi ( ( 𝐴 ∈ Fin ∧ 𝐵 ∈ V ∧ ∀ 𝑥𝐴𝑦𝐵𝑧𝐵 ( 𝑦𝑧𝜑 ) ) → ∃ 𝑤 ∈ Fin ( 𝑤𝐵 ∧ ∀ 𝑥𝐴𝑦𝑤𝑧𝐵 ( 𝑦𝑧𝜑 ) ∧ ∀ 𝑦𝑤𝑥𝐴𝑧𝐵 ( 𝑦𝑧𝜑 ) ) )
4 3 3expia ( ( 𝐴 ∈ Fin ∧ 𝐵 ∈ V ) → ( ∀ 𝑥𝐴𝑦𝐵𝑧𝐵 ( 𝑦𝑧𝜑 ) → ∃ 𝑤 ∈ Fin ( 𝑤𝐵 ∧ ∀ 𝑥𝐴𝑦𝑤𝑧𝐵 ( 𝑦𝑧𝜑 ) ∧ ∀ 𝑦𝑤𝑥𝐴𝑧𝐵 ( 𝑦𝑧𝜑 ) ) ) )
5 2 4 sylan2 ( ( 𝐴 ∈ Fin ∧ 𝐵 ⊆ ℝ ) → ( ∀ 𝑥𝐴𝑦𝐵𝑧𝐵 ( 𝑦𝑧𝜑 ) → ∃ 𝑤 ∈ Fin ( 𝑤𝐵 ∧ ∀ 𝑥𝐴𝑦𝑤𝑧𝐵 ( 𝑦𝑧𝜑 ) ∧ ∀ 𝑦𝑤𝑥𝐴𝑧𝐵 ( 𝑦𝑧𝜑 ) ) ) )
6 5 3adant2 ( ( 𝐴 ∈ Fin ∧ 𝐴 ≠ ∅ ∧ 𝐵 ⊆ ℝ ) → ( ∀ 𝑥𝐴𝑦𝐵𝑧𝐵 ( 𝑦𝑧𝜑 ) → ∃ 𝑤 ∈ Fin ( 𝑤𝐵 ∧ ∀ 𝑥𝐴𝑦𝑤𝑧𝐵 ( 𝑦𝑧𝜑 ) ∧ ∀ 𝑦𝑤𝑥𝐴𝑧𝐵 ( 𝑦𝑧𝜑 ) ) ) )
7 r19.2z ( ( 𝐴 ≠ ∅ ∧ ∀ 𝑥𝐴𝑦𝑤𝑧𝐵 ( 𝑦𝑧𝜑 ) ) → ∃ 𝑥𝐴𝑦𝑤𝑧𝐵 ( 𝑦𝑧𝜑 ) )
8 rexn0 ( ∃ 𝑦𝑤𝑧𝐵 ( 𝑦𝑧𝜑 ) → 𝑤 ≠ ∅ )
9 8 rexlimivw ( ∃ 𝑥𝐴𝑦𝑤𝑧𝐵 ( 𝑦𝑧𝜑 ) → 𝑤 ≠ ∅ )
10 7 9 syl ( ( 𝐴 ≠ ∅ ∧ ∀ 𝑥𝐴𝑦𝑤𝑧𝐵 ( 𝑦𝑧𝜑 ) ) → 𝑤 ≠ ∅ )
11 10 ex ( 𝐴 ≠ ∅ → ( ∀ 𝑥𝐴𝑦𝑤𝑧𝐵 ( 𝑦𝑧𝜑 ) → 𝑤 ≠ ∅ ) )
12 11 3ad2ant2 ( ( 𝐴 ∈ Fin ∧ 𝐴 ≠ ∅ ∧ 𝐵 ⊆ ℝ ) → ( ∀ 𝑥𝐴𝑦𝑤𝑧𝐵 ( 𝑦𝑧𝜑 ) → 𝑤 ≠ ∅ ) )
13 12 ad2antrr ( ( ( ( 𝐴 ∈ Fin ∧ 𝐴 ≠ ∅ ∧ 𝐵 ⊆ ℝ ) ∧ 𝑤 ∈ Fin ) ∧ 𝑤𝐵 ) → ( ∀ 𝑥𝐴𝑦𝑤𝑧𝐵 ( 𝑦𝑧𝜑 ) → 𝑤 ≠ ∅ ) )
14 sstr ( ( 𝑤𝐵𝐵 ⊆ ℝ ) → 𝑤 ⊆ ℝ )
15 14 ancoms ( ( 𝐵 ⊆ ℝ ∧ 𝑤𝐵 ) → 𝑤 ⊆ ℝ )
16 fimaxre ( ( 𝑤 ⊆ ℝ ∧ 𝑤 ∈ Fin ∧ 𝑤 ≠ ∅ ) → ∃ 𝑦𝑤𝑢𝑤 𝑢𝑦 )
17 16 3expia ( ( 𝑤 ⊆ ℝ ∧ 𝑤 ∈ Fin ) → ( 𝑤 ≠ ∅ → ∃ 𝑦𝑤𝑢𝑤 𝑢𝑦 ) )
18 15 17 sylan ( ( ( 𝐵 ⊆ ℝ ∧ 𝑤𝐵 ) ∧ 𝑤 ∈ Fin ) → ( 𝑤 ≠ ∅ → ∃ 𝑦𝑤𝑢𝑤 𝑢𝑦 ) )
19 18 anasss ( ( 𝐵 ⊆ ℝ ∧ ( 𝑤𝐵𝑤 ∈ Fin ) ) → ( 𝑤 ≠ ∅ → ∃ 𝑦𝑤𝑢𝑤 𝑢𝑦 ) )
20 19 ancom2s ( ( 𝐵 ⊆ ℝ ∧ ( 𝑤 ∈ Fin ∧ 𝑤𝐵 ) ) → ( 𝑤 ≠ ∅ → ∃ 𝑦𝑤𝑢𝑤 𝑢𝑦 ) )
21 20 3ad2antl3 ( ( ( 𝐴 ∈ Fin ∧ 𝐴 ≠ ∅ ∧ 𝐵 ⊆ ℝ ) ∧ ( 𝑤 ∈ Fin ∧ 𝑤𝐵 ) ) → ( 𝑤 ≠ ∅ → ∃ 𝑦𝑤𝑢𝑤 𝑢𝑦 ) )
22 21 anassrs ( ( ( ( 𝐴 ∈ Fin ∧ 𝐴 ≠ ∅ ∧ 𝐵 ⊆ ℝ ) ∧ 𝑤 ∈ Fin ) ∧ 𝑤𝐵 ) → ( 𝑤 ≠ ∅ → ∃ 𝑦𝑤𝑢𝑤 𝑢𝑦 ) )
23 13 22 syld ( ( ( ( 𝐴 ∈ Fin ∧ 𝐴 ≠ ∅ ∧ 𝐵 ⊆ ℝ ) ∧ 𝑤 ∈ Fin ) ∧ 𝑤𝐵 ) → ( ∀ 𝑥𝐴𝑦𝑤𝑧𝐵 ( 𝑦𝑧𝜑 ) → ∃ 𝑦𝑤𝑢𝑤 𝑢𝑦 ) )
24 23 a1dd ( ( ( ( 𝐴 ∈ Fin ∧ 𝐴 ≠ ∅ ∧ 𝐵 ⊆ ℝ ) ∧ 𝑤 ∈ Fin ) ∧ 𝑤𝐵 ) → ( ∀ 𝑥𝐴𝑦𝑤𝑧𝐵 ( 𝑦𝑧𝜑 ) → ( ∀ 𝑦𝑤𝑥𝐴𝑧𝐵 ( 𝑦𝑧𝜑 ) → ∃ 𝑦𝑤𝑢𝑤 𝑢𝑦 ) ) )
25 24 ex ( ( ( 𝐴 ∈ Fin ∧ 𝐴 ≠ ∅ ∧ 𝐵 ⊆ ℝ ) ∧ 𝑤 ∈ Fin ) → ( 𝑤𝐵 → ( ∀ 𝑥𝐴𝑦𝑤𝑧𝐵 ( 𝑦𝑧𝜑 ) → ( ∀ 𝑦𝑤𝑥𝐴𝑧𝐵 ( 𝑦𝑧𝜑 ) → ∃ 𝑦𝑤𝑢𝑤 𝑢𝑦 ) ) ) )
26 25 3impd ( ( ( 𝐴 ∈ Fin ∧ 𝐴 ≠ ∅ ∧ 𝐵 ⊆ ℝ ) ∧ 𝑤 ∈ Fin ) → ( ( 𝑤𝐵 ∧ ∀ 𝑥𝐴𝑦𝑤𝑧𝐵 ( 𝑦𝑧𝜑 ) ∧ ∀ 𝑦𝑤𝑥𝐴𝑧𝐵 ( 𝑦𝑧𝜑 ) ) → ∃ 𝑦𝑤𝑢𝑤 𝑢𝑦 ) )
27 nfv 𝑦 ( 𝐵 ⊆ ℝ ∧ 𝑤𝐵 )
28 nfcv 𝑦 𝐴
29 nfre1 𝑦𝑦𝑤𝑧𝐵 ( 𝑦𝑧𝜑 )
30 28 29 nfralw 𝑦𝑥𝐴𝑦𝑤𝑧𝐵 ( 𝑦𝑧𝜑 )
31 27 30 nfan 𝑦 ( ( 𝐵 ⊆ ℝ ∧ 𝑤𝐵 ) ∧ ∀ 𝑥𝐴𝑦𝑤𝑧𝐵 ( 𝑦𝑧𝜑 ) )
32 nfv 𝑧 ( 𝐵 ⊆ ℝ ∧ 𝑤𝐵 )
33 nfcv 𝑧 𝐴
34 nfcv 𝑧 𝑤
35 nfra1 𝑧𝑧𝐵 ( 𝑦𝑧𝜑 )
36 34 35 nfrex 𝑧𝑦𝑤𝑧𝐵 ( 𝑦𝑧𝜑 )
37 33 36 nfralw 𝑧𝑥𝐴𝑦𝑤𝑧𝐵 ( 𝑦𝑧𝜑 )
38 32 37 nfan 𝑧 ( ( 𝐵 ⊆ ℝ ∧ 𝑤𝐵 ) ∧ ∀ 𝑥𝐴𝑦𝑤𝑧𝐵 ( 𝑦𝑧𝜑 ) )
39 nfv 𝑧 ( 𝑦𝑤 ∧ ∀ 𝑢𝑤 𝑢𝑦 )
40 38 39 nfan 𝑧 ( ( ( 𝐵 ⊆ ℝ ∧ 𝑤𝐵 ) ∧ ∀ 𝑥𝐴𝑦𝑤𝑧𝐵 ( 𝑦𝑧𝜑 ) ) ∧ ( 𝑦𝑤 ∧ ∀ 𝑢𝑤 𝑢𝑦 ) )
41 breq1 ( 𝑦 = 𝑣 → ( 𝑦𝑧𝑣𝑧 ) )
42 41 imbi1d ( 𝑦 = 𝑣 → ( ( 𝑦𝑧𝜑 ) ↔ ( 𝑣𝑧𝜑 ) ) )
43 42 ralbidv ( 𝑦 = 𝑣 → ( ∀ 𝑧𝐵 ( 𝑦𝑧𝜑 ) ↔ ∀ 𝑧𝐵 ( 𝑣𝑧𝜑 ) ) )
44 43 cbvrexvw ( ∃ 𝑦𝑤𝑧𝐵 ( 𝑦𝑧𝜑 ) ↔ ∃ 𝑣𝑤𝑧𝐵 ( 𝑣𝑧𝜑 ) )
45 rsp ( ∀ 𝑧𝐵 ( 𝑣𝑧𝜑 ) → ( 𝑧𝐵 → ( 𝑣𝑧𝜑 ) ) )
46 ssel2 ( ( 𝑤𝐵𝑣𝑤 ) → 𝑣𝐵 )
47 ssel2 ( ( 𝐵 ⊆ ℝ ∧ 𝑣𝐵 ) → 𝑣 ∈ ℝ )
48 46 47 sylan2 ( ( 𝐵 ⊆ ℝ ∧ ( 𝑤𝐵𝑣𝑤 ) ) → 𝑣 ∈ ℝ )
49 48 anassrs ( ( ( 𝐵 ⊆ ℝ ∧ 𝑤𝐵 ) ∧ 𝑣𝑤 ) → 𝑣 ∈ ℝ )
50 49 adantlr ( ( ( ( 𝐵 ⊆ ℝ ∧ 𝑤𝐵 ) ∧ ( 𝑦𝑤 ∧ ∀ 𝑢𝑤 𝑢𝑦 ) ) ∧ 𝑣𝑤 ) → 𝑣 ∈ ℝ )
51 50 adantlr ( ( ( ( ( 𝐵 ⊆ ℝ ∧ 𝑤𝐵 ) ∧ ( 𝑦𝑤 ∧ ∀ 𝑢𝑤 𝑢𝑦 ) ) ∧ ( 𝑧𝐵𝑦𝑧 ) ) ∧ 𝑣𝑤 ) → 𝑣 ∈ ℝ )
52 ssel2 ( ( 𝑤𝐵𝑦𝑤 ) → 𝑦𝐵 )
53 ssel2 ( ( 𝐵 ⊆ ℝ ∧ 𝑦𝐵 ) → 𝑦 ∈ ℝ )
54 52 53 sylan2 ( ( 𝐵 ⊆ ℝ ∧ ( 𝑤𝐵𝑦𝑤 ) ) → 𝑦 ∈ ℝ )
55 54 anassrs ( ( ( 𝐵 ⊆ ℝ ∧ 𝑤𝐵 ) ∧ 𝑦𝑤 ) → 𝑦 ∈ ℝ )
56 55 adantrr ( ( ( 𝐵 ⊆ ℝ ∧ 𝑤𝐵 ) ∧ ( 𝑦𝑤 ∧ ∀ 𝑢𝑤 𝑢𝑦 ) ) → 𝑦 ∈ ℝ )
57 56 ad2antrr ( ( ( ( ( 𝐵 ⊆ ℝ ∧ 𝑤𝐵 ) ∧ ( 𝑦𝑤 ∧ ∀ 𝑢𝑤 𝑢𝑦 ) ) ∧ ( 𝑧𝐵𝑦𝑧 ) ) ∧ 𝑣𝑤 ) → 𝑦 ∈ ℝ )
58 ssel2 ( ( 𝐵 ⊆ ℝ ∧ 𝑧𝐵 ) → 𝑧 ∈ ℝ )
59 58 adantlr ( ( ( 𝐵 ⊆ ℝ ∧ 𝑤𝐵 ) ∧ 𝑧𝐵 ) → 𝑧 ∈ ℝ )
60 59 ad2ant2r ( ( ( ( 𝐵 ⊆ ℝ ∧ 𝑤𝐵 ) ∧ ( 𝑦𝑤 ∧ ∀ 𝑢𝑤 𝑢𝑦 ) ) ∧ ( 𝑧𝐵𝑦𝑧 ) ) → 𝑧 ∈ ℝ )
61 60 adantr ( ( ( ( ( 𝐵 ⊆ ℝ ∧ 𝑤𝐵 ) ∧ ( 𝑦𝑤 ∧ ∀ 𝑢𝑤 𝑢𝑦 ) ) ∧ ( 𝑧𝐵𝑦𝑧 ) ) ∧ 𝑣𝑤 ) → 𝑧 ∈ ℝ )
62 breq1 ( 𝑢 = 𝑣 → ( 𝑢𝑦𝑣𝑦 ) )
63 62 rspccva ( ( ∀ 𝑢𝑤 𝑢𝑦𝑣𝑤 ) → 𝑣𝑦 )
64 63 adantll ( ( ( 𝑦𝑤 ∧ ∀ 𝑢𝑤 𝑢𝑦 ) ∧ 𝑣𝑤 ) → 𝑣𝑦 )
65 64 adantll ( ( ( ( 𝐵 ⊆ ℝ ∧ 𝑤𝐵 ) ∧ ( 𝑦𝑤 ∧ ∀ 𝑢𝑤 𝑢𝑦 ) ) ∧ 𝑣𝑤 ) → 𝑣𝑦 )
66 65 adantlr ( ( ( ( ( 𝐵 ⊆ ℝ ∧ 𝑤𝐵 ) ∧ ( 𝑦𝑤 ∧ ∀ 𝑢𝑤 𝑢𝑦 ) ) ∧ ( 𝑧𝐵𝑦𝑧 ) ) ∧ 𝑣𝑤 ) → 𝑣𝑦 )
67 simplrr ( ( ( ( ( 𝐵 ⊆ ℝ ∧ 𝑤𝐵 ) ∧ ( 𝑦𝑤 ∧ ∀ 𝑢𝑤 𝑢𝑦 ) ) ∧ ( 𝑧𝐵𝑦𝑧 ) ) ∧ 𝑣𝑤 ) → 𝑦𝑧 )
68 51 57 61 66 67 letrd ( ( ( ( ( 𝐵 ⊆ ℝ ∧ 𝑤𝐵 ) ∧ ( 𝑦𝑤 ∧ ∀ 𝑢𝑤 𝑢𝑦 ) ) ∧ ( 𝑧𝐵𝑦𝑧 ) ) ∧ 𝑣𝑤 ) → 𝑣𝑧 )
69 pm2.27 ( 𝑧𝐵 → ( ( 𝑧𝐵 → ( 𝑣𝑧𝜑 ) ) → ( 𝑣𝑧𝜑 ) ) )
70 69 adantr ( ( 𝑧𝐵𝑦𝑧 ) → ( ( 𝑧𝐵 → ( 𝑣𝑧𝜑 ) ) → ( 𝑣𝑧𝜑 ) ) )
71 70 ad2antlr ( ( ( ( ( 𝐵 ⊆ ℝ ∧ 𝑤𝐵 ) ∧ ( 𝑦𝑤 ∧ ∀ 𝑢𝑤 𝑢𝑦 ) ) ∧ ( 𝑧𝐵𝑦𝑧 ) ) ∧ 𝑣𝑤 ) → ( ( 𝑧𝐵 → ( 𝑣𝑧𝜑 ) ) → ( 𝑣𝑧𝜑 ) ) )
72 68 71 mpid ( ( ( ( ( 𝐵 ⊆ ℝ ∧ 𝑤𝐵 ) ∧ ( 𝑦𝑤 ∧ ∀ 𝑢𝑤 𝑢𝑦 ) ) ∧ ( 𝑧𝐵𝑦𝑧 ) ) ∧ 𝑣𝑤 ) → ( ( 𝑧𝐵 → ( 𝑣𝑧𝜑 ) ) → 𝜑 ) )
73 45 72 syl5 ( ( ( ( ( 𝐵 ⊆ ℝ ∧ 𝑤𝐵 ) ∧ ( 𝑦𝑤 ∧ ∀ 𝑢𝑤 𝑢𝑦 ) ) ∧ ( 𝑧𝐵𝑦𝑧 ) ) ∧ 𝑣𝑤 ) → ( ∀ 𝑧𝐵 ( 𝑣𝑧𝜑 ) → 𝜑 ) )
74 73 adantlr ( ( ( ( ( ( 𝐵 ⊆ ℝ ∧ 𝑤𝐵 ) ∧ ( 𝑦𝑤 ∧ ∀ 𝑢𝑤 𝑢𝑦 ) ) ∧ ( 𝑧𝐵𝑦𝑧 ) ) ∧ 𝑥𝐴 ) ∧ 𝑣𝑤 ) → ( ∀ 𝑧𝐵 ( 𝑣𝑧𝜑 ) → 𝜑 ) )
75 74 rexlimdva ( ( ( ( ( 𝐵 ⊆ ℝ ∧ 𝑤𝐵 ) ∧ ( 𝑦𝑤 ∧ ∀ 𝑢𝑤 𝑢𝑦 ) ) ∧ ( 𝑧𝐵𝑦𝑧 ) ) ∧ 𝑥𝐴 ) → ( ∃ 𝑣𝑤𝑧𝐵 ( 𝑣𝑧𝜑 ) → 𝜑 ) )
76 44 75 syl5bi ( ( ( ( ( 𝐵 ⊆ ℝ ∧ 𝑤𝐵 ) ∧ ( 𝑦𝑤 ∧ ∀ 𝑢𝑤 𝑢𝑦 ) ) ∧ ( 𝑧𝐵𝑦𝑧 ) ) ∧ 𝑥𝐴 ) → ( ∃ 𝑦𝑤𝑧𝐵 ( 𝑦𝑧𝜑 ) → 𝜑 ) )
77 76 ralimdva ( ( ( ( 𝐵 ⊆ ℝ ∧ 𝑤𝐵 ) ∧ ( 𝑦𝑤 ∧ ∀ 𝑢𝑤 𝑢𝑦 ) ) ∧ ( 𝑧𝐵𝑦𝑧 ) ) → ( ∀ 𝑥𝐴𝑦𝑤𝑧𝐵 ( 𝑦𝑧𝜑 ) → ∀ 𝑥𝐴 𝜑 ) )
78 77 imp ( ( ( ( ( 𝐵 ⊆ ℝ ∧ 𝑤𝐵 ) ∧ ( 𝑦𝑤 ∧ ∀ 𝑢𝑤 𝑢𝑦 ) ) ∧ ( 𝑧𝐵𝑦𝑧 ) ) ∧ ∀ 𝑥𝐴𝑦𝑤𝑧𝐵 ( 𝑦𝑧𝜑 ) ) → ∀ 𝑥𝐴 𝜑 )
79 78 an32s ( ( ( ( ( 𝐵 ⊆ ℝ ∧ 𝑤𝐵 ) ∧ ( 𝑦𝑤 ∧ ∀ 𝑢𝑤 𝑢𝑦 ) ) ∧ ∀ 𝑥𝐴𝑦𝑤𝑧𝐵 ( 𝑦𝑧𝜑 ) ) ∧ ( 𝑧𝐵𝑦𝑧 ) ) → ∀ 𝑥𝐴 𝜑 )
80 79 exp32 ( ( ( ( 𝐵 ⊆ ℝ ∧ 𝑤𝐵 ) ∧ ( 𝑦𝑤 ∧ ∀ 𝑢𝑤 𝑢𝑦 ) ) ∧ ∀ 𝑥𝐴𝑦𝑤𝑧𝐵 ( 𝑦𝑧𝜑 ) ) → ( 𝑧𝐵 → ( 𝑦𝑧 → ∀ 𝑥𝐴 𝜑 ) ) )
81 80 an32s ( ( ( ( 𝐵 ⊆ ℝ ∧ 𝑤𝐵 ) ∧ ∀ 𝑥𝐴𝑦𝑤𝑧𝐵 ( 𝑦𝑧𝜑 ) ) ∧ ( 𝑦𝑤 ∧ ∀ 𝑢𝑤 𝑢𝑦 ) ) → ( 𝑧𝐵 → ( 𝑦𝑧 → ∀ 𝑥𝐴 𝜑 ) ) )
82 40 81 ralrimi ( ( ( ( 𝐵 ⊆ ℝ ∧ 𝑤𝐵 ) ∧ ∀ 𝑥𝐴𝑦𝑤𝑧𝐵 ( 𝑦𝑧𝜑 ) ) ∧ ( 𝑦𝑤 ∧ ∀ 𝑢𝑤 𝑢𝑦 ) ) → ∀ 𝑧𝐵 ( 𝑦𝑧 → ∀ 𝑥𝐴 𝜑 ) )
83 82 exp32 ( ( ( 𝐵 ⊆ ℝ ∧ 𝑤𝐵 ) ∧ ∀ 𝑥𝐴𝑦𝑤𝑧𝐵 ( 𝑦𝑧𝜑 ) ) → ( 𝑦𝑤 → ( ∀ 𝑢𝑤 𝑢𝑦 → ∀ 𝑧𝐵 ( 𝑦𝑧 → ∀ 𝑥𝐴 𝜑 ) ) ) )
84 31 83 reximdai ( ( ( 𝐵 ⊆ ℝ ∧ 𝑤𝐵 ) ∧ ∀ 𝑥𝐴𝑦𝑤𝑧𝐵 ( 𝑦𝑧𝜑 ) ) → ( ∃ 𝑦𝑤𝑢𝑤 𝑢𝑦 → ∃ 𝑦𝑤𝑧𝐵 ( 𝑦𝑧 → ∀ 𝑥𝐴 𝜑 ) ) )
85 84 adantrr ( ( ( 𝐵 ⊆ ℝ ∧ 𝑤𝐵 ) ∧ ( ∀ 𝑥𝐴𝑦𝑤𝑧𝐵 ( 𝑦𝑧𝜑 ) ∧ ∀ 𝑦𝑤𝑥𝐴𝑧𝐵 ( 𝑦𝑧𝜑 ) ) ) → ( ∃ 𝑦𝑤𝑢𝑤 𝑢𝑦 → ∃ 𝑦𝑤𝑧𝐵 ( 𝑦𝑧 → ∀ 𝑥𝐴 𝜑 ) ) )
86 ssrexv ( 𝑤𝐵 → ( ∃ 𝑦𝑤𝑧𝐵 ( 𝑦𝑧 → ∀ 𝑥𝐴 𝜑 ) → ∃ 𝑦𝐵𝑧𝐵 ( 𝑦𝑧 → ∀ 𝑥𝐴 𝜑 ) ) )
87 86 ad2antlr ( ( ( 𝐵 ⊆ ℝ ∧ 𝑤𝐵 ) ∧ ( ∀ 𝑥𝐴𝑦𝑤𝑧𝐵 ( 𝑦𝑧𝜑 ) ∧ ∀ 𝑦𝑤𝑥𝐴𝑧𝐵 ( 𝑦𝑧𝜑 ) ) ) → ( ∃ 𝑦𝑤𝑧𝐵 ( 𝑦𝑧 → ∀ 𝑥𝐴 𝜑 ) → ∃ 𝑦𝐵𝑧𝐵 ( 𝑦𝑧 → ∀ 𝑥𝐴 𝜑 ) ) )
88 85 87 syld ( ( ( 𝐵 ⊆ ℝ ∧ 𝑤𝐵 ) ∧ ( ∀ 𝑥𝐴𝑦𝑤𝑧𝐵 ( 𝑦𝑧𝜑 ) ∧ ∀ 𝑦𝑤𝑥𝐴𝑧𝐵 ( 𝑦𝑧𝜑 ) ) ) → ( ∃ 𝑦𝑤𝑢𝑤 𝑢𝑦 → ∃ 𝑦𝐵𝑧𝐵 ( 𝑦𝑧 → ∀ 𝑥𝐴 𝜑 ) ) )
89 88 exp43 ( 𝐵 ⊆ ℝ → ( 𝑤𝐵 → ( ∀ 𝑥𝐴𝑦𝑤𝑧𝐵 ( 𝑦𝑧𝜑 ) → ( ∀ 𝑦𝑤𝑥𝐴𝑧𝐵 ( 𝑦𝑧𝜑 ) → ( ∃ 𝑦𝑤𝑢𝑤 𝑢𝑦 → ∃ 𝑦𝐵𝑧𝐵 ( 𝑦𝑧 → ∀ 𝑥𝐴 𝜑 ) ) ) ) ) )
90 89 3impd ( 𝐵 ⊆ ℝ → ( ( 𝑤𝐵 ∧ ∀ 𝑥𝐴𝑦𝑤𝑧𝐵 ( 𝑦𝑧𝜑 ) ∧ ∀ 𝑦𝑤𝑥𝐴𝑧𝐵 ( 𝑦𝑧𝜑 ) ) → ( ∃ 𝑦𝑤𝑢𝑤 𝑢𝑦 → ∃ 𝑦𝐵𝑧𝐵 ( 𝑦𝑧 → ∀ 𝑥𝐴 𝜑 ) ) ) )
91 90 3ad2ant3 ( ( 𝐴 ∈ Fin ∧ 𝐴 ≠ ∅ ∧ 𝐵 ⊆ ℝ ) → ( ( 𝑤𝐵 ∧ ∀ 𝑥𝐴𝑦𝑤𝑧𝐵 ( 𝑦𝑧𝜑 ) ∧ ∀ 𝑦𝑤𝑥𝐴𝑧𝐵 ( 𝑦𝑧𝜑 ) ) → ( ∃ 𝑦𝑤𝑢𝑤 𝑢𝑦 → ∃ 𝑦𝐵𝑧𝐵 ( 𝑦𝑧 → ∀ 𝑥𝐴 𝜑 ) ) ) )
92 91 adantr ( ( ( 𝐴 ∈ Fin ∧ 𝐴 ≠ ∅ ∧ 𝐵 ⊆ ℝ ) ∧ 𝑤 ∈ Fin ) → ( ( 𝑤𝐵 ∧ ∀ 𝑥𝐴𝑦𝑤𝑧𝐵 ( 𝑦𝑧𝜑 ) ∧ ∀ 𝑦𝑤𝑥𝐴𝑧𝐵 ( 𝑦𝑧𝜑 ) ) → ( ∃ 𝑦𝑤𝑢𝑤 𝑢𝑦 → ∃ 𝑦𝐵𝑧𝐵 ( 𝑦𝑧 → ∀ 𝑥𝐴 𝜑 ) ) ) )
93 26 92 mpdd ( ( ( 𝐴 ∈ Fin ∧ 𝐴 ≠ ∅ ∧ 𝐵 ⊆ ℝ ) ∧ 𝑤 ∈ Fin ) → ( ( 𝑤𝐵 ∧ ∀ 𝑥𝐴𝑦𝑤𝑧𝐵 ( 𝑦𝑧𝜑 ) ∧ ∀ 𝑦𝑤𝑥𝐴𝑧𝐵 ( 𝑦𝑧𝜑 ) ) → ∃ 𝑦𝐵𝑧𝐵 ( 𝑦𝑧 → ∀ 𝑥𝐴 𝜑 ) ) )
94 93 rexlimdva ( ( 𝐴 ∈ Fin ∧ 𝐴 ≠ ∅ ∧ 𝐵 ⊆ ℝ ) → ( ∃ 𝑤 ∈ Fin ( 𝑤𝐵 ∧ ∀ 𝑥𝐴𝑦𝑤𝑧𝐵 ( 𝑦𝑧𝜑 ) ∧ ∀ 𝑦𝑤𝑥𝐴𝑧𝐵 ( 𝑦𝑧𝜑 ) ) → ∃ 𝑦𝐵𝑧𝐵 ( 𝑦𝑧 → ∀ 𝑥𝐴 𝜑 ) ) )
95 6 94 syld ( ( 𝐴 ∈ Fin ∧ 𝐴 ≠ ∅ ∧ 𝐵 ⊆ ℝ ) → ( ∀ 𝑥𝐴𝑦𝐵𝑧𝐵 ( 𝑦𝑧𝜑 ) → ∃ 𝑦𝐵𝑧𝐵 ( 𝑦𝑧 → ∀ 𝑥𝐴 𝜑 ) ) )