Theorem bropfvvvvlem 7786

Description: Lemma for bropfvvvv 7787. (Contributed by AV, 31-Dec-2020.) (Revised by AV, 16-Jan-2021.)

Hypotheses

Ref	Expression
bropfvvvv.o	⊢ 𝑂 = (𝑎 ∈ 𝑈 ↦ (𝑏 ∈ 𝑉, 𝑐 ∈ 𝑊 ↦ {⟨𝑑, 𝑒⟩ ∣ 𝜑}))
bropfvvvv.oo	⊢ ((𝐴 ∈ 𝑈 ∧ 𝐵 ∈ 𝑆 ∧ 𝐶 ∈ 𝑇) → (𝐵(𝑂‘𝐴)𝐶) = {⟨𝑑, 𝑒⟩ ∣ 𝜃})

Assertion

Ref	Expression
bropfvvvvlem	⊢ ((⟨𝐵, 𝐶⟩ ∈ (𝑆 × 𝑇) ∧ 𝐷(𝐵(𝑂‘𝐴)𝐶)𝐸) → (𝐴 ∈ 𝑈 ∧ (𝐵 ∈ 𝑆 ∧ 𝐶 ∈ 𝑇) ∧ (𝐷 ∈ V ∧ 𝐸 ∈ V)))

Distinct variable group:   𝑈,𝑎

Allowed substitution hints:   𝜑(𝑒,𝑎,𝑏,𝑐,𝑑)   𝜃(𝑒,𝑎,𝑏,𝑐,𝑑)   𝐴(𝑒,𝑎,𝑏,𝑐,𝑑)   𝐵(𝑒,𝑎,𝑏,𝑐,𝑑)   𝐶(𝑒,𝑎,𝑏,𝑐,𝑑)   𝐷(𝑒,𝑎,𝑏,𝑐,𝑑)   𝑆(𝑒,𝑎,𝑏,𝑐,𝑑)   𝑇(𝑒,𝑎,𝑏,𝑐,𝑑)   𝑈(𝑒,𝑏,𝑐,𝑑)   𝐸(𝑒,𝑎,𝑏,𝑐,𝑑)   𝑂(𝑒,𝑎,𝑏,𝑐,𝑑)   𝑉(𝑒,𝑎,𝑏,𝑐,𝑑)   𝑊(𝑒,𝑎,𝑏,𝑐,𝑑)

Proof of Theorem bropfvvvvlem

