Theorem sbthlem8 9113

Description: Lemma for sbth 9116. (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 6617	. . . 4 ⊢ (Fun ◡𝑓 → Fun ◡(𝑓 ↾ ∪ 𝐷))
2		funcnvcnv 6607	. . . . . 6 ⊢ (Fun 𝑔 → Fun ◡◡𝑔)
3		funres11 6617	. . . . . 6 ⊢ (Fun ◡◡𝑔 → Fun ◡(◡𝑔 ↾ (𝐴 ∖ ∪ 𝐷)))
4	2, 3	syl 18	. . . . 5 ⊢ (Fun 𝑔 → Fun ◡(◡𝑔 ↾ (𝐴 ∖ ∪ 𝐷)))
5	4	ad3antrrr 743	. . . 4 ⊢ ((((Fun 𝑔 ∧ dom 𝑔 = 𝐵) ∧ ran 𝑔 ⊆ 𝐴) ∧ Fun ◡𝑔) → Fun ◡(◡𝑔 ↾ (𝐴 ∖ ∪ 𝐷)))
6	1, 5	anim12i 625	. . 3 ⊢ ((Fun ◡𝑓 ∧ (((Fun 𝑔 ∧ dom 𝑔 = 𝐵) ∧ ran 𝑔 ⊆ 𝐴) ∧ Fun ◡𝑔)) → (Fun ◡(𝑓 ↾ ∪ 𝐷) ∧ Fun ◡(◡𝑔 ↾ (𝐴 ∖ ∪ 𝐷))))
7		df-ima 5664	. . . . . . . 8 ⊢ (𝑓 “ ∪ 𝐷) = ran (𝑓 ↾ ∪ 𝐷)
8		df-rn 5662	. . . . . . . 8 ⊢ ran (𝑓 ↾ ∪ 𝐷) = dom ◡(𝑓 ↾ ∪ 𝐷)
9	7, 8	eqtr2i 2785	. . . . . . 7 ⊢ dom ◡(𝑓 ↾ ∪ 𝐷) = (𝑓 “ ∪ 𝐷)
10		df-ima 5664	. . . . . . . . 9 ⊢ (◡𝑔 “ (𝐴 ∖ ∪ 𝐷)) = ran (◡𝑔 ↾ (𝐴 ∖ ∪ 𝐷))
11		df-rn 5662	. . . . . . . . 9 ⊢ ran (◡𝑔 ↾ (𝐴 ∖ ∪ 𝐷)) = dom ◡(◡𝑔 ↾ (𝐴 ∖ ∪ 𝐷))
12	10, 11	eqtri 2784	. . . . . . . 8 ⊢ (◡𝑔 “ (𝐴 ∖ ∪ 𝐷)) = dom ◡(◡𝑔 ↾ (𝐴 ∖ ∪ 𝐷))
13		sbthlem.1	. . . . . . . . 9 ⊢ 𝐴 ∈ V
14		sbthlem.2	. . . . . . . . 9 ⊢ 𝐷 = {𝑥 ∣ (𝑥 ⊆ 𝐴 ∧ (𝑔 “ (𝐵 ∖ (𝑓 “ 𝑥))) ⊆ (𝐴 ∖ 𝑥))}
15	13, 14	sbthlem4 9109	. . . . . . . 8 ⊢ (((dom 𝑔 = 𝐵 ∧ ran 𝑔 ⊆ 𝐴) ∧ Fun ◡𝑔) → (◡𝑔 “ (𝐴 ∖ ∪ 𝐷)) = (𝐵 ∖ (𝑓 “ ∪ 𝐷)))
16	12, 15	eqtr3id 2810	. . . . . . 7 ⊢ (((dom 𝑔 = 𝐵 ∧ ran 𝑔 ⊆ 𝐴) ∧ Fun ◡𝑔) → dom ◡(◡𝑔 ↾ (𝐴 ∖ ∪ 𝐷)) = (𝐵 ∖ (𝑓 “ ∪ 𝐷)))
17		ineq12 4161	. . . . . . 7 ⊢ ((dom ◡(𝑓 ↾ ∪ 𝐷) = (𝑓 “ ∪ 𝐷) ∧ dom ◡(◡𝑔 ↾ (𝐴 ∖ ∪ 𝐷)) = (𝐵 ∖ (𝑓 “ ∪ 𝐷))) → (dom ◡(𝑓 ↾ ∪ 𝐷) ∩ dom ◡(◡𝑔 ↾ (𝐴 ∖ ∪ 𝐷))) = ((𝑓 “ ∪ 𝐷) ∩ (𝐵 ∖ (𝑓 “ ∪ 𝐷))))
18	9, 16, 17	sylancr 599	. . . . . 6 ⊢ (((dom 𝑔 = 𝐵 ∧ ran 𝑔 ⊆ 𝐴) ∧ Fun ◡𝑔) → (dom ◡(𝑓 ↾ ∪ 𝐷) ∩ dom ◡(◡𝑔 ↾ (𝐴 ∖ ∪ 𝐷))) = ((𝑓 “ ∪ 𝐷) ∩ (𝐵 ∖ (𝑓 “ ∪ 𝐷))))
19		disjdif 4426	. . . . . 6 ⊢ ((𝑓 “ ∪ 𝐷) ∩ (𝐵 ∖ (𝑓 “ ∪ 𝐷))) = ∅
20	18, 19	eqtrdi 2812	. . . . 5 ⊢ (((dom 𝑔 = 𝐵 ∧ ran 𝑔 ⊆ 𝐴) ∧ Fun ◡𝑔) → (dom ◡(𝑓 ↾ ∪ 𝐷) ∩ dom ◡(◡𝑔 ↾ (𝐴 ∖ ∪ 𝐷))) = ∅)
21	20	adantlll 731	. . . 4 ⊢ ((((Fun 𝑔 ∧ dom 𝑔 = 𝐵) ∧ ran 𝑔 ⊆ 𝐴) ∧ Fun ◡𝑔) → (dom ◡(𝑓 ↾ ∪ 𝐷) ∩ dom ◡(◡𝑔 ↾ (𝐴 ∖ ∪ 𝐷))) = ∅)
22	21	adantl 487	. . 3 ⊢ ((Fun ◡𝑓 ∧ (((Fun 𝑔 ∧ dom 𝑔 = 𝐵) ∧ ran 𝑔 ⊆ 𝐴) ∧ Fun ◡𝑔)) → (dom ◡(𝑓 ↾ ∪ 𝐷) ∩ dom ◡(◡𝑔 ↾ (𝐴 ∖ ∪ 𝐷))) = ∅)
23		funun 6586	. . 3 ⊢ (((Fun ◡(𝑓 ↾ ∪ 𝐷) ∧ Fun ◡(◡𝑔 ↾ (𝐴 ∖ ∪ 𝐷))) ∧ (dom ◡(𝑓 ↾ ∪ 𝐷) ∩ dom ◡(◡𝑔 ↾ (𝐴 ∖ ∪ 𝐷))) = ∅) → Fun (◡(𝑓 ↾ ∪ 𝐷) ∪ ◡(◡𝑔 ↾ (𝐴 ∖ ∪ 𝐷))))
24	6, 22, 23	syl2anc 596	. 2 ⊢ ((Fun ◡𝑓 ∧ (((Fun 𝑔 ∧ dom 𝑔 = 𝐵) ∧ ran 𝑔 ⊆ 𝐴) ∧ Fun ◡𝑔)) → Fun (◡(𝑓 ↾ ∪ 𝐷) ∪ ◡(◡𝑔 ↾ (𝐴 ∖ ∪ 𝐷))))
25		sbthlem.3	. . . . 5 ⊢ 𝐻 = ((𝑓 ↾ ∪ 𝐷) ∪ (◡𝑔 ↾ (𝐴 ∖ ∪ 𝐷)))
26	25	cnveqi 5852	. . . 4 ⊢ ◡𝐻 = ◡((𝑓 ↾ ∪ 𝐷) ∪ (◡𝑔 ↾ (𝐴 ∖ ∪ 𝐷)))
27		cnvun 6133	. . . 4 ⊢ ◡((𝑓 ↾ ∪ 𝐷) ∪ (◡𝑔 ↾ (𝐴 ∖ ∪ 𝐷))) = (◡(𝑓 ↾ ∪ 𝐷) ∪ ◡(◡𝑔 ↾ (𝐴 ∖ ∪ 𝐷)))
28	26, 27	eqtri 2784	. . 3 ⊢ ◡𝐻 = (◡(𝑓 ↾ ∪ 𝐷) ∪ ◡(◡𝑔 ↾ (𝐴 ∖ ∪ 𝐷)))
29	28	funeqi 6560	. 2 ⊢ (Fun ◡𝐻 ↔ Fun (◡(𝑓 ↾ ∪ 𝐷) ∪ ◡(◡𝑔 ↾ (𝐴 ∖ ∪ 𝐷))))
30	24, 29	sylibr 237	1 ⊢ ((Fun ◡𝑓 ∧ (((Fun 𝑔 ∧ dom 𝑔 = 𝐵) ∧ ran 𝑔 ⊆ 𝐴) ∧ Fun ◡𝑔)) → Fun ◡𝐻)

This proof depends on syntax axioms:   → wi 4   ∧ wa 401   = wceq 1570   ∈ wcel 2145  {cab 2739  Vcvv 3451   ∖ cdif 3896   ∪ cun 3897   ∩ cin 3898   ⊆ wss 3899  ∅c0 4279  ∪ cuni 4867  ^◡ccnv 5650  dom cdm 5651  ran crn 5652   ↾ cres 5653   “ cima 5654  Fun wfun 6532

This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2147  ax-9 2155  ax-12 2213  ax-ext 2733  ax-sep 5249  ax-pr 5391

This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-sb 2100  df-mo 2565  df-eu 2595  df-clab 2740  df-cleq 2753  df-clel 2836  df-ral 3078  df-rex 3088  df-rab 3414  df-v 3453  df-dif 3902  df-un 3904  df-in 3906  df-ss 3916  df-nul 4280  df-if 4483  df-sn 4585  df-pr 4587  df-op 4591  df-uni 4868  df-br 5104  df-opab 5168  df-id 5546  df-xp 5657  df-rel 5658  df-cnv 5659  df-co 5660  df-dm 5661  df-rn 5662  df-res 5663  df-ima 5664  df-fun 6540

This theorem is used by:  sbthlem9  9114