Theorem sbthlem8 8830

Description: Lemma for sbth 8833. (Contributed by NM, 27-Mar-1998.)

Hypotheses

Ref	Expression
sbthlem.1	⊢ 𝐴 ∈ V
sbthlem.2	⊢ 𝐷 = {𝑥 ∣ (𝑥 ⊆ 𝐴 ∧ (𝑔 “ (𝐵 ∖ (𝑓 “ 𝑥))) ⊆ (𝐴 ∖ 𝑥))}
sbthlem.3	⊢ 𝐻 = ((𝑓 ↾ ∪ 𝐷) ∪ (◡𝑔 ↾ (𝐴 ∖ ∪ 𝐷)))

Assertion

Ref	Expression
sbthlem8	⊢ ((Fun ◡𝑓 ∧ (((Fun 𝑔 ∧ dom 𝑔 = 𝐵) ∧ ran 𝑔 ⊆ 𝐴) ∧ Fun ◡𝑔)) → Fun ◡𝐻)

Distinct variable groups:   𝑥,𝐴   𝑥,𝐵   𝑥,𝐷   𝑥,𝑓   𝑥,𝑔   𝑥,𝐻

Allowed substitution hints:   𝐴(𝑓,𝑔)   𝐵(𝑓,𝑔)   𝐷(𝑓,𝑔)   𝐻(𝑓,𝑔)

Proof of Theorem sbthlem8

