Metamath Proof Explorer


Theorem oemapvali

Description: If F < G , then there is some z witnessing this, but we can say more and in fact there is a definable expression X that also witnesses F < G . (Contributed by Mario Carneiro, 25-May-2015)

Ref Expression
Hypotheses cantnfs.s 𝑆 = dom ( 𝐴 CNF 𝐵 )
cantnfs.a ( 𝜑𝐴 ∈ On )
cantnfs.b ( 𝜑𝐵 ∈ On )
oemapval.t 𝑇 = { ⟨ 𝑥 , 𝑦 ⟩ ∣ ∃ 𝑧𝐵 ( ( 𝑥𝑧 ) ∈ ( 𝑦𝑧 ) ∧ ∀ 𝑤𝐵 ( 𝑧𝑤 → ( 𝑥𝑤 ) = ( 𝑦𝑤 ) ) ) }
oemapval.f ( 𝜑𝐹𝑆 )
oemapval.g ( 𝜑𝐺𝑆 )
oemapvali.r ( 𝜑𝐹 𝑇 𝐺 )
oemapvali.x 𝑋 = { 𝑐𝐵 ∣ ( 𝐹𝑐 ) ∈ ( 𝐺𝑐 ) }
Assertion oemapvali ( 𝜑 → ( 𝑋𝐵 ∧ ( 𝐹𝑋 ) ∈ ( 𝐺𝑋 ) ∧ ∀ 𝑤𝐵 ( 𝑋𝑤 → ( 𝐹𝑤 ) = ( 𝐺𝑤 ) ) ) )

Proof