Step	Hyp	Ref	Expression
1		opelxp 5591	. . 3 ⊢ (⟨𝐵, 𝐶⟩ ∈ (𝑆 × 𝑇) ↔ (𝐵 ∈ 𝑆 ∧ 𝐶 ∈ 𝑇))
2		brne0 5116	. . . . . . 7 ⊢ (𝐷(𝐵(𝑂‘𝐴)𝐶)𝐸 → (𝐵(𝑂‘𝐴)𝐶) ≠ ∅)
3		bropfvvvv.oo	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ 𝑈 ∧ 𝐵 ∈ 𝑆 ∧ 𝐶 ∈ 𝑇) → (𝐵(𝑂‘𝐴)𝐶) = {⟨𝑑, 𝑒⟩ ∣ 𝜃})
4	3	3expb 1116	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ 𝑈 ∧ (𝐵 ∈ 𝑆 ∧ 𝐶 ∈ 𝑇)) → (𝐵(𝑂‘𝐴)𝐶) = {⟨𝑑, 𝑒⟩ ∣ 𝜃})
5	4	breqd 5077	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ 𝑈 ∧ (𝐵 ∈ 𝑆 ∧ 𝐶 ∈ 𝑇)) → (𝐷(𝐵(𝑂‘𝐴)𝐶)𝐸 ↔ 𝐷{⟨𝑑, 𝑒⟩ ∣ 𝜃}𝐸))
6		brabv 5453	. . . . . . . . . . . . . . 15 ⊢ (𝐷{⟨𝑑, 𝑒⟩ ∣ 𝜃}𝐸 → (𝐷 ∈ V ∧ 𝐸 ∈ V))
7	6	anim2i 618	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ 𝑈 ∧ 𝐷{⟨𝑑, 𝑒⟩ ∣ 𝜃}𝐸) → (𝐴 ∈ 𝑈 ∧ (𝐷 ∈ V ∧ 𝐸 ∈ V)))
8	7	ex 415	. . . . . . . . . . . . 13 ⊢ (𝐴 ∈ 𝑈 → (𝐷{⟨𝑑, 𝑒⟩ ∣ 𝜃}𝐸 → (𝐴 ∈ 𝑈 ∧ (𝐷 ∈ V ∧ 𝐸 ∈ V))))
9	8	adantr 483	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ 𝑈 ∧ (𝐵 ∈ 𝑆 ∧ 𝐶 ∈ 𝑇)) → (𝐷{⟨𝑑, 𝑒⟩ ∣ 𝜃}𝐸 → (𝐴 ∈ 𝑈 ∧ (𝐷 ∈ V ∧ 𝐸 ∈ V))))
10	5, 9	sylbid 242	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ 𝑈 ∧ (𝐵 ∈ 𝑆 ∧ 𝐶 ∈ 𝑇)) → (𝐷(𝐵(𝑂‘𝐴)𝐶)𝐸 → (𝐴 ∈ 𝑈 ∧ (𝐷 ∈ V ∧ 𝐸 ∈ V))))
11	10	ex 415	. . . . . . . . . 10 ⊢ (𝐴 ∈ 𝑈 → ((𝐵 ∈ 𝑆 ∧ 𝐶 ∈ 𝑇) → (𝐷(𝐵(𝑂‘𝐴)𝐶)𝐸 → (𝐴 ∈ 𝑈 ∧ (𝐷 ∈ V ∧ 𝐸 ∈ V)))))
12	11	com23 86	. . . . . . . . 9 ⊢ (𝐴 ∈ 𝑈 → (𝐷(𝐵(𝑂‘𝐴)𝐶)𝐸 → ((𝐵 ∈ 𝑆 ∧ 𝐶 ∈ 𝑇) → (𝐴 ∈ 𝑈 ∧ (𝐷 ∈ V ∧ 𝐸 ∈ V)))))
13	12	a1d 25	. . . . . . . 8 ⊢ (𝐴 ∈ 𝑈 → ((𝐵(𝑂‘𝐴)𝐶) ≠ ∅ → (𝐷(𝐵(𝑂‘𝐴)𝐶)𝐸 → ((𝐵 ∈ 𝑆 ∧ 𝐶 ∈ 𝑇) → (𝐴 ∈ 𝑈 ∧ (𝐷 ∈ V ∧ 𝐸 ∈ V))))))
14		bropfvvvv.o	. . . . . . . . . 10 ⊢ 𝑂 = (𝑎 ∈ 𝑈 ↦ (𝑏 ∈ 𝑉, 𝑐 ∈ 𝑊 ↦ {⟨𝑑, 𝑒⟩ ∣ 𝜑}))
15	14	fvmptndm 6798	. . . . . . . . 9 ⊢ (¬ 𝐴 ∈ 𝑈 → (𝑂‘𝐴) = ∅)
16		df-ov 7159	. . . . . . . . . . 11 ⊢ (𝐵(𝑂‘𝐴)𝐶) = ((𝑂‘𝐴)‘⟨𝐵, 𝐶⟩)
17		fveq1 6669	. . . . . . . . . . 11 ⊢ ((𝑂‘𝐴) = ∅ → ((𝑂‘𝐴)‘⟨𝐵, 𝐶⟩) = (∅‘⟨𝐵, 𝐶⟩))
18	16, 17	syl5eq 2868	. . . . . . . . . 10 ⊢ ((𝑂‘𝐴) = ∅ → (𝐵(𝑂‘𝐴)𝐶) = (∅‘⟨𝐵, 𝐶⟩))
19		0fv 6709	. . . . . . . . . 10 ⊢ (∅‘⟨𝐵, 𝐶⟩) = ∅
20	18, 19	syl6eq 2872	. . . . . . . . 9 ⊢ ((𝑂‘𝐴) = ∅ → (𝐵(𝑂‘𝐴)𝐶) = ∅)
21		eqneqall 3027	. . . . . . . . 9 ⊢ ((𝐵(𝑂‘𝐴)𝐶) = ∅ → ((𝐵(𝑂‘𝐴)𝐶) ≠ ∅ → (𝐷(𝐵(𝑂‘𝐴)𝐶)𝐸 → ((𝐵 ∈ 𝑆 ∧ 𝐶 ∈ 𝑇) → (𝐴 ∈ 𝑈 ∧ (𝐷 ∈ V ∧ 𝐸 ∈ V))))))
22	15, 20, 21	3syl 18	. . . . . . . 8 ⊢ (¬ 𝐴 ∈ 𝑈 → ((𝐵(𝑂‘𝐴)𝐶) ≠ ∅ → (𝐷(𝐵(𝑂‘𝐴)𝐶)𝐸 → ((𝐵 ∈ 𝑆 ∧ 𝐶 ∈ 𝑇) → (𝐴 ∈ 𝑈 ∧ (𝐷 ∈ V ∧ 𝐸 ∈ V))))))
23	13, 22	pm2.61i 184	. . . . . . 7 ⊢ ((𝐵(𝑂‘𝐴)𝐶) ≠ ∅ → (𝐷(𝐵(𝑂‘𝐴)𝐶)𝐸 → ((𝐵 ∈ 𝑆 ∧ 𝐶 ∈ 𝑇) → (𝐴 ∈ 𝑈 ∧ (𝐷 ∈ V ∧ 𝐸 ∈ V)))))
24	2, 23	mpcom 38	. . . . . 6 ⊢ (𝐷(𝐵(𝑂‘𝐴)𝐶)𝐸 → ((𝐵 ∈ 𝑆 ∧ 𝐶 ∈ 𝑇) → (𝐴 ∈ 𝑈 ∧ (𝐷 ∈ V ∧ 𝐸 ∈ V))))
25	24	com12 32	. . . . 5 ⊢ ((𝐵 ∈ 𝑆 ∧ 𝐶 ∈ 𝑇) → (𝐷(𝐵(𝑂‘𝐴)𝐶)𝐸 → (𝐴 ∈ 𝑈 ∧ (𝐷 ∈ V ∧ 𝐸 ∈ V))))
26	25	anc2ri 559	. . . 4 ⊢ ((𝐵 ∈ 𝑆 ∧ 𝐶 ∈ 𝑇) → (𝐷(𝐵(𝑂‘𝐴)𝐶)𝐸 → ((𝐴 ∈ 𝑈 ∧ (𝐷 ∈ V ∧ 𝐸 ∈ V)) ∧ (𝐵 ∈ 𝑆 ∧ 𝐶 ∈ 𝑇))))
27		3anan32 1093	. . . 4 ⊢ ((𝐴 ∈ 𝑈 ∧ (𝐵 ∈ 𝑆 ∧ 𝐶 ∈ 𝑇) ∧ (𝐷 ∈ V ∧ 𝐸 ∈ V)) ↔ ((𝐴 ∈ 𝑈 ∧ (𝐷 ∈ V ∧ 𝐸 ∈ V)) ∧ (𝐵 ∈ 𝑆 ∧ 𝐶 ∈ 𝑇)))
28	26, 27	syl6ibr 254	. . 3 ⊢ ((𝐵 ∈ 𝑆 ∧ 𝐶 ∈ 𝑇) → (𝐷(𝐵(𝑂‘𝐴)𝐶)𝐸 → (𝐴 ∈ 𝑈 ∧ (𝐵 ∈ 𝑆 ∧ 𝐶 ∈ 𝑇) ∧ (𝐷 ∈ V ∧ 𝐸 ∈ V))))
29	1, 28	sylbi 219	. 2 ⊢ (⟨𝐵, 𝐶⟩ ∈ (𝑆 × 𝑇) → (𝐷(𝐵(𝑂‘𝐴)𝐶)𝐸 → (𝐴 ∈ 𝑈 ∧ (𝐵 ∈ 𝑆 ∧ 𝐶 ∈ 𝑇) ∧ (𝐷 ∈ V ∧ 𝐸 ∈ V))))
30	29	imp 409	1 ⊢ ((⟨𝐵, 𝐶⟩ ∈ (𝑆 × 𝑇) ∧ 𝐷(𝐵(𝑂‘𝐴)𝐶)𝐸) → (𝐴 ∈ 𝑈 ∧ (𝐵 ∈ 𝑆 ∧ 𝐶 ∈ 𝑇) ∧ (𝐷 ∈ V ∧ 𝐸 ∈ V)))