Step	Hyp	Ref	Expression
1		funres11 6495	. . . 4 ⊢ (Fun ◡𝑓 → Fun ◡(𝑓 ↾ ∪ 𝐷))
2		funcnvcnv 6485	. . . . . 6 ⊢ (Fun 𝑔 → Fun ◡◡𝑔)
3		funres11 6495	. . . . . 6 ⊢ (Fun ◡◡𝑔 → Fun ◡(◡𝑔 ↾ (𝐴 ∖ ∪ 𝐷)))
4	2, 3	syl 17	. . . . 5 ⊢ (Fun 𝑔 → Fun ◡(◡𝑔 ↾ (𝐴 ∖ ∪ 𝐷)))
5	4	ad3antrrr 726	. . . 4 ⊢ ((((Fun 𝑔 ∧ dom 𝑔 = 𝐵) ∧ ran 𝑔 ⊆ 𝐴) ∧ Fun ◡𝑔) → Fun ◡(◡𝑔 ↾ (𝐴 ∖ ∪ 𝐷)))
6	1, 5	anim12i 612	. . 3 ⊢ ((Fun ◡𝑓 ∧ (((Fun 𝑔 ∧ dom 𝑔 = 𝐵) ∧ ran 𝑔 ⊆ 𝐴) ∧ Fun ◡𝑔)) → (Fun ◡(𝑓 ↾ ∪ 𝐷) ∧ Fun ◡(◡𝑔 ↾ (𝐴 ∖ ∪ 𝐷))))
7		df-ima 5593	. . . . . . . 8 ⊢ (𝑓 “ ∪ 𝐷) = ran (𝑓 ↾ ∪ 𝐷)
8		df-rn 5591	. . . . . . . 8 ⊢ ran (𝑓 ↾ ∪ 𝐷) = dom ◡(𝑓 ↾ ∪ 𝐷)
9	7, 8	eqtr2i 2767	. . . . . . 7 ⊢ dom ◡(𝑓 ↾ ∪ 𝐷) = (𝑓 “ ∪ 𝐷)
10		df-ima 5593	. . . . . . . . 9 ⊢ (◡𝑔 “ (𝐴 ∖ ∪ 𝐷)) = ran (◡𝑔 ↾ (𝐴 ∖ ∪ 𝐷))
11		df-rn 5591	. . . . . . . . 9 ⊢ ran (◡𝑔 ↾ (𝐴 ∖ ∪ 𝐷)) = dom ◡(◡𝑔 ↾ (𝐴 ∖ ∪ 𝐷))
12	10, 11	eqtri 2766	. . . . . . . 8 ⊢ (◡𝑔 “ (𝐴 ∖ ∪ 𝐷)) = dom ◡(◡𝑔 ↾ (𝐴 ∖ ∪ 𝐷))
13		sbthlem.1	. . . . . . . . 9 ⊢ 𝐴 ∈ V
14		sbthlem.2	. . . . . . . . 9 ⊢ 𝐷 = {𝑥 ∣ (𝑥 ⊆ 𝐴 ∧ (𝑔 “ (𝐵 ∖ (𝑓 “ 𝑥))) ⊆ (𝐴 ∖ 𝑥))}
15	13, 14	sbthlem4 8826	. . . . . . . 8 ⊢ (((dom 𝑔 = 𝐵 ∧ ran 𝑔 ⊆ 𝐴) ∧ Fun ◡𝑔) → (◡𝑔 “ (𝐴 ∖ ∪ 𝐷)) = (𝐵 ∖ (𝑓 “ ∪ 𝐷)))
16	12, 15	eqtr3id 2793	. . . . . . 7 ⊢ (((dom 𝑔 = 𝐵 ∧ ran 𝑔 ⊆ 𝐴) ∧ Fun ◡𝑔) → dom ◡(◡𝑔 ↾ (𝐴 ∖ ∪ 𝐷)) = (𝐵 ∖ (𝑓 “ ∪ 𝐷)))
17		ineq12 4138	. . . . . . 7 ⊢ ((dom ◡(𝑓 ↾ ∪ 𝐷) = (𝑓 “ ∪ 𝐷) ∧ dom ◡(◡𝑔 ↾ (𝐴 ∖ ∪ 𝐷)) = (𝐵 ∖ (𝑓 “ ∪ 𝐷))) → (dom ◡(𝑓 ↾ ∪ 𝐷) ∩ dom ◡(◡𝑔 ↾ (𝐴 ∖ ∪ 𝐷))) = ((𝑓 “ ∪ 𝐷) ∩ (𝐵 ∖ (𝑓 “ ∪ 𝐷))))
18	9, 16, 17	sylancr 586	. . . . . 6 ⊢ (((dom 𝑔 = 𝐵 ∧ ran 𝑔 ⊆ 𝐴) ∧ Fun ◡𝑔) → (dom ◡(𝑓 ↾ ∪ 𝐷) ∩ dom ◡(◡𝑔 ↾ (𝐴 ∖ ∪ 𝐷))) = ((𝑓 “ ∪ 𝐷) ∩ (𝐵 ∖ (𝑓 “ ∪ 𝐷))))
19		disjdif 4402	. . . . . 6 ⊢ ((𝑓 “ ∪ 𝐷) ∩ (𝐵 ∖ (𝑓 “ ∪ 𝐷))) = ∅
20	18, 19	eqtrdi 2795	. . . . 5 ⊢ (((dom 𝑔 = 𝐵 ∧ ran 𝑔 ⊆ 𝐴) ∧ Fun ◡𝑔) → (dom ◡(𝑓 ↾ ∪ 𝐷) ∩ dom ◡(◡𝑔 ↾ (𝐴 ∖ ∪ 𝐷))) = ∅)
21	20	adantlll 714	. . . 4 ⊢ ((((Fun 𝑔 ∧ dom 𝑔 = 𝐵) ∧ ran 𝑔 ⊆ 𝐴) ∧ Fun ◡𝑔) → (dom ◡(𝑓 ↾ ∪ 𝐷) ∩ dom ◡(◡𝑔 ↾ (𝐴 ∖ ∪ 𝐷))) = ∅)
22	21	adantl 481	. . 3 ⊢ ((Fun ◡𝑓 ∧ (((Fun 𝑔 ∧ dom 𝑔 = 𝐵) ∧ ran 𝑔 ⊆ 𝐴) ∧ Fun ◡𝑔)) → (dom ◡(𝑓 ↾ ∪ 𝐷) ∩ dom ◡(◡𝑔 ↾ (𝐴 ∖ ∪ 𝐷))) = ∅)
23		funun 6464	. . 3 ⊢ (((Fun ◡(𝑓 ↾ ∪ 𝐷) ∧ Fun ◡(◡𝑔 ↾ (𝐴 ∖ ∪ 𝐷))) ∧ (dom ◡(𝑓 ↾ ∪ 𝐷) ∩ dom ◡(◡𝑔 ↾ (𝐴 ∖ ∪ 𝐷))) = ∅) → Fun (◡(𝑓 ↾ ∪ 𝐷) ∪ ◡(◡𝑔 ↾ (𝐴 ∖ ∪ 𝐷))))
24	6, 22, 23	syl2anc 583	. 2 ⊢ ((Fun ◡𝑓 ∧ (((Fun 𝑔 ∧ dom 𝑔 = 𝐵) ∧ ran 𝑔 ⊆ 𝐴) ∧ Fun ◡𝑔)) → Fun (◡(𝑓 ↾ ∪ 𝐷) ∪ ◡(◡𝑔 ↾ (𝐴 ∖ ∪ 𝐷))))
25		sbthlem.3	. . . . 5 ⊢ 𝐻 = ((𝑓 ↾ ∪ 𝐷) ∪ (◡𝑔 ↾ (𝐴 ∖ ∪ 𝐷)))
26	25	cnveqi 5772	. . . 4 ⊢ ◡𝐻 = ◡((𝑓 ↾ ∪ 𝐷) ∪ (◡𝑔 ↾ (𝐴 ∖ ∪ 𝐷)))
27		cnvun 6035	. . . 4 ⊢ ◡((𝑓 ↾ ∪ 𝐷) ∪ (◡𝑔 ↾ (𝐴 ∖ ∪ 𝐷))) = (◡(𝑓 ↾ ∪ 𝐷) ∪ ◡(◡𝑔 ↾ (𝐴 ∖ ∪ 𝐷)))
28	26, 27	eqtri 2766	. . 3 ⊢ ◡𝐻 = (◡(𝑓 ↾ ∪ 𝐷) ∪ ◡(◡𝑔 ↾ (𝐴 ∖ ∪ 𝐷)))
29	28	funeqi 6439	. 2 ⊢ (Fun ◡𝐻 ↔ Fun (◡(𝑓 ↾ ∪ 𝐷) ∪ ◡(◡𝑔 ↾ (𝐴 ∖ ∪ 𝐷))))
30	24, 29	sylibr 233	1 ⊢ ((Fun ◡𝑓 ∧ (((Fun 𝑔 ∧ dom 𝑔 = 𝐵) ∧ ran 𝑔 ⊆ 𝐴) ∧ Fun ◡𝑔)) → Fun ◡𝐻)

