Theorem boxcutc 8488

Description: The relative complement of a box set restricted on one axis. (Contributed by Stefan O'Rear, 22-Feb-2015.)

Assertion

Ref	Expression
boxcutc	⊢ ((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) → (X𝑘 ∈ 𝐴 𝐵 ∖ X𝑘 ∈ 𝐴 if(𝑘 = 𝑋, 𝐶, 𝐵)) = X𝑘 ∈ 𝐴 if(𝑘 = 𝑋, (𝐵 ∖ 𝐶), 𝐵))

Distinct variable groups:   𝐴,𝑘   𝑘,𝑋

Allowed substitution hints:   𝐵(𝑘)   𝐶(𝑘)

Proof of Theorem boxcutc

Dummy variables 𝑙 𝑚 𝑧 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		eldifi 4054	. . 3 ⊢ (𝑧 ∈ (X𝑘 ∈ 𝐴 𝐵 ∖ X𝑘 ∈ 𝐴 if(𝑘 = 𝑋, 𝐶, 𝐵)) → 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵)
2	1	adantl 485	. 2 ⊢ (((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ (X𝑘 ∈ 𝐴 𝐵 ∖ X𝑘 ∈ 𝐴 if(𝑘 = 𝑋, 𝐶, 𝐵))) → 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵)
3		sseq1 3940	. . . . . 6 ⊢ ((𝐵 ∖ 𝐶) = if(𝑘 = 𝑋, (𝐵 ∖ 𝐶), 𝐵) → ((𝐵 ∖ 𝐶) ⊆ 𝐵 ↔ if(𝑘 = 𝑋, (𝐵 ∖ 𝐶), 𝐵) ⊆ 𝐵))
4		sseq1 3940	. . . . . 6 ⊢ (𝐵 = if(𝑘 = 𝑋, (𝐵 ∖ 𝐶), 𝐵) → (𝐵 ⊆ 𝐵 ↔ if(𝑘 = 𝑋, (𝐵 ∖ 𝐶), 𝐵) ⊆ 𝐵))
5		difss 4059	. . . . . 6 ⊢ (𝐵 ∖ 𝐶) ⊆ 𝐵
6		ssid 3937	. . . . . 6 ⊢ 𝐵 ⊆ 𝐵
7	3, 4, 5, 6	keephyp 4494	. . . . 5 ⊢ if(𝑘 = 𝑋, (𝐵 ∖ 𝐶), 𝐵) ⊆ 𝐵
8	7	rgenw 3118	. . . 4 ⊢ ∀𝑘 ∈ 𝐴 if(𝑘 = 𝑋, (𝐵 ∖ 𝐶), 𝐵) ⊆ 𝐵
9		ss2ixp 8457	. . . 4 ⊢ (∀𝑘 ∈ 𝐴 if(𝑘 = 𝑋, (𝐵 ∖ 𝐶), 𝐵) ⊆ 𝐵 → X𝑘 ∈ 𝐴 if(𝑘 = 𝑋, (𝐵 ∖ 𝐶), 𝐵) ⊆ X𝑘 ∈ 𝐴 𝐵)
10	8, 9	mp1i 13	. . 3 ⊢ ((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) → X𝑘 ∈ 𝐴 if(𝑘 = 𝑋, (𝐵 ∖ 𝐶), 𝐵) ⊆ X𝑘 ∈ 𝐴 𝐵)
11	10	sselda 3915	. 2 ⊢ (((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 if(𝑘 = 𝑋, (𝐵 ∖ 𝐶), 𝐵)) → 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵)
12		vex 3444	. . . . . . . 8 ⊢ 𝑧 ∈ V
13	12	elixp 8451	. . . . . . 7 ⊢ (𝑧 ∈ X𝑘 ∈ 𝐴 if(𝑘 = 𝑋, 𝐶, 𝐵) ↔ (𝑧 Fn 𝐴 ∧ ∀𝑘 ∈ 𝐴 (𝑧‘𝑘) ∈ if(𝑘 = 𝑋, 𝐶, 𝐵)))
14		ixpfn 8450	. . . . . . . . 9 ⊢ (𝑧 ∈ X𝑘 ∈ 𝐴 𝐵 → 𝑧 Fn 𝐴)
15	14	adantl 485	. . . . . . . 8 ⊢ (((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) → 𝑧 Fn 𝐴)
16	15	biantrurd 536	. . . . . . 7 ⊢ (((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) → (∀𝑘 ∈ 𝐴 (𝑧‘𝑘) ∈ if(𝑘 = 𝑋, 𝐶, 𝐵) ↔ (𝑧 Fn 𝐴 ∧ ∀𝑘 ∈ 𝐴 (𝑧‘𝑘) ∈ if(𝑘 = 𝑋, 𝐶, 𝐵))))
17	13, 16	bitr4id 293	. . . . . 6 ⊢ (((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) → (𝑧 ∈ X𝑘 ∈ 𝐴 if(𝑘 = 𝑋, 𝐶, 𝐵) ↔ ∀𝑘 ∈ 𝐴 (𝑧‘𝑘) ∈ if(𝑘 = 𝑋, 𝐶, 𝐵)))
18	17	notbid 321	. . . . 5 ⊢ (((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) → (¬ 𝑧 ∈ X𝑘 ∈ 𝐴 if(𝑘 = 𝑋, 𝐶, 𝐵) ↔ ¬ ∀𝑘 ∈ 𝐴 (𝑧‘𝑘) ∈ if(𝑘 = 𝑋, 𝐶, 𝐵)))
19		rexnal 3201	. . . . . 6 ⊢ (∃𝑘 ∈ 𝐴 ¬ (𝑧‘𝑘) ∈ if(𝑘 = 𝑋, 𝐶, 𝐵) ↔ ¬ ∀𝑘 ∈ 𝐴 (𝑧‘𝑘) ∈ if(𝑘 = 𝑋, 𝐶, 𝐵))
20		eleq2 2878	. . . . . . . . . 10 ⊢ ((⦋𝑚 / 𝑘⦌𝐵 ∖ ⦋𝑚 / 𝑘⦌𝐶) = if(𝑚 = 𝑋, (⦋𝑚 / 𝑘⦌𝐵 ∖ ⦋𝑚 / 𝑘⦌𝐶), ⦋𝑚 / 𝑘⦌𝐵) → ((𝑧‘𝑚) ∈ (⦋𝑚 / 𝑘⦌𝐵 ∖ ⦋𝑚 / 𝑘⦌𝐶) ↔ (𝑧‘𝑚) ∈ if(𝑚 = 𝑋, (⦋𝑚 / 𝑘⦌𝐵 ∖ ⦋𝑚 / 𝑘⦌𝐶), ⦋𝑚 / 𝑘⦌𝐵)))
21		eleq2 2878	. . . . . . . . . 10 ⊢ (⦋𝑚 / 𝑘⦌𝐵 = if(𝑚 = 𝑋, (⦋𝑚 / 𝑘⦌𝐵 ∖ ⦋𝑚 / 𝑘⦌𝐶), ⦋𝑚 / 𝑘⦌𝐵) → ((𝑧‘𝑚) ∈ ⦋𝑚 / 𝑘⦌𝐵 ↔ (𝑧‘𝑚) ∈ if(𝑚 = 𝑋, (⦋𝑚 / 𝑘⦌𝐵 ∖ ⦋𝑚 / 𝑘⦌𝐶), ⦋𝑚 / 𝑘⦌𝐵)))
22		eleq2 2878	. . . . . . . . . . . . . . . . . . 19 ⊢ (⦋𝑙 / 𝑘⦌𝐶 = if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵) → ((𝑧‘𝑙) ∈ ⦋𝑙 / 𝑘⦌𝐶 ↔ (𝑧‘𝑙) ∈ if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵)))
23		eleq2 2878	. . . . . . . . . . . . . . . . . . 19 ⊢ (⦋𝑙 / 𝑘⦌𝐵 = if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵) → ((𝑧‘𝑙) ∈ ⦋𝑙 / 𝑘⦌𝐵 ↔ (𝑧‘𝑙) ∈ if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵)))
24		simpl 486	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) → 𝑋 ∈ 𝐴)
25	12	elixp 8451	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (𝑧 ∈ X𝑘 ∈ 𝐴 𝐵 ↔ (𝑧 Fn 𝐴 ∧ ∀𝑘 ∈ 𝐴 (𝑧‘𝑘) ∈ 𝐵))
26	25	simprbi 500	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝑧 ∈ X𝑘 ∈ 𝐴 𝐵 → ∀𝑘 ∈ 𝐴 (𝑧‘𝑘) ∈ 𝐵)
27		nfv 1915	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ Ⅎ𝑙(𝑧‘𝑘) ∈ 𝐵
28		nfcsb1v 3852	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ Ⅎ𝑘⦋𝑙 / 𝑘⦌𝐵
29	28	nfel2 2973	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ Ⅎ𝑘(𝑧‘𝑙) ∈ ⦋𝑙 / 𝑘⦌𝐵
30		fveq2 6645	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (𝑘 = 𝑙 → (𝑧‘𝑘) = (𝑧‘𝑙))
31		csbeq1a 3842	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (𝑘 = 𝑙 → 𝐵 = ⦋𝑙 / 𝑘⦌𝐵)
32	30, 31	eleq12d 2884	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (𝑘 = 𝑙 → ((𝑧‘𝑘) ∈ 𝐵 ↔ (𝑧‘𝑙) ∈ ⦋𝑙 / 𝑘⦌𝐵))
33	27, 29, 32	cbvralw 3387	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (∀𝑘 ∈ 𝐴 (𝑧‘𝑘) ∈ 𝐵 ↔ ∀𝑙 ∈ 𝐴 (𝑧‘𝑙) ∈ ⦋𝑙 / 𝑘⦌𝐵)
34	26, 33	sylib 221	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝑧 ∈ X𝑘 ∈ 𝐴 𝐵 → ∀𝑙 ∈ 𝐴 (𝑧‘𝑙) ∈ ⦋𝑙 / 𝑘⦌𝐵)
35		fveq2 6645	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (𝑙 = 𝑋 → (𝑧‘𝑙) = (𝑧‘𝑋))
36		csbeq1 3831	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (𝑙 = 𝑋 → ⦋𝑙 / 𝑘⦌𝐵 = ⦋𝑋 / 𝑘⦌𝐵)
37	35, 36	eleq12d 2884	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝑙 = 𝑋 → ((𝑧‘𝑙) ∈ ⦋𝑙 / 𝑘⦌𝐵 ↔ (𝑧‘𝑋) ∈ ⦋𝑋 / 𝑘⦌𝐵))
38	37	rspcva 3569	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((𝑋 ∈ 𝐴 ∧ ∀𝑙 ∈ 𝐴 (𝑧‘𝑙) ∈ ⦋𝑙 / 𝑘⦌𝐵) → (𝑧‘𝑋) ∈ ⦋𝑋 / 𝑘⦌𝐵)
39	24, 34, 38	syl2an 598	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) → (𝑧‘𝑋) ∈ ⦋𝑋 / 𝑘⦌𝐵)
40		neldif 4057	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((𝑧‘𝑋) ∈ ⦋𝑋 / 𝑘⦌𝐵 ∧ ¬ (𝑧‘𝑋) ∈ (⦋𝑋 / 𝑘⦌𝐵 ∖ ⦋𝑋 / 𝑘⦌𝐶)) → (𝑧‘𝑋) ∈ ⦋𝑋 / 𝑘⦌𝐶)
41	39, 40	sylan 583	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) ∧ ¬ (𝑧‘𝑋) ∈ (⦋𝑋 / 𝑘⦌𝐵 ∖ ⦋𝑋 / 𝑘⦌𝐶)) → (𝑧‘𝑋) ∈ ⦋𝑋 / 𝑘⦌𝐶)
42	41	adantr 484	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) ∧ ¬ (𝑧‘𝑋) ∈ (⦋𝑋 / 𝑘⦌𝐵 ∖ ⦋𝑋 / 𝑘⦌𝐶)) ∧ 𝑙 ∈ 𝐴) → (𝑧‘𝑋) ∈ ⦋𝑋 / 𝑘⦌𝐶)
43		csbeq1 3831	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑙 = 𝑋 → ⦋𝑙 / 𝑘⦌𝐶 = ⦋𝑋 / 𝑘⦌𝐶)
44	35, 43	eleq12d 2884	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑙 = 𝑋 → ((𝑧‘𝑙) ∈ ⦋𝑙 / 𝑘⦌𝐶 ↔ (𝑧‘𝑋) ∈ ⦋𝑋 / 𝑘⦌𝐶))
45	42, 44	syl5ibrcom 250	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) ∧ ¬ (𝑧‘𝑋) ∈ (⦋𝑋 / 𝑘⦌𝐵 ∖ ⦋𝑋 / 𝑘⦌𝐶)) ∧ 𝑙 ∈ 𝐴) → (𝑙 = 𝑋 → (𝑧‘𝑙) ∈ ⦋𝑙 / 𝑘⦌𝐶))
46	45	imp 410	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) ∧ ¬ (𝑧‘𝑋) ∈ (⦋𝑋 / 𝑘⦌𝐵 ∖ ⦋𝑋 / 𝑘⦌𝐶)) ∧ 𝑙 ∈ 𝐴) ∧ 𝑙 = 𝑋) → (𝑧‘𝑙) ∈ ⦋𝑙 / 𝑘⦌𝐶)
47	34	ad2antlr 726	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) ∧ ¬ (𝑧‘𝑋) ∈ (⦋𝑋 / 𝑘⦌𝐵 ∖ ⦋𝑋 / 𝑘⦌𝐶)) → ∀𝑙 ∈ 𝐴 (𝑧‘𝑙) ∈ ⦋𝑙 / 𝑘⦌𝐵)
48	47	r19.21bi 3173	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) ∧ ¬ (𝑧‘𝑋) ∈ (⦋𝑋 / 𝑘⦌𝐵 ∖ ⦋𝑋 / 𝑘⦌𝐶)) ∧ 𝑙 ∈ 𝐴) → (𝑧‘𝑙) ∈ ⦋𝑙 / 𝑘⦌𝐵)
49	48	adantr 484	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) ∧ ¬ (𝑧‘𝑋) ∈ (⦋𝑋 / 𝑘⦌𝐵 ∖ ⦋𝑋 / 𝑘⦌𝐶)) ∧ 𝑙 ∈ 𝐴) ∧ ¬ 𝑙 = 𝑋) → (𝑧‘𝑙) ∈ ⦋𝑙 / 𝑘⦌𝐵)
50	22, 23, 46, 49	ifbothda 4462	. . . . . . . . . . . . . . . . . 18 ⊢ (((((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) ∧ ¬ (𝑧‘𝑋) ∈ (⦋𝑋 / 𝑘⦌𝐵 ∖ ⦋𝑋 / 𝑘⦌𝐶)) ∧ 𝑙 ∈ 𝐴) → (𝑧‘𝑙) ∈ if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵))
51	50	ralrimiva 3149	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) ∧ ¬ (𝑧‘𝑋) ∈ (⦋𝑋 / 𝑘⦌𝐵 ∖ ⦋𝑋 / 𝑘⦌𝐶)) → ∀𝑙 ∈ 𝐴 (𝑧‘𝑙) ∈ if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵))
52		dfral2 3200	. . . . . . . . . . . . . . . . 17 ⊢ (∀𝑙 ∈ 𝐴 (𝑧‘𝑙) ∈ if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵) ↔ ¬ ∃𝑙 ∈ 𝐴 ¬ (𝑧‘𝑙) ∈ if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵))
53	51, 52	sylib 221	. . . . . . . . . . . . . . . 16 ⊢ ((((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) ∧ ¬ (𝑧‘𝑋) ∈ (⦋𝑋 / 𝑘⦌𝐵 ∖ ⦋𝑋 / 𝑘⦌𝐶)) → ¬ ∃𝑙 ∈ 𝐴 ¬ (𝑧‘𝑙) ∈ if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵))
54	53	ex 416	. . . . . . . . . . . . . . 15 ⊢ (((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) → (¬ (𝑧‘𝑋) ∈ (⦋𝑋 / 𝑘⦌𝐵 ∖ ⦋𝑋 / 𝑘⦌𝐶) → ¬ ∃𝑙 ∈ 𝐴 ¬ (𝑧‘𝑙) ∈ if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵)))
55	54	con4d 115	. . . . . . . . . . . . . 14 ⊢ (((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) → (∃𝑙 ∈ 𝐴 ¬ (𝑧‘𝑙) ∈ if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵) → (𝑧‘𝑋) ∈ (⦋𝑋 / 𝑘⦌𝐵 ∖ ⦋𝑋 / 𝑘⦌𝐶)))
56	55	imp 410	. . . . . . . . . . . . 13 ⊢ ((((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) ∧ ∃𝑙 ∈ 𝐴 ¬ (𝑧‘𝑙) ∈ if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵)) → (𝑧‘𝑋) ∈ (⦋𝑋 / 𝑘⦌𝐵 ∖ ⦋𝑋 / 𝑘⦌𝐶))
57	56	adantr 484	. . . . . . . . . . . 12 ⊢ (((((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) ∧ ∃𝑙 ∈ 𝐴 ¬ (𝑧‘𝑙) ∈ if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵)) ∧ 𝑚 ∈ 𝐴) → (𝑧‘𝑋) ∈ (⦋𝑋 / 𝑘⦌𝐵 ∖ ⦋𝑋 / 𝑘⦌𝐶))
58		fveq2 6645	. . . . . . . . . . . . 13 ⊢ (𝑚 = 𝑋 → (𝑧‘𝑚) = (𝑧‘𝑋))
59		csbeq1 3831	. . . . . . . . . . . . . 14 ⊢ (𝑚 = 𝑋 → ⦋𝑚 / 𝑘⦌𝐵 = ⦋𝑋 / 𝑘⦌𝐵)
60		csbeq1 3831	. . . . . . . . . . . . . 14 ⊢ (𝑚 = 𝑋 → ⦋𝑚 / 𝑘⦌𝐶 = ⦋𝑋 / 𝑘⦌𝐶)
61	59, 60	difeq12d 4051	. . . . . . . . . . . . 13 ⊢ (𝑚 = 𝑋 → (⦋𝑚 / 𝑘⦌𝐵 ∖ ⦋𝑚 / 𝑘⦌𝐶) = (⦋𝑋 / 𝑘⦌𝐵 ∖ ⦋𝑋 / 𝑘⦌𝐶))
62	58, 61	eleq12d 2884	. . . . . . . . . . . 12 ⊢ (𝑚 = 𝑋 → ((𝑧‘𝑚) ∈ (⦋𝑚 / 𝑘⦌𝐵 ∖ ⦋𝑚 / 𝑘⦌𝐶) ↔ (𝑧‘𝑋) ∈ (⦋𝑋 / 𝑘⦌𝐵 ∖ ⦋𝑋 / 𝑘⦌𝐶)))
63	57, 62	syl5ibrcom 250	. . . . . . . . . . 11 ⊢ (((((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) ∧ ∃𝑙 ∈ 𝐴 ¬ (𝑧‘𝑙) ∈ if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵)) ∧ 𝑚 ∈ 𝐴) → (𝑚 = 𝑋 → (𝑧‘𝑚) ∈ (⦋𝑚 / 𝑘⦌𝐵 ∖ ⦋𝑚 / 𝑘⦌𝐶)))
64	63	imp 410	. . . . . . . . . 10 ⊢ ((((((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) ∧ ∃𝑙 ∈ 𝐴 ¬ (𝑧‘𝑙) ∈ if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵)) ∧ 𝑚 ∈ 𝐴) ∧ 𝑚 = 𝑋) → (𝑧‘𝑚) ∈ (⦋𝑚 / 𝑘⦌𝐵 ∖ ⦋𝑚 / 𝑘⦌𝐶))
65		nfv 1915	. . . . . . . . . . . . . . 15 ⊢ Ⅎ𝑚(𝑧‘𝑘) ∈ 𝐵
66		nfcsb1v 3852	. . . . . . . . . . . . . . . 16 ⊢ Ⅎ𝑘⦋𝑚 / 𝑘⦌𝐵
67	66	nfel2 2973	. . . . . . . . . . . . . . 15 ⊢ Ⅎ𝑘(𝑧‘𝑚) ∈ ⦋𝑚 / 𝑘⦌𝐵
68		fveq2 6645	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 = 𝑚 → (𝑧‘𝑘) = (𝑧‘𝑚))
69		csbeq1a 3842	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 = 𝑚 → 𝐵 = ⦋𝑚 / 𝑘⦌𝐵)
70	68, 69	eleq12d 2884	. . . . . . . . . . . . . . 15 ⊢ (𝑘 = 𝑚 → ((𝑧‘𝑘) ∈ 𝐵 ↔ (𝑧‘𝑚) ∈ ⦋𝑚 / 𝑘⦌𝐵))
71	65, 67, 70	cbvralw 3387	. . . . . . . . . . . . . 14 ⊢ (∀𝑘 ∈ 𝐴 (𝑧‘𝑘) ∈ 𝐵 ↔ ∀𝑚 ∈ 𝐴 (𝑧‘𝑚) ∈ ⦋𝑚 / 𝑘⦌𝐵)
72	26, 71	sylib 221	. . . . . . . . . . . . 13 ⊢ (𝑧 ∈ X𝑘 ∈ 𝐴 𝐵 → ∀𝑚 ∈ 𝐴 (𝑧‘𝑚) ∈ ⦋𝑚 / 𝑘⦌𝐵)
73	72	ad2antlr 726	. . . . . . . . . . . 12 ⊢ ((((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) ∧ ∃𝑙 ∈ 𝐴 ¬ (𝑧‘𝑙) ∈ if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵)) → ∀𝑚 ∈ 𝐴 (𝑧‘𝑚) ∈ ⦋𝑚 / 𝑘⦌𝐵)
74	73	r19.21bi 3173	. . . . . . . . . . 11 ⊢ (((((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) ∧ ∃𝑙 ∈ 𝐴 ¬ (𝑧‘𝑙) ∈ if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵)) ∧ 𝑚 ∈ 𝐴) → (𝑧‘𝑚) ∈ ⦋𝑚 / 𝑘⦌𝐵)
75	74	adantr 484	. . . . . . . . . 10 ⊢ ((((((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) ∧ ∃𝑙 ∈ 𝐴 ¬ (𝑧‘𝑙) ∈ if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵)) ∧ 𝑚 ∈ 𝐴) ∧ ¬ 𝑚 = 𝑋) → (𝑧‘𝑚) ∈ ⦋𝑚 / 𝑘⦌𝐵)
76	20, 21, 64, 75	ifbothda 4462	. . . . . . . . 9 ⊢ (((((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) ∧ ∃𝑙 ∈ 𝐴 ¬ (𝑧‘𝑙) ∈ if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵)) ∧ 𝑚 ∈ 𝐴) → (𝑧‘𝑚) ∈ if(𝑚 = 𝑋, (⦋𝑚 / 𝑘⦌𝐵 ∖ ⦋𝑚 / 𝑘⦌𝐶), ⦋𝑚 / 𝑘⦌𝐵))
77	76	ralrimiva 3149	. . . . . . . 8 ⊢ ((((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) ∧ ∃𝑙 ∈ 𝐴 ¬ (𝑧‘𝑙) ∈ if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵)) → ∀𝑚 ∈ 𝐴 (𝑧‘𝑚) ∈ if(𝑚 = 𝑋, (⦋𝑚 / 𝑘⦌𝐵 ∖ ⦋𝑚 / 𝑘⦌𝐶), ⦋𝑚 / 𝑘⦌𝐵))
78		simpll 766	. . . . . . . . 9 ⊢ (((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) → 𝑋 ∈ 𝐴)
79		iftrue 4431	. . . . . . . . . . . . . 14 ⊢ (𝑚 = 𝑋 → if(𝑚 = 𝑋, (⦋𝑚 / 𝑘⦌𝐵 ∖ ⦋𝑚 / 𝑘⦌𝐶), ⦋𝑚 / 𝑘⦌𝐵) = (⦋𝑚 / 𝑘⦌𝐵 ∖ ⦋𝑚 / 𝑘⦌𝐶))
80	79, 61	eqtrd 2833	. . . . . . . . . . . . 13 ⊢ (𝑚 = 𝑋 → if(𝑚 = 𝑋, (⦋𝑚 / 𝑘⦌𝐵 ∖ ⦋𝑚 / 𝑘⦌𝐶), ⦋𝑚 / 𝑘⦌𝐵) = (⦋𝑋 / 𝑘⦌𝐵 ∖ ⦋𝑋 / 𝑘⦌𝐶))
81	58, 80	eleq12d 2884	. . . . . . . . . . . 12 ⊢ (𝑚 = 𝑋 → ((𝑧‘𝑚) ∈ if(𝑚 = 𝑋, (⦋𝑚 / 𝑘⦌𝐵 ∖ ⦋𝑚 / 𝑘⦌𝐶), ⦋𝑚 / 𝑘⦌𝐵) ↔ (𝑧‘𝑋) ∈ (⦋𝑋 / 𝑘⦌𝐵 ∖ ⦋𝑋 / 𝑘⦌𝐶)))
82	81	rspcva 3569	. . . . . . . . . . 11 ⊢ ((𝑋 ∈ 𝐴 ∧ ∀𝑚 ∈ 𝐴 (𝑧‘𝑚) ∈ if(𝑚 = 𝑋, (⦋𝑚 / 𝑘⦌𝐵 ∖ ⦋𝑚 / 𝑘⦌𝐶), ⦋𝑚 / 𝑘⦌𝐵)) → (𝑧‘𝑋) ∈ (⦋𝑋 / 𝑘⦌𝐵 ∖ ⦋𝑋 / 𝑘⦌𝐶))
83	78, 82	sylan 583	. . . . . . . . . 10 ⊢ ((((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) ∧ ∀𝑚 ∈ 𝐴 (𝑧‘𝑚) ∈ if(𝑚 = 𝑋, (⦋𝑚 / 𝑘⦌𝐵 ∖ ⦋𝑚 / 𝑘⦌𝐶), ⦋𝑚 / 𝑘⦌𝐵)) → (𝑧‘𝑋) ∈ (⦋𝑋 / 𝑘⦌𝐵 ∖ ⦋𝑋 / 𝑘⦌𝐶))
84	83	eldifbd 3894	. . . . . . . . 9 ⊢ ((((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) ∧ ∀𝑚 ∈ 𝐴 (𝑧‘𝑚) ∈ if(𝑚 = 𝑋, (⦋𝑚 / 𝑘⦌𝐵 ∖ ⦋𝑚 / 𝑘⦌𝐶), ⦋𝑚 / 𝑘⦌𝐵)) → ¬ (𝑧‘𝑋) ∈ ⦋𝑋 / 𝑘⦌𝐶)
85		iftrue 4431	. . . . . . . . . . . . 13 ⊢ (𝑙 = 𝑋 → if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵) = ⦋𝑙 / 𝑘⦌𝐶)
86	85, 43	eqtrd 2833	. . . . . . . . . . . 12 ⊢ (𝑙 = 𝑋 → if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵) = ⦋𝑋 / 𝑘⦌𝐶)
87	35, 86	eleq12d 2884	. . . . . . . . . . 11 ⊢ (𝑙 = 𝑋 → ((𝑧‘𝑙) ∈ if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵) ↔ (𝑧‘𝑋) ∈ ⦋𝑋 / 𝑘⦌𝐶))
88	87	notbid 321	. . . . . . . . . 10 ⊢ (𝑙 = 𝑋 → (¬ (𝑧‘𝑙) ∈ if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵) ↔ ¬ (𝑧‘𝑋) ∈ ⦋𝑋 / 𝑘⦌𝐶))
89	88	rspcev 3571	. . . . . . . . 9 ⊢ ((𝑋 ∈ 𝐴 ∧ ¬ (𝑧‘𝑋) ∈ ⦋𝑋 / 𝑘⦌𝐶) → ∃𝑙 ∈ 𝐴 ¬ (𝑧‘𝑙) ∈ if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵))
90	78, 84, 89	syl2an2r 684	. . . . . . . 8 ⊢ ((((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) ∧ ∀𝑚 ∈ 𝐴 (𝑧‘𝑚) ∈ if(𝑚 = 𝑋, (⦋𝑚 / 𝑘⦌𝐵 ∖ ⦋𝑚 / 𝑘⦌𝐶), ⦋𝑚 / 𝑘⦌𝐵)) → ∃𝑙 ∈ 𝐴 ¬ (𝑧‘𝑙) ∈ if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵))
91	77, 90	impbida 800	. . . . . . 7 ⊢ (((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) → (∃𝑙 ∈ 𝐴 ¬ (𝑧‘𝑙) ∈ if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵) ↔ ∀𝑚 ∈ 𝐴 (𝑧‘𝑚) ∈ if(𝑚 = 𝑋, (⦋𝑚 / 𝑘⦌𝐵 ∖ ⦋𝑚 / 𝑘⦌𝐶), ⦋𝑚 / 𝑘⦌𝐵)))
92		nfv 1915	. . . . . . . 8 ⊢ Ⅎ𝑙 ¬ (𝑧‘𝑘) ∈ if(𝑘 = 𝑋, 𝐶, 𝐵)
93		nfv 1915	. . . . . . . . . . 11 ⊢ Ⅎ𝑘 𝑙 = 𝑋
94		nfcsb1v 3852	. . . . . . . . . . 11 ⊢ Ⅎ𝑘⦋𝑙 / 𝑘⦌𝐶
95	93, 94, 28	nfif 4454	. . . . . . . . . 10 ⊢ Ⅎ𝑘if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵)
96	95	nfel2 2973	. . . . . . . . 9 ⊢ Ⅎ𝑘(𝑧‘𝑙) ∈ if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵)
97	96	nfn 1858	. . . . . . . 8 ⊢ Ⅎ𝑘 ¬ (𝑧‘𝑙) ∈ if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵)
98		eqeq1 2802	. . . . . . . . . . 11 ⊢ (𝑘 = 𝑙 → (𝑘 = 𝑋 ↔ 𝑙 = 𝑋))
99		csbeq1a 3842	. . . . . . . . . . 11 ⊢ (𝑘 = 𝑙 → 𝐶 = ⦋𝑙 / 𝑘⦌𝐶)
100	98, 99, 31	ifbieq12d 4452	. . . . . . . . . 10 ⊢ (𝑘 = 𝑙 → if(𝑘 = 𝑋, 𝐶, 𝐵) = if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵))
101	30, 100	eleq12d 2884	. . . . . . . . 9 ⊢ (𝑘 = 𝑙 → ((𝑧‘𝑘) ∈ if(𝑘 = 𝑋, 𝐶, 𝐵) ↔ (𝑧‘𝑙) ∈ if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵)))
102	101	notbid 321	. . . . . . . 8 ⊢ (𝑘 = 𝑙 → (¬ (𝑧‘𝑘) ∈ if(𝑘 = 𝑋, 𝐶, 𝐵) ↔ ¬ (𝑧‘𝑙) ∈ if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵)))
103	92, 97, 102	cbvrexw 3388	. . . . . . 7 ⊢ (∃𝑘 ∈ 𝐴 ¬ (𝑧‘𝑘) ∈ if(𝑘 = 𝑋, 𝐶, 𝐵) ↔ ∃𝑙 ∈ 𝐴 ¬ (𝑧‘𝑙) ∈ if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵))
104		nfv 1915	. . . . . . . 8 ⊢ Ⅎ𝑚(𝑧‘𝑘) ∈ if(𝑘 = 𝑋, (𝐵 ∖ 𝐶), 𝐵)
105		nfv 1915	. . . . . . . . . 10 ⊢ Ⅎ𝑘 𝑚 = 𝑋
106		nfcsb1v 3852	. . . . . . . . . . 11 ⊢ Ⅎ𝑘⦋𝑚 / 𝑘⦌𝐶
107	66, 106	nfdif 4053	. . . . . . . . . 10 ⊢ Ⅎ𝑘(⦋𝑚 / 𝑘⦌𝐵 ∖ ⦋𝑚 / 𝑘⦌𝐶)
108	105, 107, 66	nfif 4454	. . . . . . . . 9 ⊢ Ⅎ𝑘if(𝑚 = 𝑋, (⦋𝑚 / 𝑘⦌𝐵 ∖ ⦋𝑚 / 𝑘⦌𝐶), ⦋𝑚 / 𝑘⦌𝐵)
109	108	nfel2 2973	. . . . . . . 8 ⊢ Ⅎ𝑘(𝑧‘𝑚) ∈ if(𝑚 = 𝑋, (⦋𝑚 / 𝑘⦌𝐵 ∖ ⦋𝑚 / 𝑘⦌𝐶), ⦋𝑚 / 𝑘⦌𝐵)
110		eqeq1 2802	. . . . . . . . . 10 ⊢ (𝑘 = 𝑚 → (𝑘 = 𝑋 ↔ 𝑚 = 𝑋))
111		csbeq1a 3842	. . . . . . . . . . 11 ⊢ (𝑘 = 𝑚 → 𝐶 = ⦋𝑚 / 𝑘⦌𝐶)
112	69, 111	difeq12d 4051	. . . . . . . . . 10 ⊢ (𝑘 = 𝑚 → (𝐵 ∖ 𝐶) = (⦋𝑚 / 𝑘⦌𝐵 ∖ ⦋𝑚 / 𝑘⦌𝐶))
113	110, 112, 69	ifbieq12d 4452	. . . . . . . . 9 ⊢ (𝑘 = 𝑚 → if(𝑘 = 𝑋, (𝐵 ∖ 𝐶), 𝐵) = if(𝑚 = 𝑋, (⦋𝑚 / 𝑘⦌𝐵 ∖ ⦋𝑚 / 𝑘⦌𝐶), ⦋𝑚 / 𝑘⦌𝐵))
114	68, 113	eleq12d 2884	. . . . . . . 8 ⊢ (𝑘 = 𝑚 → ((𝑧‘𝑘) ∈ if(𝑘 = 𝑋, (𝐵 ∖ 𝐶), 𝐵) ↔ (𝑧‘𝑚) ∈ if(𝑚 = 𝑋, (⦋𝑚 / 𝑘⦌𝐵 ∖ ⦋𝑚 / 𝑘⦌𝐶), ⦋𝑚 / 𝑘⦌𝐵)))
115	104, 109, 114	cbvralw 3387	. . . . . . 7 ⊢ (∀𝑘 ∈ 𝐴 (𝑧‘𝑘) ∈ if(𝑘 = 𝑋, (𝐵 ∖ 𝐶), 𝐵) ↔ ∀𝑚 ∈ 𝐴 (𝑧‘𝑚) ∈ if(𝑚 = 𝑋, (⦋𝑚 / 𝑘⦌𝐵 ∖ ⦋𝑚 / 𝑘⦌𝐶), ⦋𝑚 / 𝑘⦌𝐵))
116	91, 103, 115	3bitr4g 317	. . . . . 6 ⊢ (((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) → (∃𝑘 ∈ 𝐴 ¬ (𝑧‘𝑘) ∈ if(𝑘 = 𝑋, 𝐶, 𝐵) ↔ ∀𝑘 ∈ 𝐴 (𝑧‘𝑘) ∈ if(𝑘 = 𝑋, (𝐵 ∖ 𝐶), 𝐵)))
117	19, 116	bitr3id 288	. . . . 5 ⊢ (((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) → (¬ ∀𝑘 ∈ 𝐴 (𝑧‘𝑘) ∈ if(𝑘 = 𝑋, 𝐶, 𝐵) ↔ ∀𝑘 ∈ 𝐴 (𝑧‘𝑘) ∈ if(𝑘 = 𝑋, (𝐵 ∖ 𝐶), 𝐵)))
118	18, 117	bitrd 282	. . . 4 ⊢ (((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) → (¬ 𝑧 ∈ X𝑘 ∈ 𝐴 if(𝑘 = 𝑋, 𝐶, 𝐵) ↔ ∀𝑘 ∈ 𝐴 (𝑧‘𝑘) ∈ if(𝑘 = 𝑋, (𝐵 ∖ 𝐶), 𝐵)))
119		ibar 532	. . . . 5 ⊢ (𝑧 ∈ X𝑘 ∈ 𝐴 𝐵 → (¬ 𝑧 ∈ X𝑘 ∈ 𝐴 if(𝑘 = 𝑋, 𝐶, 𝐵) ↔ (𝑧 ∈ X𝑘 ∈ 𝐴 𝐵 ∧ ¬ 𝑧 ∈ X𝑘 ∈ 𝐴 if(𝑘 = 𝑋, 𝐶, 𝐵))))
120	119	adantl 485	. . . 4 ⊢ (((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) → (¬ 𝑧 ∈ X𝑘 ∈ 𝐴 if(𝑘 = 𝑋, 𝐶, 𝐵) ↔ (𝑧 ∈ X𝑘 ∈ 𝐴 𝐵 ∧ ¬ 𝑧 ∈ X𝑘 ∈ 𝐴 if(𝑘 = 𝑋, 𝐶, 𝐵))))
121	15	biantrurd 536	. . . 4 ⊢ (((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) → (∀𝑘 ∈ 𝐴 (𝑧‘𝑘) ∈ if(𝑘 = 𝑋, (𝐵 ∖ 𝐶), 𝐵) ↔ (𝑧 Fn 𝐴 ∧ ∀𝑘 ∈ 𝐴 (𝑧‘𝑘) ∈ if(𝑘 = 𝑋, (𝐵 ∖ 𝐶), 𝐵))))
122	118, 120, 121	3bitr3d 312	. . 3 ⊢ (((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) → ((𝑧 ∈ X𝑘 ∈ 𝐴 𝐵 ∧ ¬ 𝑧 ∈ X𝑘 ∈ 𝐴 if(𝑘 = 𝑋, 𝐶, 𝐵)) ↔ (𝑧 Fn 𝐴 ∧ ∀𝑘 ∈ 𝐴 (𝑧‘𝑘) ∈ if(𝑘 = 𝑋, (𝐵 ∖ 𝐶), 𝐵))))
123		eldif 3891	. . 3 ⊢ (𝑧 ∈ (X𝑘 ∈ 𝐴 𝐵 ∖ X𝑘 ∈ 𝐴 if(𝑘 = 𝑋, 𝐶, 𝐵)) ↔ (𝑧 ∈ X𝑘 ∈ 𝐴 𝐵 ∧ ¬ 𝑧 ∈ X𝑘 ∈ 𝐴 if(𝑘 = 𝑋, 𝐶, 𝐵)))
124	12	elixp 8451	. . 3 ⊢ (𝑧 ∈ X𝑘 ∈ 𝐴 if(𝑘 = 𝑋, (𝐵 ∖ 𝐶), 𝐵) ↔ (𝑧 Fn 𝐴 ∧ ∀𝑘 ∈ 𝐴 (𝑧‘𝑘) ∈ if(𝑘 = 𝑋, (𝐵 ∖ 𝐶), 𝐵)))
125	122, 123, 124	3bitr4g 317	. 2 ⊢ (((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) → (𝑧 ∈ (X𝑘 ∈ 𝐴 𝐵 ∖ X𝑘 ∈ 𝐴 if(𝑘 = 𝑋, 𝐶, 𝐵)) ↔ 𝑧 ∈ X𝑘 ∈ 𝐴 if(𝑘 = 𝑋, (𝐵 ∖ 𝐶), 𝐵)))
126	2, 11, 125	eqrdav 2797	1 ⊢ ((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) → (X𝑘 ∈ 𝐴 𝐵 ∖ X𝑘 ∈ 𝐴 if(𝑘 = 𝑋, 𝐶, 𝐵)) = X𝑘 ∈ 𝐴 if(𝑘 = 𝑋, (𝐵 ∖ 𝐶), 𝐵))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 209   ∧ wa 399   = wceq 1538   ∈ wcel 2111  ∀wral 3106  ∃wrex 3107  ⦋csb 3828   ∖ cdif 3878   ⊆ wss 3881  ifcif 4425   Fn wfn 6319  ‘cfv 6324  Xcixp 8444

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1911  ax-6 1970  ax-7 2015  ax-8 2113  ax-9 2121  ax-10 2142  ax-11 2158  ax-12 2175  ax-ext 2770

This theorem depends on definitions:  df-bi 210  df-an 400  df-or 845  df-3an 1086  df-tru 1541  df-ex 1782  df-nf 1786  df-sb 2070  df-clab 2777  df-cleq 2791  df-clel 2870  df-nfc 2938  df-ral 3111  df-rex 3112  df-rab 3115  df-v 3443  df-sbc 3721  df-csb 3829  df-dif 3884  df-un 3886  df-in 3888  df-ss 3898  df-if 4426  df-sn 4526  df-pr 4528  df-op 4532  df-uni 4801  df-br 5031  df-opab 5093  df-rel 5526  df-cnv 5527  df-co 5528  df-dm 5529  df-iota 6283  df-fun 6326  df-fn 6327  df-fv 6332  df-ixp 8445

This theorem is referenced by:  ptcld  22218