Syntax hints:  ¬ wn 3   → wi 4   ∧ wa 398   ∧ w3a 1083   = wceq 1537   ∈ wcel 2114   ≠ wne 3016  Vcvv 3494  ∅c0 4291  ⟨cop 4573   class class class wbr 5066  {copab 5128   ↦ cmpt 5146   × cxp 5553  ‘cfv 6355  (class class class)co 7156   ∈ cmpo 7158

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1911  ax-6 1970  ax-7 2015  ax-8 2116  ax-9 2124  ax-10 2145  ax-11 2161  ax-12 2177  ax-ext 2793  ax-sep 5203  ax-nul 5210  ax-pow 5266  ax-pr 5330

This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-3an 1085  df-tru 1540  df-ex 1781  df-nf 1785  df-sb 2070  df-mo 2622  df-eu 2654  df-clab 2800  df-cleq 2814  df-clel 2893  df-nfc 2963  df-ne 3017  df-ral 3143  df-rex 3144  df-rab 3147  df-v 3496  df-dif 3939  df-un 3941  df-in 3943  df-ss 3952  df-nul 4292  df-if 4468  df-sn 4568  df-pr 4570  df-op 4574  df-uni 4839  df-br 5067  df-opab 5129  df-mpt 5147  df-xp 5561  df-dm 5565  df-iota 6314  df-fv 6363  df-ov 7159

This theorem is referenced by:  bropfvvvv  7787