Theorem boxcutc 7951

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 3732	. . 3 ⊢ (𝑧 ∈ (X𝑘 ∈ 𝐴 𝐵 ∖ X𝑘 ∈ 𝐴 if(𝑘 = 𝑋, 𝐶, 𝐵)) → 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵)
2	1	adantl 482	. 2 ⊢ (((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ (X𝑘 ∈ 𝐴 𝐵 ∖ X𝑘 ∈ 𝐴 if(𝑘 = 𝑋, 𝐶, 𝐵))) → 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵)
3		sseq1 3626	. . . . . 6 ⊢ ((𝐵 ∖ 𝐶) = if(𝑘 = 𝑋, (𝐵 ∖ 𝐶), 𝐵) → ((𝐵 ∖ 𝐶) ⊆ 𝐵 ↔ if(𝑘 = 𝑋, (𝐵 ∖ 𝐶), 𝐵) ⊆ 𝐵))
4		sseq1 3626	. . . . . 6 ⊢ (𝐵 = if(𝑘 = 𝑋, (𝐵 ∖ 𝐶), 𝐵) → (𝐵 ⊆ 𝐵 ↔ if(𝑘 = 𝑋, (𝐵 ∖ 𝐶), 𝐵) ⊆ 𝐵))
5		difss 3737	. . . . . 6 ⊢ (𝐵 ∖ 𝐶) ⊆ 𝐵
6		ssid 3624	. . . . . 6 ⊢ 𝐵 ⊆ 𝐵
7	3, 4, 5, 6	keephyp 4152	. . . . 5 ⊢ if(𝑘 = 𝑋, (𝐵 ∖ 𝐶), 𝐵) ⊆ 𝐵
8	7	rgenw 2924	. . . 4 ⊢ ∀𝑘 ∈ 𝐴 if(𝑘 = 𝑋, (𝐵 ∖ 𝐶), 𝐵) ⊆ 𝐵
9		ss2ixp 7921	. . . 4 ⊢ (∀𝑘 ∈ 𝐴 if(𝑘 = 𝑋, (𝐵 ∖ 𝐶), 𝐵) ⊆ 𝐵 → X𝑘 ∈ 𝐴 if(𝑘 = 𝑋, (𝐵 ∖ 𝐶), 𝐵) ⊆ X𝑘 ∈ 𝐴 𝐵)
10	8, 9	mp1i 13	. . 3 ⊢ ((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) → X𝑘 ∈ 𝐴 if(𝑘 = 𝑋, (𝐵 ∖ 𝐶), 𝐵) ⊆ X𝑘 ∈ 𝐴 𝐵)
11	10	sselda 3603	. 2 ⊢ (((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 if(𝑘 = 𝑋, (𝐵 ∖ 𝐶), 𝐵)) → 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵)
12		ixpfn 7914	. . . . . . . . 9 ⊢ (𝑧 ∈ X𝑘 ∈ 𝐴 𝐵 → 𝑧 Fn 𝐴)
13	12	adantl 482	. . . . . . . 8 ⊢ (((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) → 𝑧 Fn 𝐴)
14	13	biantrurd 529	. . . . . . 7 ⊢ (((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) → (∀𝑘 ∈ 𝐴 (𝑧‘𝑘) ∈ if(𝑘 = 𝑋, 𝐶, 𝐵) ↔ (𝑧 Fn 𝐴 ∧ ∀𝑘 ∈ 𝐴 (𝑧‘𝑘) ∈ if(𝑘 = 𝑋, 𝐶, 𝐵))))
15		vex 3203	. . . . . . . 8 ⊢ 𝑧 ∈ V
16	15	elixp 7915	. . . . . . 7 ⊢ (𝑧 ∈ X𝑘 ∈ 𝐴 if(𝑘 = 𝑋, 𝐶, 𝐵) ↔ (𝑧 Fn 𝐴 ∧ ∀𝑘 ∈ 𝐴 (𝑧‘𝑘) ∈ if(𝑘 = 𝑋, 𝐶, 𝐵)))
17	14, 16	syl6rbbr 279	. . . . . 6 ⊢ (((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) → (𝑧 ∈ X𝑘 ∈ 𝐴 if(𝑘 = 𝑋, 𝐶, 𝐵) ↔ ∀𝑘 ∈ 𝐴 (𝑧‘𝑘) ∈ if(𝑘 = 𝑋, 𝐶, 𝐵)))
18	17	notbid 308	. . . . 5 ⊢ (((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) → (¬ 𝑧 ∈ X𝑘 ∈ 𝐴 if(𝑘 = 𝑋, 𝐶, 𝐵) ↔ ¬ ∀𝑘 ∈ 𝐴 (𝑧‘𝑘) ∈ if(𝑘 = 𝑋, 𝐶, 𝐵)))
19		rexnal 2995	. . . . . 6 ⊢ (∃𝑘 ∈ 𝐴 ¬ (𝑧‘𝑘) ∈ if(𝑘 = 𝑋, 𝐶, 𝐵) ↔ ¬ ∀𝑘 ∈ 𝐴 (𝑧‘𝑘) ∈ if(𝑘 = 𝑋, 𝐶, 𝐵))
20		eleq2 2690	. . . . . . . . . 10 ⊢ ((⦋𝑚 / 𝑘⦌𝐵 ∖ ⦋𝑚 / 𝑘⦌𝐶) = if(𝑚 = 𝑋, (⦋𝑚 / 𝑘⦌𝐵 ∖ ⦋𝑚 / 𝑘⦌𝐶), ⦋𝑚 / 𝑘⦌𝐵) → ((𝑧‘𝑚) ∈ (⦋𝑚 / 𝑘⦌𝐵 ∖ ⦋𝑚 / 𝑘⦌𝐶) ↔ (𝑧‘𝑚) ∈ if(𝑚 = 𝑋, (⦋𝑚 / 𝑘⦌𝐵 ∖ ⦋𝑚 / 𝑘⦌𝐶), ⦋𝑚 / 𝑘⦌𝐵)))
21		eleq2 2690	. . . . . . . . . 10 ⊢ (⦋𝑚 / 𝑘⦌𝐵 = if(𝑚 = 𝑋, (⦋𝑚 / 𝑘⦌𝐵 ∖ ⦋𝑚 / 𝑘⦌𝐶), ⦋𝑚 / 𝑘⦌𝐵) → ((𝑧‘𝑚) ∈ ⦋𝑚 / 𝑘⦌𝐵 ↔ (𝑧‘𝑚) ∈ if(𝑚 = 𝑋, (⦋𝑚 / 𝑘⦌𝐵 ∖ ⦋𝑚 / 𝑘⦌𝐶), ⦋𝑚 / 𝑘⦌𝐵)))
22		eleq2 2690	. . . . . . . . . . . . . . . . . . 19 ⊢ (⦋𝑙 / 𝑘⦌𝐶 = if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵) → ((𝑧‘𝑙) ∈ ⦋𝑙 / 𝑘⦌𝐶 ↔ (𝑧‘𝑙) ∈ if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵)))
23		eleq2 2690	. . . . . . . . . . . . . . . . . . 19 ⊢ (⦋𝑙 / 𝑘⦌𝐵 = if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵) → ((𝑧‘𝑙) ∈ ⦋𝑙 / 𝑘⦌𝐵 ↔ (𝑧‘𝑙) ∈ if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵)))
24		simpl 473	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) → 𝑋 ∈ 𝐴)
25	15	elixp 7915	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (𝑧 ∈ X𝑘 ∈ 𝐴 𝐵 ↔ (𝑧 Fn 𝐴 ∧ ∀𝑘 ∈ 𝐴 (𝑧‘𝑘) ∈ 𝐵))
26	25	simprbi 480	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝑧 ∈ X𝑘 ∈ 𝐴 𝐵 → ∀𝑘 ∈ 𝐴 (𝑧‘𝑘) ∈ 𝐵)
27		nfv 1843	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ Ⅎ𝑙(𝑧‘𝑘) ∈ 𝐵
28		nfcsb1v 3549	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ Ⅎ𝑘⦋𝑙 / 𝑘⦌𝐵
29	28	nfel2 2781	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ Ⅎ𝑘(𝑧‘𝑙) ∈ ⦋𝑙 / 𝑘⦌𝐵
30		fveq2 6191	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (𝑘 = 𝑙 → (𝑧‘𝑘) = (𝑧‘𝑙))
31		csbeq1a 3542	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (𝑘 = 𝑙 → 𝐵 = ⦋𝑙 / 𝑘⦌𝐵)
32	30, 31	eleq12d 2695	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (𝑘 = 𝑙 → ((𝑧‘𝑘) ∈ 𝐵 ↔ (𝑧‘𝑙) ∈ ⦋𝑙 / 𝑘⦌𝐵))
33	27, 29, 32	cbvral 3167	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (∀𝑘 ∈ 𝐴 (𝑧‘𝑘) ∈ 𝐵 ↔ ∀𝑙 ∈ 𝐴 (𝑧‘𝑙) ∈ ⦋𝑙 / 𝑘⦌𝐵)
34	26, 33	sylib 208	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝑧 ∈ X𝑘 ∈ 𝐴 𝐵 → ∀𝑙 ∈ 𝐴 (𝑧‘𝑙) ∈ ⦋𝑙 / 𝑘⦌𝐵)
35		fveq2 6191	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (𝑙 = 𝑋 → (𝑧‘𝑙) = (𝑧‘𝑋))
36		csbeq1 3536	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (𝑙 = 𝑋 → ⦋𝑙 / 𝑘⦌𝐵 = ⦋𝑋 / 𝑘⦌𝐵)
37	35, 36	eleq12d 2695	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝑙 = 𝑋 → ((𝑧‘𝑙) ∈ ⦋𝑙 / 𝑘⦌𝐵 ↔ (𝑧‘𝑋) ∈ ⦋𝑋 / 𝑘⦌𝐵))
38	37	rspcva 3307	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((𝑋 ∈ 𝐴 ∧ ∀𝑙 ∈ 𝐴 (𝑧‘𝑙) ∈ ⦋𝑙 / 𝑘⦌𝐵) → (𝑧‘𝑋) ∈ ⦋𝑋 / 𝑘⦌𝐵)
39	24, 34, 38	syl2an 494	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) → (𝑧‘𝑋) ∈ ⦋𝑋 / 𝑘⦌𝐵)
40		neldif 3735	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((𝑧‘𝑋) ∈ ⦋𝑋 / 𝑘⦌𝐵 ∧ ¬ (𝑧‘𝑋) ∈ (⦋𝑋 / 𝑘⦌𝐵 ∖ ⦋𝑋 / 𝑘⦌𝐶)) → (𝑧‘𝑋) ∈ ⦋𝑋 / 𝑘⦌𝐶)
41	39, 40	sylan 488	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) ∧ ¬ (𝑧‘𝑋) ∈ (⦋𝑋 / 𝑘⦌𝐵 ∖ ⦋𝑋 / 𝑘⦌𝐶)) → (𝑧‘𝑋) ∈ ⦋𝑋 / 𝑘⦌𝐶)
42	41	adantr 481	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) ∧ ¬ (𝑧‘𝑋) ∈ (⦋𝑋 / 𝑘⦌𝐵 ∖ ⦋𝑋 / 𝑘⦌𝐶)) ∧ 𝑙 ∈ 𝐴) → (𝑧‘𝑋) ∈ ⦋𝑋 / 𝑘⦌𝐶)
43		csbeq1 3536	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑙 = 𝑋 → ⦋𝑙 / 𝑘⦌𝐶 = ⦋𝑋 / 𝑘⦌𝐶)
44	35, 43	eleq12d 2695	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑙 = 𝑋 → ((𝑧‘𝑙) ∈ ⦋𝑙 / 𝑘⦌𝐶 ↔ (𝑧‘𝑋) ∈ ⦋𝑋 / 𝑘⦌𝐶))
45	42, 44	syl5ibrcom 237	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) ∧ ¬ (𝑧‘𝑋) ∈ (⦋𝑋 / 𝑘⦌𝐵 ∖ ⦋𝑋 / 𝑘⦌𝐶)) ∧ 𝑙 ∈ 𝐴) → (𝑙 = 𝑋 → (𝑧‘𝑙) ∈ ⦋𝑙 / 𝑘⦌𝐶))
46	45	imp 445	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) ∧ ¬ (𝑧‘𝑋) ∈ (⦋𝑋 / 𝑘⦌𝐵 ∖ ⦋𝑋 / 𝑘⦌𝐶)) ∧ 𝑙 ∈ 𝐴) ∧ 𝑙 = 𝑋) → (𝑧‘𝑙) ∈ ⦋𝑙 / 𝑘⦌𝐶)
47	34	ad2antlr 763	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) ∧ ¬ (𝑧‘𝑋) ∈ (⦋𝑋 / 𝑘⦌𝐵 ∖ ⦋𝑋 / 𝑘⦌𝐶)) → ∀𝑙 ∈ 𝐴 (𝑧‘𝑙) ∈ ⦋𝑙 / 𝑘⦌𝐵)
48	47	r19.21bi 2932	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) ∧ ¬ (𝑧‘𝑋) ∈ (⦋𝑋 / 𝑘⦌𝐵 ∖ ⦋𝑋 / 𝑘⦌𝐶)) ∧ 𝑙 ∈ 𝐴) → (𝑧‘𝑙) ∈ ⦋𝑙 / 𝑘⦌𝐵)
49	48	adantr 481	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) ∧ ¬ (𝑧‘𝑋) ∈ (⦋𝑋 / 𝑘⦌𝐵 ∖ ⦋𝑋 / 𝑘⦌𝐶)) ∧ 𝑙 ∈ 𝐴) ∧ ¬ 𝑙 = 𝑋) → (𝑧‘𝑙) ∈ ⦋𝑙 / 𝑘⦌𝐵)
50	22, 23, 46, 49	ifbothda 4123	. . . . . . . . . . . . . . . . . 18 ⊢ (((((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) ∧ ¬ (𝑧‘𝑋) ∈ (⦋𝑋 / 𝑘⦌𝐵 ∖ ⦋𝑋 / 𝑘⦌𝐶)) ∧ 𝑙 ∈ 𝐴) → (𝑧‘𝑙) ∈ if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵))
51	50	ralrimiva 2966	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) ∧ ¬ (𝑧‘𝑋) ∈ (⦋𝑋 / 𝑘⦌𝐵 ∖ ⦋𝑋 / 𝑘⦌𝐶)) → ∀𝑙 ∈ 𝐴 (𝑧‘𝑙) ∈ if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵))
52		dfral2 2994	. . . . . . . . . . . . . . . . 17 ⊢ (∀𝑙 ∈ 𝐴 (𝑧‘𝑙) ∈ if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵) ↔ ¬ ∃𝑙 ∈ 𝐴 ¬ (𝑧‘𝑙) ∈ if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵))
53	51, 52	sylib 208	. . . . . . . . . . . . . . . 16 ⊢ ((((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) ∧ ¬ (𝑧‘𝑋) ∈ (⦋𝑋 / 𝑘⦌𝐵 ∖ ⦋𝑋 / 𝑘⦌𝐶)) → ¬ ∃𝑙 ∈ 𝐴 ¬ (𝑧‘𝑙) ∈ if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵))
54	53	ex 450	. . . . . . . . . . . . . . 15 ⊢ (((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) → (¬ (𝑧‘𝑋) ∈ (⦋𝑋 / 𝑘⦌𝐵 ∖ ⦋𝑋 / 𝑘⦌𝐶) → ¬ ∃𝑙 ∈ 𝐴 ¬ (𝑧‘𝑙) ∈ if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵)))
55	54	con4d 114	. . . . . . . . . . . . . 14 ⊢ (((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) → (∃𝑙 ∈ 𝐴 ¬ (𝑧‘𝑙) ∈ if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵) → (𝑧‘𝑋) ∈ (⦋𝑋 / 𝑘⦌𝐵 ∖ ⦋𝑋 / 𝑘⦌𝐶)))
56	55	imp 445	. . . . . . . . . . . . 13 ⊢ ((((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) ∧ ∃𝑙 ∈ 𝐴 ¬ (𝑧‘𝑙) ∈ if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵)) → (𝑧‘𝑋) ∈ (⦋𝑋 / 𝑘⦌𝐵 ∖ ⦋𝑋 / 𝑘⦌𝐶))
57	56	adantr 481	. . . . . . . . . . . 12 ⊢ (((((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) ∧ ∃𝑙 ∈ 𝐴 ¬ (𝑧‘𝑙) ∈ if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵)) ∧ 𝑚 ∈ 𝐴) → (𝑧‘𝑋) ∈ (⦋𝑋 / 𝑘⦌𝐵 ∖ ⦋𝑋 / 𝑘⦌𝐶))
58		fveq2 6191	. . . . . . . . . . . . 13 ⊢ (𝑚 = 𝑋 → (𝑧‘𝑚) = (𝑧‘𝑋))
59		csbeq1 3536	. . . . . . . . . . . . . 14 ⊢ (𝑚 = 𝑋 → ⦋𝑚 / 𝑘⦌𝐵 = ⦋𝑋 / 𝑘⦌𝐵)
60		csbeq1 3536	. . . . . . . . . . . . . 14 ⊢ (𝑚 = 𝑋 → ⦋𝑚 / 𝑘⦌𝐶 = ⦋𝑋 / 𝑘⦌𝐶)
61	59, 60	difeq12d 3729	. . . . . . . . . . . . 13 ⊢ (𝑚 = 𝑋 → (⦋𝑚 / 𝑘⦌𝐵 ∖ ⦋𝑚 / 𝑘⦌𝐶) = (⦋𝑋 / 𝑘⦌𝐵 ∖ ⦋𝑋 / 𝑘⦌𝐶))
62	58, 61	eleq12d 2695	. . . . . . . . . . . 12 ⊢ (𝑚 = 𝑋 → ((𝑧‘𝑚) ∈ (⦋𝑚 / 𝑘⦌𝐵 ∖ ⦋𝑚 / 𝑘⦌𝐶) ↔ (𝑧‘𝑋) ∈ (⦋𝑋 / 𝑘⦌𝐵 ∖ ⦋𝑋 / 𝑘⦌𝐶)))
63	57, 62	syl5ibrcom 237	. . . . . . . . . . 11 ⊢ (((((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) ∧ ∃𝑙 ∈ 𝐴 ¬ (𝑧‘𝑙) ∈ if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵)) ∧ 𝑚 ∈ 𝐴) → (𝑚 = 𝑋 → (𝑧‘𝑚) ∈ (⦋𝑚 / 𝑘⦌𝐵 ∖ ⦋𝑚 / 𝑘⦌𝐶)))
64	63	imp 445	. . . . . . . . . 10 ⊢ ((((((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) ∧ ∃𝑙 ∈ 𝐴 ¬ (𝑧‘𝑙) ∈ if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵)) ∧ 𝑚 ∈ 𝐴) ∧ 𝑚 = 𝑋) → (𝑧‘𝑚) ∈ (⦋𝑚 / 𝑘⦌𝐵 ∖ ⦋𝑚 / 𝑘⦌𝐶))
65		nfv 1843	. . . . . . . . . . . . . . 15 ⊢ Ⅎ𝑚(𝑧‘𝑘) ∈ 𝐵
66		nfcsb1v 3549	. . . . . . . . . . . . . . . 16 ⊢ Ⅎ𝑘⦋𝑚 / 𝑘⦌𝐵
67	66	nfel2 2781	. . . . . . . . . . . . . . 15 ⊢ Ⅎ𝑘(𝑧‘𝑚) ∈ ⦋𝑚 / 𝑘⦌𝐵
68		fveq2 6191	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 = 𝑚 → (𝑧‘𝑘) = (𝑧‘𝑚))
69		csbeq1a 3542	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 = 𝑚 → 𝐵 = ⦋𝑚 / 𝑘⦌𝐵)
70	68, 69	eleq12d 2695	. . . . . . . . . . . . . . 15 ⊢ (𝑘 = 𝑚 → ((𝑧‘𝑘) ∈ 𝐵 ↔ (𝑧‘𝑚) ∈ ⦋𝑚 / 𝑘⦌𝐵))
71	65, 67, 70	cbvral 3167	. . . . . . . . . . . . . 14 ⊢ (∀𝑘 ∈ 𝐴 (𝑧‘𝑘) ∈ 𝐵 ↔ ∀𝑚 ∈ 𝐴 (𝑧‘𝑚) ∈ ⦋𝑚 / 𝑘⦌𝐵)
72	26, 71	sylib 208	. . . . . . . . . . . . 13 ⊢ (𝑧 ∈ X𝑘 ∈ 𝐴 𝐵 → ∀𝑚 ∈ 𝐴 (𝑧‘𝑚) ∈ ⦋𝑚 / 𝑘⦌𝐵)
73	72	ad2antlr 763	. . . . . . . . . . . 12 ⊢ ((((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) ∧ ∃𝑙 ∈ 𝐴 ¬ (𝑧‘𝑙) ∈ if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵)) → ∀𝑚 ∈ 𝐴 (𝑧‘𝑚) ∈ ⦋𝑚 / 𝑘⦌𝐵)
74	73	r19.21bi 2932	. . . . . . . . . . 11 ⊢ (((((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) ∧ ∃𝑙 ∈ 𝐴 ¬ (𝑧‘𝑙) ∈ if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵)) ∧ 𝑚 ∈ 𝐴) → (𝑧‘𝑚) ∈ ⦋𝑚 / 𝑘⦌𝐵)
75	74	adantr 481	. . . . . . . . . 10 ⊢ ((((((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) ∧ ∃𝑙 ∈ 𝐴 ¬ (𝑧‘𝑙) ∈ if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵)) ∧ 𝑚 ∈ 𝐴) ∧ ¬ 𝑚 = 𝑋) → (𝑧‘𝑚) ∈ ⦋𝑚 / 𝑘⦌𝐵)
76	20, 21, 64, 75	ifbothda 4123	. . . . . . . . 9 ⊢ (((((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) ∧ ∃𝑙 ∈ 𝐴 ¬ (𝑧‘𝑙) ∈ if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵)) ∧ 𝑚 ∈ 𝐴) → (𝑧‘𝑚) ∈ if(𝑚 = 𝑋, (⦋𝑚 / 𝑘⦌𝐵 ∖ ⦋𝑚 / 𝑘⦌𝐶), ⦋𝑚 / 𝑘⦌𝐵))
77	76	ralrimiva 2966	. . . . . . . 8 ⊢ ((((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) ∧ ∃𝑙 ∈ 𝐴 ¬ (𝑧‘𝑙) ∈ if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵)) → ∀𝑚 ∈ 𝐴 (𝑧‘𝑚) ∈ if(𝑚 = 𝑋, (⦋𝑚 / 𝑘⦌𝐵 ∖ ⦋𝑚 / 𝑘⦌𝐶), ⦋𝑚 / 𝑘⦌𝐵))
78		simpll 790	. . . . . . . . 9 ⊢ (((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) → 𝑋 ∈ 𝐴)
79		iftrue 4092	. . . . . . . . . . . . . 14 ⊢ (𝑚 = 𝑋 → if(𝑚 = 𝑋, (⦋𝑚 / 𝑘⦌𝐵 ∖ ⦋𝑚 / 𝑘⦌𝐶), ⦋𝑚 / 𝑘⦌𝐵) = (⦋𝑚 / 𝑘⦌𝐵 ∖ ⦋𝑚 / 𝑘⦌𝐶))
80	79, 61	eqtrd 2656	. . . . . . . . . . . . 13 ⊢ (𝑚 = 𝑋 → if(𝑚 = 𝑋, (⦋𝑚 / 𝑘⦌𝐵 ∖ ⦋𝑚 / 𝑘⦌𝐶), ⦋𝑚 / 𝑘⦌𝐵) = (⦋𝑋 / 𝑘⦌𝐵 ∖ ⦋𝑋 / 𝑘⦌𝐶))
81	58, 80	eleq12d 2695	. . . . . . . . . . . 12 ⊢ (𝑚 = 𝑋 → ((𝑧‘𝑚) ∈ if(𝑚 = 𝑋, (⦋𝑚 / 𝑘⦌𝐵 ∖ ⦋𝑚 / 𝑘⦌𝐶), ⦋𝑚 / 𝑘⦌𝐵) ↔ (𝑧‘𝑋) ∈ (⦋𝑋 / 𝑘⦌𝐵 ∖ ⦋𝑋 / 𝑘⦌𝐶)))
82	81	rspcva 3307	. . . . . . . . . . 11 ⊢ ((𝑋 ∈ 𝐴 ∧ ∀𝑚 ∈ 𝐴 (𝑧‘𝑚) ∈ if(𝑚 = 𝑋, (⦋𝑚 / 𝑘⦌𝐵 ∖ ⦋𝑚 / 𝑘⦌𝐶), ⦋𝑚 / 𝑘⦌𝐵)) → (𝑧‘𝑋) ∈ (⦋𝑋 / 𝑘⦌𝐵 ∖ ⦋𝑋 / 𝑘⦌𝐶))
83	78, 82	sylan 488	. . . . . . . . . 10 ⊢ ((((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) ∧ ∀𝑚 ∈ 𝐴 (𝑧‘𝑚) ∈ if(𝑚 = 𝑋, (⦋𝑚 / 𝑘⦌𝐵 ∖ ⦋𝑚 / 𝑘⦌𝐶), ⦋𝑚 / 𝑘⦌𝐵)) → (𝑧‘𝑋) ∈ (⦋𝑋 / 𝑘⦌𝐵 ∖ ⦋𝑋 / 𝑘⦌𝐶))
84	83	eldifbd 3587	. . . . . . . . 9 ⊢ ((((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) ∧ ∀𝑚 ∈ 𝐴 (𝑧‘𝑚) ∈ if(𝑚 = 𝑋, (⦋𝑚 / 𝑘⦌𝐵 ∖ ⦋𝑚 / 𝑘⦌𝐶), ⦋𝑚 / 𝑘⦌𝐵)) → ¬ (𝑧‘𝑋) ∈ ⦋𝑋 / 𝑘⦌𝐶)
85		iftrue 4092	. . . . . . . . . . . . 13 ⊢ (𝑙 = 𝑋 → if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵) = ⦋𝑙 / 𝑘⦌𝐶)
86	85, 43	eqtrd 2656	. . . . . . . . . . . 12 ⊢ (𝑙 = 𝑋 → if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵) = ⦋𝑋 / 𝑘⦌𝐶)
87	35, 86	eleq12d 2695	. . . . . . . . . . 11 ⊢ (𝑙 = 𝑋 → ((𝑧‘𝑙) ∈ if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵) ↔ (𝑧‘𝑋) ∈ ⦋𝑋 / 𝑘⦌𝐶))
88	87	notbid 308	. . . . . . . . . 10 ⊢ (𝑙 = 𝑋 → (¬ (𝑧‘𝑙) ∈ if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵) ↔ ¬ (𝑧‘𝑋) ∈ ⦋𝑋 / 𝑘⦌𝐶))
89	88	rspcev 3309	. . . . . . . . 9 ⊢ ((𝑋 ∈ 𝐴 ∧ ¬ (𝑧‘𝑋) ∈ ⦋𝑋 / 𝑘⦌𝐶) → ∃𝑙 ∈ 𝐴 ¬ (𝑧‘𝑙) ∈ if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵))
90	78, 84, 89	syl2an2r 876	. . . . . . . 8 ⊢ ((((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) ∧ ∀𝑚 ∈ 𝐴 (𝑧‘𝑚) ∈ if(𝑚 = 𝑋, (⦋𝑚 / 𝑘⦌𝐵 ∖ ⦋𝑚 / 𝑘⦌𝐶), ⦋𝑚 / 𝑘⦌𝐵)) → ∃𝑙 ∈ 𝐴 ¬ (𝑧‘𝑙) ∈ if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵))
91	77, 90	impbida 877	. . . . . . 7 ⊢ (((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) → (∃𝑙 ∈ 𝐴 ¬ (𝑧‘𝑙) ∈ if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵) ↔ ∀𝑚 ∈ 𝐴 (𝑧‘𝑚) ∈ if(𝑚 = 𝑋, (⦋𝑚 / 𝑘⦌𝐵 ∖ ⦋𝑚 / 𝑘⦌𝐶), ⦋𝑚 / 𝑘⦌𝐵)))
92		nfv 1843	. . . . . . . 8 ⊢ Ⅎ𝑙 ¬ (𝑧‘𝑘) ∈ if(𝑘 = 𝑋, 𝐶, 𝐵)
93		nfv 1843	. . . . . . . . . . 11 ⊢ Ⅎ𝑘 𝑙 = 𝑋
94		nfcsb1v 3549	. . . . . . . . . . 11 ⊢ Ⅎ𝑘⦋𝑙 / 𝑘⦌𝐶
95	93, 94, 28	nfif 4115	. . . . . . . . . 10 ⊢ Ⅎ𝑘if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵)
96	95	nfel2 2781	. . . . . . . . 9 ⊢ Ⅎ𝑘(𝑧‘𝑙) ∈ if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵)
97	96	nfn 1784	. . . . . . . 8 ⊢ Ⅎ𝑘 ¬ (𝑧‘𝑙) ∈ if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵)
98		eqeq1 2626	. . . . . . . . . . 11 ⊢ (𝑘 = 𝑙 → (𝑘 = 𝑋 ↔ 𝑙 = 𝑋))
99		csbeq1a 3542	. . . . . . . . . . 11 ⊢ (𝑘 = 𝑙 → 𝐶 = ⦋𝑙 / 𝑘⦌𝐶)
100	98, 99, 31	ifbieq12d 4113	. . . . . . . . . 10 ⊢ (𝑘 = 𝑙 → if(𝑘 = 𝑋, 𝐶, 𝐵) = if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵))
101	30, 100	eleq12d 2695	. . . . . . . . 9 ⊢ (𝑘 = 𝑙 → ((𝑧‘𝑘) ∈ if(𝑘 = 𝑋, 𝐶, 𝐵) ↔ (𝑧‘𝑙) ∈ if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵)))
102	101	notbid 308	. . . . . . . 8 ⊢ (𝑘 = 𝑙 → (¬ (𝑧‘𝑘) ∈ if(𝑘 = 𝑋, 𝐶, 𝐵) ↔ ¬ (𝑧‘𝑙) ∈ if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵)))
103	92, 97, 102	cbvrex 3168	. . . . . . 7 ⊢ (∃𝑘 ∈ 𝐴 ¬ (𝑧‘𝑘) ∈ if(𝑘 = 𝑋, 𝐶, 𝐵) ↔ ∃𝑙 ∈ 𝐴 ¬ (𝑧‘𝑙) ∈ if(𝑙 = 𝑋, ⦋𝑙 / 𝑘⦌𝐶, ⦋𝑙 / 𝑘⦌𝐵))
104		nfv 1843	. . . . . . . 8 ⊢ Ⅎ𝑚(𝑧‘𝑘) ∈ if(𝑘 = 𝑋, (𝐵 ∖ 𝐶), 𝐵)
105		nfv 1843	. . . . . . . . . 10 ⊢ Ⅎ𝑘 𝑚 = 𝑋
106		nfcsb1v 3549	. . . . . . . . . . 11 ⊢ Ⅎ𝑘⦋𝑚 / 𝑘⦌𝐶
107	66, 106	nfdif 3731	. . . . . . . . . 10 ⊢ Ⅎ𝑘(⦋𝑚 / 𝑘⦌𝐵 ∖ ⦋𝑚 / 𝑘⦌𝐶)
108	105, 107, 66	nfif 4115	. . . . . . . . 9 ⊢ Ⅎ𝑘if(𝑚 = 𝑋, (⦋𝑚 / 𝑘⦌𝐵 ∖ ⦋𝑚 / 𝑘⦌𝐶), ⦋𝑚 / 𝑘⦌𝐵)
109	108	nfel2 2781	. . . . . . . 8 ⊢ Ⅎ𝑘(𝑧‘𝑚) ∈ if(𝑚 = 𝑋, (⦋𝑚 / 𝑘⦌𝐵 ∖ ⦋𝑚 / 𝑘⦌𝐶), ⦋𝑚 / 𝑘⦌𝐵)
110		eqeq1 2626	. . . . . . . . . 10 ⊢ (𝑘 = 𝑚 → (𝑘 = 𝑋 ↔ 𝑚 = 𝑋))
111		csbeq1a 3542	. . . . . . . . . . 11 ⊢ (𝑘 = 𝑚 → 𝐶 = ⦋𝑚 / 𝑘⦌𝐶)
112	69, 111	difeq12d 3729	. . . . . . . . . 10 ⊢ (𝑘 = 𝑚 → (𝐵 ∖ 𝐶) = (⦋𝑚 / 𝑘⦌𝐵 ∖ ⦋𝑚 / 𝑘⦌𝐶))
113	110, 112, 69	ifbieq12d 4113	. . . . . . . . 9 ⊢ (𝑘 = 𝑚 → if(𝑘 = 𝑋, (𝐵 ∖ 𝐶), 𝐵) = if(𝑚 = 𝑋, (⦋𝑚 / 𝑘⦌𝐵 ∖ ⦋𝑚 / 𝑘⦌𝐶), ⦋𝑚 / 𝑘⦌𝐵))
114	68, 113	eleq12d 2695	. . . . . . . 8 ⊢ (𝑘 = 𝑚 → ((𝑧‘𝑘) ∈ if(𝑘 = 𝑋, (𝐵 ∖ 𝐶), 𝐵) ↔ (𝑧‘𝑚) ∈ if(𝑚 = 𝑋, (⦋𝑚 / 𝑘⦌𝐵 ∖ ⦋𝑚 / 𝑘⦌𝐶), ⦋𝑚 / 𝑘⦌𝐵)))
115	104, 109, 114	cbvral 3167	. . . . . . 7 ⊢ (∀𝑘 ∈ 𝐴 (𝑧‘𝑘) ∈ if(𝑘 = 𝑋, (𝐵 ∖ 𝐶), 𝐵) ↔ ∀𝑚 ∈ 𝐴 (𝑧‘𝑚) ∈ if(𝑚 = 𝑋, (⦋𝑚 / 𝑘⦌𝐵 ∖ ⦋𝑚 / 𝑘⦌𝐶), ⦋𝑚 / 𝑘⦌𝐵))
116	91, 103, 115	3bitr4g 303	. . . . . 6 ⊢ (((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) → (∃𝑘 ∈ 𝐴 ¬ (𝑧‘𝑘) ∈ if(𝑘 = 𝑋, 𝐶, 𝐵) ↔ ∀𝑘 ∈ 𝐴 (𝑧‘𝑘) ∈ if(𝑘 = 𝑋, (𝐵 ∖ 𝐶), 𝐵)))
117	19, 116	syl5bbr 274	. . . . 5 ⊢ (((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) → (¬ ∀𝑘 ∈ 𝐴 (𝑧‘𝑘) ∈ if(𝑘 = 𝑋, 𝐶, 𝐵) ↔ ∀𝑘 ∈ 𝐴 (𝑧‘𝑘) ∈ if(𝑘 = 𝑋, (𝐵 ∖ 𝐶), 𝐵)))
118	18, 117	bitrd 268	. . . 4 ⊢ (((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) → (¬ 𝑧 ∈ X𝑘 ∈ 𝐴 if(𝑘 = 𝑋, 𝐶, 𝐵) ↔ ∀𝑘 ∈ 𝐴 (𝑧‘𝑘) ∈ if(𝑘 = 𝑋, (𝐵 ∖ 𝐶), 𝐵)))
119		ibar 525	. . . . 5 ⊢ (𝑧 ∈ X𝑘 ∈ 𝐴 𝐵 → (¬ 𝑧 ∈ X𝑘 ∈ 𝐴 if(𝑘 = 𝑋, 𝐶, 𝐵) ↔ (𝑧 ∈ X𝑘 ∈ 𝐴 𝐵 ∧ ¬ 𝑧 ∈ X𝑘 ∈ 𝐴 if(𝑘 = 𝑋, 𝐶, 𝐵))))
120	119	adantl 482	. . . 4 ⊢ (((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) → (¬ 𝑧 ∈ X𝑘 ∈ 𝐴 if(𝑘 = 𝑋, 𝐶, 𝐵) ↔ (𝑧 ∈ X𝑘 ∈ 𝐴 𝐵 ∧ ¬ 𝑧 ∈ X𝑘 ∈ 𝐴 if(𝑘 = 𝑋, 𝐶, 𝐵))))
121	13	biantrurd 529	. . . 4 ⊢ (((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) → (∀𝑘 ∈ 𝐴 (𝑧‘𝑘) ∈ if(𝑘 = 𝑋, (𝐵 ∖ 𝐶), 𝐵) ↔ (𝑧 Fn 𝐴 ∧ ∀𝑘 ∈ 𝐴 (𝑧‘𝑘) ∈ if(𝑘 = 𝑋, (𝐵 ∖ 𝐶), 𝐵))))
122	118, 120, 121	3bitr3d 298	. . 3 ⊢ (((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) → ((𝑧 ∈ X𝑘 ∈ 𝐴 𝐵 ∧ ¬ 𝑧 ∈ X𝑘 ∈ 𝐴 if(𝑘 = 𝑋, 𝐶, 𝐵)) ↔ (𝑧 Fn 𝐴 ∧ ∀𝑘 ∈ 𝐴 (𝑧‘𝑘) ∈ if(𝑘 = 𝑋, (𝐵 ∖ 𝐶), 𝐵))))
123		eldif 3584	. . 3 ⊢ (𝑧 ∈ (X𝑘 ∈ 𝐴 𝐵 ∖ X𝑘 ∈ 𝐴 if(𝑘 = 𝑋, 𝐶, 𝐵)) ↔ (𝑧 ∈ X𝑘 ∈ 𝐴 𝐵 ∧ ¬ 𝑧 ∈ X𝑘 ∈ 𝐴 if(𝑘 = 𝑋, 𝐶, 𝐵)))
124	15	elixp 7915	. . 3 ⊢ (𝑧 ∈ X𝑘 ∈ 𝐴 if(𝑘 = 𝑋, (𝐵 ∖ 𝐶), 𝐵) ↔ (𝑧 Fn 𝐴 ∧ ∀𝑘 ∈ 𝐴 (𝑧‘𝑘) ∈ if(𝑘 = 𝑋, (𝐵 ∖ 𝐶), 𝐵)))
125	122, 123, 124	3bitr4g 303	. 2 ⊢ (((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) ∧ 𝑧 ∈ X𝑘 ∈ 𝐴 𝐵) → (𝑧 ∈ (X𝑘 ∈ 𝐴 𝐵 ∖ X𝑘 ∈ 𝐴 if(𝑘 = 𝑋, 𝐶, 𝐵)) ↔ 𝑧 ∈ X𝑘 ∈ 𝐴 if(𝑘 = 𝑋, (𝐵 ∖ 𝐶), 𝐵)))
126	2, 11, 125	eqrdav 2621	1 ⊢ ((𝑋 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ 𝐵) → (X𝑘 ∈ 𝐴 𝐵 ∖ X𝑘 ∈ 𝐴 if(𝑘 = 𝑋, 𝐶, 𝐵)) = X𝑘 ∈ 𝐴 if(𝑘 = 𝑋, (𝐵 ∖ 𝐶), 𝐵))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 196   ∧ wa 384   = wceq 1483   ∈ wcel 1990  ∀wral 2912  ∃wrex 2913  ⦋csb 3533   ∖ cdif 3571   ⊆ wss 3574  ifcif 4086   Fn wfn 5883  ‘cfv 5888  Xcixp 7908

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1722  ax-4 1737  ax-5 1839  ax-6 1888  ax-7 1935  ax-9 1999  ax-10 2019  ax-11 2034  ax-12 2047  ax-13 2246  ax-ext 2602

This theorem depends on definitions:  df-bi 197  df-or 385  df-an 386  df-3an 1039  df-tru 1486  df-ex 1705  df-nf 1710  df-sb 1881  df-clab 2609  df-cleq 2615  df-clel 2618  df-nfc 2753  df-ral 2917  df-rex 2918  df-rab 2921  df-v 3202  df-sbc 3436  df-csb 3534  df-dif 3577  df-un 3579  df-in 3581  df-ss 3588  df-nul 3916  df-if 4087  df-sn 4178  df-pr 4180  df-op 4184  df-uni 4437  df-br 4654  df-opab 4713  df-rel 5121  df-cnv 5122  df-co 5123  df-dm 5124  df-iota 5851  df-fun 5890  df-fn 5891  df-fv 5896  df-ixp 7909

This theorem is referenced by:  ptcld  21416