Step Hyp Ref Expression
1 cantnfs.s 𝑆 = dom ( 𝐴 CNF 𝐵 )
2 cantnfs.a ( 𝜑𝐴 ∈ On )
3 cantnfs.b ( 𝜑𝐵 ∈ On )
4 oemapval.t 𝑇 = { ⟨ 𝑥 , 𝑦 ⟩ ∣ ∃ 𝑧𝐵 ( ( 𝑥𝑧 ) ∈ ( 𝑦𝑧 ) ∧ ∀ 𝑤𝐵 ( 𝑧𝑤 → ( 𝑥𝑤 ) = ( 𝑦𝑤 ) ) ) }
5 oemapval.f ( 𝜑𝐹𝑆 )
6 oemapval.g ( 𝜑𝐺𝑆 )
7 oemapvali.r ( 𝜑𝐹 𝑇 𝐺 )
8 oemapvali.x 𝑋 = { 𝑐𝐵 ∣ ( 𝐹𝑐 ) ∈ ( 𝐺𝑐 ) }
9 1 2 3 4 5 6 oemapval ( 𝜑 → ( 𝐹 𝑇 𝐺 ↔ ∃ 𝑧𝐵 ( ( 𝐹𝑧 ) ∈ ( 𝐺𝑧 ) ∧ ∀ 𝑤𝐵 ( 𝑧𝑤 → ( 𝐹𝑤 ) = ( 𝐺𝑤 ) ) ) ) )
10 7 9 mpbid ( 𝜑 → ∃ 𝑧𝐵 ( ( 𝐹𝑧 ) ∈ ( 𝐺𝑧 ) ∧ ∀ 𝑤𝐵 ( 𝑧𝑤 → ( 𝐹𝑤 ) = ( 𝐺𝑤 ) ) ) )
11 ssrab2 { 𝑐𝐵 ∣ ( 𝐹𝑐 ) ∈ ( 𝐺𝑐 ) } ⊆ 𝐵
12 3 adantr ( ( 𝜑 ∧ ( 𝑧𝐵 ∧ ( ( 𝐹𝑧 ) ∈ ( 𝐺𝑧 ) ∧ ∀ 𝑤𝐵 ( 𝑧𝑤 → ( 𝐹𝑤 ) = ( 𝐺𝑤 ) ) ) ) ) → 𝐵 ∈ On )
13 onss ( 𝐵 ∈ On → 𝐵 ⊆ On )
14 12 13 syl ( ( 𝜑 ∧ ( 𝑧𝐵 ∧ ( ( 𝐹𝑧 ) ∈ ( 𝐺𝑧 ) ∧ ∀ 𝑤𝐵 ( 𝑧𝑤 → ( 𝐹𝑤 ) = ( 𝐺𝑤 ) ) ) ) ) → 𝐵 ⊆ On )
15 11 14 sstrid ( ( 𝜑 ∧ ( 𝑧𝐵 ∧ ( ( 𝐹𝑧 ) ∈ ( 𝐺𝑧 ) ∧ ∀ 𝑤𝐵 ( 𝑧𝑤 → ( 𝐹𝑤 ) = ( 𝐺𝑤 ) ) ) ) ) → { 𝑐𝐵 ∣ ( 𝐹𝑐 ) ∈ ( 𝐺𝑐 ) } ⊆ On )
16 1 2 3 cantnfs ( 𝜑 → ( 𝐺𝑆 ↔ ( 𝐺 : 𝐵𝐴𝐺 finSupp ∅ ) ) )
17 6 16 mpbid ( 𝜑 → ( 𝐺 : 𝐵𝐴𝐺 finSupp ∅ ) )
18 17 simprd ( 𝜑𝐺 finSupp ∅ )
19 18 adantr ( ( 𝜑 ∧ ( 𝑧𝐵 ∧ ( ( 𝐹𝑧 ) ∈ ( 𝐺𝑧 ) ∧ ∀ 𝑤𝐵 ( 𝑧𝑤 → ( 𝐹𝑤 ) = ( 𝐺𝑤 ) ) ) ) ) → 𝐺 finSupp ∅ )
20 3 3ad2ant1 ( ( 𝜑𝑐𝐵 ∧ ( 𝐹𝑐 ) ∈ ( 𝐺𝑐 ) ) → 𝐵 ∈ On )
21 simp2 ( ( 𝜑𝑐𝐵 ∧ ( 𝐹𝑐 ) ∈ ( 𝐺𝑐 ) ) → 𝑐𝐵 )
22 17 simpld ( 𝜑𝐺 : 𝐵𝐴 )
23 22 ffnd ( 𝜑𝐺 Fn 𝐵 )
24 23 3ad2ant1 ( ( 𝜑𝑐𝐵 ∧ ( 𝐹𝑐 ) ∈ ( 𝐺𝑐 ) ) → 𝐺 Fn 𝐵 )
25 ne0i ( ( 𝐹𝑐 ) ∈ ( 𝐺𝑐 ) → ( 𝐺𝑐 ) ≠ ∅ )
26 25 3ad2ant3 ( ( 𝜑𝑐𝐵 ∧ ( 𝐹𝑐 ) ∈ ( 𝐺𝑐 ) ) → ( 𝐺𝑐 ) ≠ ∅ )
27 fvn0elsupp ( ( ( 𝐵 ∈ On ∧ 𝑐𝐵 ) ∧ ( 𝐺 Fn 𝐵 ∧ ( 𝐺𝑐 ) ≠ ∅ ) ) → 𝑐 ∈ ( 𝐺 supp ∅ ) )
28 20 21 24 26 27 syl22anc ( ( 𝜑𝑐𝐵 ∧ ( 𝐹𝑐 ) ∈ ( 𝐺𝑐 ) ) → 𝑐 ∈ ( 𝐺 supp ∅ ) )
29 28 rabssdv ( 𝜑 → { 𝑐𝐵 ∣ ( 𝐹𝑐 ) ∈ ( 𝐺𝑐 ) } ⊆ ( 𝐺 supp ∅ ) )
30 29 adantr ( ( 𝜑 ∧ ( 𝑧𝐵 ∧ ( ( 𝐹𝑧 ) ∈ ( 𝐺𝑧 ) ∧ ∀ 𝑤𝐵 ( 𝑧𝑤 → ( 𝐹𝑤 ) = ( 𝐺𝑤 ) ) ) ) ) → { 𝑐𝐵 ∣ ( 𝐹𝑐 ) ∈ ( 𝐺𝑐 ) } ⊆ ( 𝐺 supp ∅ ) )
31 fsuppimp ( 𝐺 finSupp ∅ → ( Fun 𝐺 ∧ ( 𝐺 supp ∅ ) ∈ Fin ) )
32 ssfi ( ( ( 𝐺 supp ∅ ) ∈ Fin ∧ { 𝑐𝐵 ∣ ( 𝐹𝑐 ) ∈ ( 𝐺𝑐 ) } ⊆ ( 𝐺 supp ∅ ) ) → { 𝑐𝐵 ∣ ( 𝐹𝑐 ) ∈ ( 𝐺𝑐 ) } ∈ Fin )
33 32 ex ( ( 𝐺 supp ∅ ) ∈ Fin → ( { 𝑐𝐵 ∣ ( 𝐹𝑐 ) ∈ ( 𝐺𝑐 ) } ⊆ ( 𝐺 supp ∅ ) → { 𝑐𝐵 ∣ ( 𝐹𝑐 ) ∈ ( 𝐺𝑐 ) } ∈ Fin ) )
34 31 33 simpl2im ( 𝐺 finSupp ∅ → ( { 𝑐𝐵 ∣ ( 𝐹𝑐 ) ∈ ( 𝐺𝑐 ) } ⊆ ( 𝐺 supp ∅ ) → { 𝑐𝐵 ∣ ( 𝐹𝑐 ) ∈ ( 𝐺𝑐 ) } ∈ Fin ) )
35 19 30 34 sylc ( ( 𝜑 ∧ ( 𝑧𝐵 ∧ ( ( 𝐹𝑧 ) ∈ ( 𝐺𝑧 ) ∧ ∀ 𝑤𝐵 ( 𝑧𝑤 → ( 𝐹𝑤 ) = ( 𝐺𝑤 ) ) ) ) ) → { 𝑐𝐵 ∣ ( 𝐹𝑐 ) ∈ ( 𝐺𝑐 ) } ∈ Fin )
36 fveq2 ( 𝑐 = 𝑧 → ( 𝐹𝑐 ) = ( 𝐹𝑧 ) )
37 fveq2 ( 𝑐 = 𝑧 → ( 𝐺𝑐 ) = ( 𝐺𝑧 ) )
38 36 37 eleq12d ( 𝑐 = 𝑧 → ( ( 𝐹𝑐 ) ∈ ( 𝐺𝑐 ) ↔ ( 𝐹𝑧 ) ∈ ( 𝐺𝑧 ) ) )
39 simprl ( ( 𝜑 ∧ ( 𝑧𝐵 ∧ ( ( 𝐹𝑧 ) ∈ ( 𝐺𝑧 ) ∧ ∀ 𝑤𝐵 ( 𝑧𝑤 → ( 𝐹𝑤 ) = ( 𝐺𝑤 ) ) ) ) ) → 𝑧𝐵 )
40 simprrl ( ( 𝜑 ∧ ( 𝑧𝐵 ∧ ( ( 𝐹𝑧 ) ∈ ( 𝐺𝑧 ) ∧ ∀ 𝑤𝐵 ( 𝑧𝑤 → ( 𝐹𝑤 ) = ( 𝐺𝑤 ) ) ) ) ) → ( 𝐹𝑧 ) ∈ ( 𝐺𝑧 ) )
41 38 39 40 elrabd ( ( 𝜑 ∧ ( 𝑧𝐵 ∧ ( ( 𝐹𝑧 ) ∈ ( 𝐺𝑧 ) ∧ ∀ 𝑤𝐵 ( 𝑧𝑤 → ( 𝐹𝑤 ) = ( 𝐺𝑤 ) ) ) ) ) → 𝑧 ∈ { 𝑐𝐵 ∣ ( 𝐹𝑐 ) ∈ ( 𝐺𝑐 ) } )
42 41 ne0d ( ( 𝜑 ∧ ( 𝑧𝐵 ∧ ( ( 𝐹𝑧 ) ∈ ( 𝐺𝑧 ) ∧ ∀ 𝑤𝐵 ( 𝑧𝑤 → ( 𝐹𝑤 ) = ( 𝐺𝑤 ) ) ) ) ) → { 𝑐𝐵 ∣ ( 𝐹𝑐 ) ∈ ( 𝐺𝑐 ) } ≠ ∅ )
43 ordunifi ( ( { 𝑐𝐵 ∣ ( 𝐹𝑐 ) ∈ ( 𝐺𝑐 ) } ⊆ On ∧ { 𝑐𝐵 ∣ ( 𝐹𝑐 ) ∈ ( 𝐺𝑐 ) } ∈ Fin ∧ { 𝑐𝐵 ∣ ( 𝐹𝑐 ) ∈ ( 𝐺𝑐 ) } ≠ ∅ ) → { 𝑐𝐵 ∣ ( 𝐹𝑐 ) ∈ ( 𝐺𝑐 ) } ∈ { 𝑐𝐵 ∣ ( 𝐹𝑐 ) ∈ ( 𝐺𝑐 ) } )
44 15 35 42 43 syl3anc ( ( 𝜑 ∧ ( 𝑧𝐵 ∧ ( ( 𝐹𝑧 ) ∈ ( 𝐺𝑧 ) ∧ ∀ 𝑤𝐵 ( 𝑧𝑤 → ( 𝐹𝑤 ) = ( 𝐺𝑤 ) ) ) ) ) → { 𝑐𝐵 ∣ ( 𝐹𝑐 ) ∈ ( 𝐺𝑐 ) } ∈ { 𝑐𝐵 ∣ ( 𝐹𝑐 ) ∈ ( 𝐺𝑐 ) } )
45 8 44 eqeltrid ( ( 𝜑 ∧ ( 𝑧𝐵 ∧ ( ( 𝐹𝑧 ) ∈ ( 𝐺𝑧 ) ∧ ∀ 𝑤𝐵 ( 𝑧𝑤 → ( 𝐹𝑤 ) = ( 𝐺𝑤 ) ) ) ) ) → 𝑋 ∈ { 𝑐𝐵 ∣ ( 𝐹𝑐 ) ∈ ( 𝐺𝑐 ) } )
46 11 45 sseldi ( ( 𝜑 ∧ ( 𝑧𝐵 ∧ ( ( 𝐹𝑧 ) ∈ ( 𝐺𝑧 ) ∧ ∀ 𝑤𝐵 ( 𝑧𝑤 → ( 𝐹𝑤 ) = ( 𝐺𝑤 ) ) ) ) ) → 𝑋𝐵 )
47 fveq2 ( 𝑥 = 𝑋 → ( 𝐹𝑥 ) = ( 𝐹𝑋 ) )
48 fveq2 ( 𝑥 = 𝑋 → ( 𝐺𝑥 ) = ( 𝐺𝑋 ) )
49 47 48 eleq12d ( 𝑥 = 𝑋 → ( ( 𝐹𝑥 ) ∈ ( 𝐺𝑥 ) ↔ ( 𝐹𝑋 ) ∈ ( 𝐺𝑋 ) ) )
50 fveq2 ( 𝑐 = 𝑥 → ( 𝐹𝑐 ) = ( 𝐹𝑥 ) )
51 fveq2 ( 𝑐 = 𝑥 → ( 𝐺𝑐 ) = ( 𝐺𝑥 ) )
52 50 51 eleq12d ( 𝑐 = 𝑥 → ( ( 𝐹𝑐 ) ∈ ( 𝐺𝑐 ) ↔ ( 𝐹𝑥 ) ∈ ( 𝐺𝑥 ) ) )
53 52 cbvrabv { 𝑐𝐵 ∣ ( 𝐹𝑐 ) ∈ ( 𝐺𝑐 ) } = { 𝑥𝐵 ∣ ( 𝐹𝑥 ) ∈ ( 𝐺𝑥 ) }
54 49 53 elrab2 ( 𝑋 ∈ { 𝑐𝐵 ∣ ( 𝐹𝑐 ) ∈ ( 𝐺𝑐 ) } ↔ ( 𝑋𝐵 ∧ ( 𝐹𝑋 ) ∈ ( 𝐺𝑋 ) ) )
55 45 54 sylib ( ( 𝜑 ∧ ( 𝑧𝐵 ∧ ( ( 𝐹𝑧 ) ∈ ( 𝐺𝑧 ) ∧ ∀ 𝑤𝐵 ( 𝑧𝑤 → ( 𝐹𝑤 ) = ( 𝐺𝑤 ) ) ) ) ) → ( 𝑋𝐵 ∧ ( 𝐹𝑋 ) ∈ ( 𝐺𝑋 ) ) )
56 55 simprd ( ( 𝜑 ∧ ( 𝑧𝐵 ∧ ( ( 𝐹𝑧 ) ∈ ( 𝐺𝑧 ) ∧ ∀ 𝑤𝐵 ( 𝑧𝑤 → ( 𝐹𝑤 ) = ( 𝐺𝑤 ) ) ) ) ) → ( 𝐹𝑋 ) ∈ ( 𝐺𝑋 ) )
57 simprrr ( ( 𝜑 ∧ ( 𝑧𝐵 ∧ ( ( 𝐹𝑧 ) ∈ ( 𝐺𝑧 ) ∧ ∀ 𝑤𝐵 ( 𝑧𝑤 → ( 𝐹𝑤 ) = ( 𝐺𝑤 ) ) ) ) ) → ∀ 𝑤𝐵 ( 𝑧𝑤 → ( 𝐹𝑤 ) = ( 𝐺𝑤 ) ) )
58 2 adantr ( ( 𝜑 ∧ ( 𝑧𝐵 ∧ ( ( 𝐹𝑧 ) ∈ ( 𝐺𝑧 ) ∧ ∀ 𝑤𝐵 ( 𝑧𝑤 → ( 𝐹𝑤 ) = ( 𝐺𝑤 ) ) ) ) ) → 𝐴 ∈ On )
59 22 adantr ( ( 𝜑 ∧ ( 𝑧𝐵 ∧ ( ( 𝐹𝑧 ) ∈ ( 𝐺𝑧 ) ∧ ∀ 𝑤𝐵 ( 𝑧𝑤 → ( 𝐹𝑤 ) = ( 𝐺𝑤 ) ) ) ) ) → 𝐺 : 𝐵𝐴 )
60 59 46 ffvelrnd ( ( 𝜑 ∧ ( 𝑧𝐵 ∧ ( ( 𝐹𝑧 ) ∈ ( 𝐺𝑧 ) ∧ ∀ 𝑤𝐵 ( 𝑧𝑤 → ( 𝐹𝑤 ) = ( 𝐺𝑤 ) ) ) ) ) → ( 𝐺𝑋 ) ∈ 𝐴 )
61 onelon ( ( 𝐴 ∈ On ∧ ( 𝐺𝑋 ) ∈ 𝐴 ) → ( 𝐺𝑋 ) ∈ On )
62 58 60 61 syl2anc ( ( 𝜑 ∧ ( 𝑧𝐵 ∧ ( ( 𝐹𝑧 ) ∈ ( 𝐺𝑧 ) ∧ ∀ 𝑤𝐵 ( 𝑧𝑤 → ( 𝐹𝑤 ) = ( 𝐺𝑤 ) ) ) ) ) → ( 𝐺𝑋 ) ∈ On )
63 eloni ( ( 𝐺𝑋 ) ∈ On → Ord ( 𝐺𝑋 ) )
64 ordirr ( Ord ( 𝐺𝑋 ) → ¬ ( 𝐺𝑋 ) ∈ ( 𝐺𝑋 ) )
65 62 63 64 3syl ( ( 𝜑 ∧ ( 𝑧𝐵 ∧ ( ( 𝐹𝑧 ) ∈ ( 𝐺𝑧 ) ∧ ∀ 𝑤𝐵 ( 𝑧𝑤 → ( 𝐹𝑤 ) = ( 𝐺𝑤 ) ) ) ) ) → ¬ ( 𝐺𝑋 ) ∈ ( 𝐺𝑋 ) )
66 nelneq ( ( ( 𝐹𝑋 ) ∈ ( 𝐺𝑋 ) ∧ ¬ ( 𝐺𝑋 ) ∈ ( 𝐺𝑋 ) ) → ¬ ( 𝐹𝑋 ) = ( 𝐺𝑋 ) )
67 56 65 66 syl2anc ( ( 𝜑 ∧ ( 𝑧𝐵 ∧ ( ( 𝐹𝑧 ) ∈ ( 𝐺𝑧 ) ∧ ∀ 𝑤𝐵 ( 𝑧𝑤 → ( 𝐹𝑤 ) = ( 𝐺𝑤 ) ) ) ) ) → ¬ ( 𝐹𝑋 ) = ( 𝐺𝑋 ) )
68 eleq2 ( 𝑤 = 𝑋 → ( 𝑧𝑤𝑧𝑋 ) )
69 fveq2 ( 𝑤 = 𝑋 → ( 𝐹𝑤 ) = ( 𝐹𝑋 ) )
70 fveq2 ( 𝑤 = 𝑋 → ( 𝐺𝑤 ) = ( 𝐺𝑋 ) )
71 69 70 eqeq12d ( 𝑤 = 𝑋 → ( ( 𝐹𝑤 ) = ( 𝐺𝑤 ) ↔ ( 𝐹𝑋 ) = ( 𝐺𝑋 ) ) )
72 68 71 imbi12d ( 𝑤 = 𝑋 → ( ( 𝑧𝑤 → ( 𝐹𝑤 ) = ( 𝐺𝑤 ) ) ↔ ( 𝑧𝑋 → ( 𝐹𝑋 ) = ( 𝐺𝑋 ) ) ) )
73 72 57 46 rspcdva ( ( 𝜑 ∧ ( 𝑧𝐵 ∧ ( ( 𝐹𝑧 ) ∈ ( 𝐺𝑧 ) ∧ ∀ 𝑤𝐵 ( 𝑧𝑤 → ( 𝐹𝑤 ) = ( 𝐺𝑤 ) ) ) ) ) → ( 𝑧𝑋 → ( 𝐹𝑋 ) = ( 𝐺𝑋 ) ) )
74 67 73 mtod ( ( 𝜑 ∧ ( 𝑧𝐵 ∧ ( ( 𝐹𝑧 ) ∈ ( 𝐺𝑧 ) ∧ ∀ 𝑤𝐵 ( 𝑧𝑤 → ( 𝐹𝑤 ) = ( 𝐺𝑤 ) ) ) ) ) → ¬ 𝑧𝑋 )
75 ssexg ( ( { 𝑐𝐵 ∣ ( 𝐹𝑐 ) ∈ ( 𝐺𝑐 ) } ⊆ 𝐵𝐵 ∈ On ) → { 𝑐𝐵 ∣ ( 𝐹𝑐 ) ∈ ( 𝐺𝑐 ) } ∈ V )
76 11 12 75 sylancr ( ( 𝜑 ∧ ( 𝑧𝐵 ∧ ( ( 𝐹𝑧 ) ∈ ( 𝐺𝑧 ) ∧ ∀ 𝑤𝐵 ( 𝑧𝑤 → ( 𝐹𝑤 ) = ( 𝐺𝑤 ) ) ) ) ) → { 𝑐𝐵 ∣ ( 𝐹𝑐 ) ∈ ( 𝐺𝑐 ) } ∈ V )
77 ssonuni ( { 𝑐𝐵 ∣ ( 𝐹𝑐 ) ∈ ( 𝐺𝑐 ) } ∈ V → ( { 𝑐𝐵 ∣ ( 𝐹𝑐 ) ∈ ( 𝐺𝑐 ) } ⊆ On → { 𝑐𝐵 ∣ ( 𝐹𝑐 ) ∈ ( 𝐺𝑐 ) } ∈ On ) )
78 76 15 77 sylc ( ( 𝜑 ∧ ( 𝑧𝐵 ∧ ( ( 𝐹𝑧 ) ∈ ( 𝐺𝑧 ) ∧ ∀ 𝑤𝐵 ( 𝑧𝑤 → ( 𝐹𝑤 ) = ( 𝐺𝑤 ) ) ) ) ) → { 𝑐𝐵 ∣ ( 𝐹𝑐 ) ∈ ( 𝐺𝑐 ) } ∈ On )
79 8 78 eqeltrid ( ( 𝜑 ∧ ( 𝑧𝐵 ∧ ( ( 𝐹𝑧 ) ∈ ( 𝐺𝑧 ) ∧ ∀ 𝑤𝐵 ( 𝑧𝑤 → ( 𝐹𝑤 ) = ( 𝐺𝑤 ) ) ) ) ) → 𝑋 ∈ On )
80 onelon ( ( 𝐵 ∈ On ∧ 𝑧𝐵 ) → 𝑧 ∈ On )
81 12 39 80 syl2anc ( ( 𝜑 ∧ ( 𝑧𝐵 ∧ ( ( 𝐹𝑧 ) ∈ ( 𝐺𝑧 ) ∧ ∀ 𝑤𝐵 ( 𝑧𝑤 → ( 𝐹𝑤 ) = ( 𝐺𝑤 ) ) ) ) ) → 𝑧 ∈ On )
82 ontri1 ( ( 𝑋 ∈ On ∧ 𝑧 ∈ On ) → ( 𝑋𝑧 ↔ ¬ 𝑧𝑋 ) )
83 79 81 82 syl2anc ( ( 𝜑 ∧ ( 𝑧𝐵 ∧ ( ( 𝐹𝑧 ) ∈ ( 𝐺𝑧 ) ∧ ∀ 𝑤𝐵 ( 𝑧𝑤 → ( 𝐹𝑤 ) = ( 𝐺𝑤 ) ) ) ) ) → ( 𝑋𝑧 ↔ ¬ 𝑧𝑋 ) )
84 74 83 mpbird ( ( 𝜑 ∧ ( 𝑧𝐵 ∧ ( ( 𝐹𝑧 ) ∈ ( 𝐺𝑧 ) ∧ ∀ 𝑤𝐵 ( 𝑧𝑤 → ( 𝐹𝑤 ) = ( 𝐺𝑤 ) ) ) ) ) → 𝑋𝑧 )
85 elssuni ( 𝑧 ∈ { 𝑐𝐵 ∣ ( 𝐹𝑐 ) ∈ ( 𝐺𝑐 ) } → 𝑧 { 𝑐𝐵 ∣ ( 𝐹𝑐 ) ∈ ( 𝐺𝑐 ) } )
86 85 8 sseqtrrdi ( 𝑧 ∈ { 𝑐𝐵 ∣ ( 𝐹𝑐 ) ∈ ( 𝐺𝑐 ) } → 𝑧𝑋 )
87 41 86 syl ( ( 𝜑 ∧ ( 𝑧𝐵 ∧ ( ( 𝐹𝑧 ) ∈ ( 𝐺𝑧 ) ∧ ∀ 𝑤𝐵 ( 𝑧𝑤 → ( 𝐹𝑤 ) = ( 𝐺𝑤 ) ) ) ) ) → 𝑧𝑋 )
88 84 87 eqssd ( ( 𝜑 ∧ ( 𝑧𝐵 ∧ ( ( 𝐹𝑧 ) ∈ ( 𝐺𝑧 ) ∧ ∀ 𝑤𝐵 ( 𝑧𝑤 → ( 𝐹𝑤 ) = ( 𝐺𝑤 ) ) ) ) ) → 𝑋 = 𝑧 )
89 eleq1 ( 𝑋 = 𝑧 → ( 𝑋𝑤𝑧𝑤 ) )
90 89 imbi1d ( 𝑋 = 𝑧 → ( ( 𝑋𝑤 → ( 𝐹𝑤 ) = ( 𝐺𝑤 ) ) ↔ ( 𝑧𝑤 → ( 𝐹𝑤 ) = ( 𝐺𝑤 ) ) ) )
91 90 ralbidv ( 𝑋 = 𝑧 → ( ∀ 𝑤𝐵 ( 𝑋𝑤 → ( 𝐹𝑤 ) = ( 𝐺𝑤 ) ) ↔ ∀ 𝑤𝐵 ( 𝑧𝑤 → ( 𝐹𝑤 ) = ( 𝐺𝑤 ) ) ) )
92 88 91 syl ( ( 𝜑 ∧ ( 𝑧𝐵 ∧ ( ( 𝐹𝑧 ) ∈ ( 𝐺𝑧 ) ∧ ∀ 𝑤𝐵 ( 𝑧𝑤 → ( 𝐹𝑤 ) = ( 𝐺𝑤 ) ) ) ) ) → ( ∀ 𝑤𝐵 ( 𝑋𝑤 → ( 𝐹𝑤 ) = ( 𝐺𝑤 ) ) ↔ ∀ 𝑤𝐵 ( 𝑧𝑤 → ( 𝐹𝑤 ) = ( 𝐺𝑤 ) ) ) )
93 57 92 mpbird ( ( 𝜑 ∧ ( 𝑧𝐵 ∧ ( ( 𝐹𝑧 ) ∈ ( 𝐺𝑧 ) ∧ ∀ 𝑤𝐵 ( 𝑧𝑤 → ( 𝐹𝑤 ) = ( 𝐺𝑤 ) ) ) ) ) → ∀ 𝑤𝐵 ( 𝑋𝑤 → ( 𝐹𝑤 ) = ( 𝐺𝑤 ) ) )
94 46 56 93 3jca ( ( 𝜑 ∧ ( 𝑧𝐵 ∧ ( ( 𝐹𝑧 ) ∈ ( 𝐺𝑧 ) ∧ ∀ 𝑤𝐵 ( 𝑧𝑤 → ( 𝐹𝑤 ) = ( 𝐺𝑤 ) ) ) ) ) → ( 𝑋𝐵 ∧ ( 𝐹𝑋 ) ∈ ( 𝐺𝑋 ) ∧ ∀ 𝑤𝐵 ( 𝑋𝑤 → ( 𝐹𝑤 ) = ( 𝐺𝑤 ) ) ) )
95 10 94 rexlimddv ( 𝜑 → ( 𝑋𝐵 ∧ ( 𝐹𝑋 ) ∈ ( 𝐺𝑋 ) ∧ ∀ 𝑤𝐵 ( 𝑋𝑤 → ( 𝐹𝑤 ) = ( 𝐺𝑤 ) ) ) )