Syntax hints:   → wi 4   ∧ wa 395   = wceq 1539   ∈ wcel 2108  {cab 2715  Vcvv 3422   ∖ cdif 3880   ∪ cun 3881   ∩ cin 3882   ⊆ wss 3883  ∅c0 4253  ∪ cuni 4836  ^◡ccnv 5579  dom cdm 5580  ran crn 5581   ↾ cres 5582   “ cima 5583  Fun wfun 6412

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1799  ax-4 1813  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2110  ax-9 2118  ax-10 2139  ax-11 2156  ax-12 2173  ax-ext 2709  ax-sep 5218  ax-nul 5225  ax-pr 5347

This theorem depends on definitions:  df-bi 206  df-an 396  df-or 844  df-3an 1087  df-tru 1542  df-fal 1552  df-ex 1784  df-nf 1788  df-sb 2069  df-mo 2540  df-eu 2569  df-clab 2716  df-cleq 2730  df-clel 2817  df-nfc 2888  df-ral 3068  df-rex 3069  df-rab 3072  df-v 3424  df-dif 3886  df-un 3888  df-in 3890  df-ss 3900  df-nul 4254  df-if 4457  df-sn 4559  df-pr 4561  df-op 4565  df-uni 4837  df-br 5071  df-opab 5133  df-id 5480  df-xp 5586  df-rel 5587  df-cnv 5588  df-co 5589  df-dm 5590  df-rn 5591  df-res 5592  df-ima 5593  df-fun 6420

This theorem is referenced by:  sbthlem9  8831