Theorem dfon2lem4 36313

Description: Lemma for dfon2 36319. If two sets satisfy the new definition, then one is a subset of the other. (Contributed by Scott Fenton, 25-Feb-2011.)

Hypotheses

Ref	Expression
dfon2lem4.1	⊢ 𝐴 ∈ V
dfon2lem4.2	⊢ 𝐵 ∈ V

Assertion

Ref	Expression
dfon2lem4	⊢ ((∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) ∧ ∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵)) → (𝐴 ⊆ 𝐵 ∨ 𝐵 ⊆ 𝐴))

Distinct variable groups:   𝑥,𝐴,𝑦   𝑥,𝐵,𝑦

Proof of Theorem dfon2lem4

Dummy variable 𝑧 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		inss1 4189	. . . . . . . . 9 ⊢ (𝐴 ∩ 𝐵) ⊆ 𝐴
2	1	sseli 3934	. . . . . . . 8 ⊢ ((𝐴 ∩ 𝐵) ∈ (𝐴 ∩ 𝐵) → (𝐴 ∩ 𝐵) ∈ 𝐴)
3		dfon2lem4.1	. . . . . . . . . . . 12 ⊢ 𝐴 ∈ V
4		dfon2lem3 36312	. . . . . . . . . . . 12 ⊢ (𝐴 ∈ V → (∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) → (Tr 𝐴 ∧ ∀𝑧 ∈ 𝐴 ¬ 𝑧 ∈ 𝑧)))
5	3, 4	ax-mp 5	. . . . . . . . . . 11 ⊢ (∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) → (Tr 𝐴 ∧ ∀𝑧 ∈ 𝐴 ¬ 𝑧 ∈ 𝑧))
6	5	simprd 501	. . . . . . . . . 10 ⊢ (∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) → ∀𝑧 ∈ 𝐴 ¬ 𝑧 ∈ 𝑧)
7		eleq1 2853	. . . . . . . . . . . . 13 ⊢ (𝑧 = (𝐴 ∩ 𝐵) → (𝑧 ∈ 𝑧 ↔ (𝐴 ∩ 𝐵) ∈ 𝑧))
8		eleq2 2854	. . . . . . . . . . . . 13 ⊢ (𝑧 = (𝐴 ∩ 𝐵) → ((𝐴 ∩ 𝐵) ∈ 𝑧 ↔ (𝐴 ∩ 𝐵) ∈ (𝐴 ∩ 𝐵)))
9	7, 8	bitrd 282	. . . . . . . . . . . 12 ⊢ (𝑧 = (𝐴 ∩ 𝐵) → (𝑧 ∈ 𝑧 ↔ (𝐴 ∩ 𝐵) ∈ (𝐴 ∩ 𝐵)))
10	9	notbid 321	. . . . . . . . . . 11 ⊢ (𝑧 = (𝐴 ∩ 𝐵) → (¬ 𝑧 ∈ 𝑧 ↔ ¬ (𝐴 ∩ 𝐵) ∈ (𝐴 ∩ 𝐵)))
11	10	rspccv 3580	. . . . . . . . . 10 ⊢ (∀𝑧 ∈ 𝐴 ¬ 𝑧 ∈ 𝑧 → ((𝐴 ∩ 𝐵) ∈ 𝐴 → ¬ (𝐴 ∩ 𝐵) ∈ (𝐴 ∩ 𝐵)))
12	6, 11	syl 18	. . . . . . . . 9 ⊢ (∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) → ((𝐴 ∩ 𝐵) ∈ 𝐴 → ¬ (𝐴 ∩ 𝐵) ∈ (𝐴 ∩ 𝐵)))
13	12	adantr 486	. . . . . . . 8 ⊢ ((∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) ∧ ∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵)) → ((𝐴 ∩ 𝐵) ∈ 𝐴 → ¬ (𝐴 ∩ 𝐵) ∈ (𝐴 ∩ 𝐵)))
14	2, 13	syl5 35	. . . . . . 7 ⊢ ((∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) ∧ ∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵)) → ((𝐴 ∩ 𝐵) ∈ (𝐴 ∩ 𝐵) → ¬ (𝐴 ∩ 𝐵) ∈ (𝐴 ∩ 𝐵)))
15	14	pm2.01d 192	. . . . . 6 ⊢ ((∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) ∧ ∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵)) → ¬ (𝐴 ∩ 𝐵) ∈ (𝐴 ∩ 𝐵))
16		elin 3922	. . . . . 6 ⊢ ((𝐴 ∩ 𝐵) ∈ (𝐴 ∩ 𝐵) ↔ ((𝐴 ∩ 𝐵) ∈ 𝐴 ∧ (𝐴 ∩ 𝐵) ∈ 𝐵))
17	15, 16	sylnib 331	. . . . 5 ⊢ ((∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) ∧ ∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵)) → ¬ ((𝐴 ∩ 𝐵) ∈ 𝐴 ∧ (𝐴 ∩ 𝐵) ∈ 𝐵))
18	5	simpld 500	. . . . . . . 8 ⊢ (∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) → Tr 𝐴)
19		dfon2lem4.2	. . . . . . . . . 10 ⊢ 𝐵 ∈ V
20		dfon2lem3 36312	. . . . . . . . . 10 ⊢ (𝐵 ∈ V → (∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵) → (Tr 𝐵 ∧ ∀𝑧 ∈ 𝐵 ¬ 𝑧 ∈ 𝑧)))
21	19, 20	ax-mp 5	. . . . . . . . 9 ⊢ (∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵) → (Tr 𝐵 ∧ ∀𝑧 ∈ 𝐵 ¬ 𝑧 ∈ 𝑧))
22	21	simpld 500	. . . . . . . 8 ⊢ (∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵) → Tr 𝐵)
23		trin 5232	. . . . . . . 8 ⊢ ((Tr 𝐴 ∧ Tr 𝐵) → Tr (𝐴 ∩ 𝐵))
24	18, 22, 23	syl2an 608	. . . . . . 7 ⊢ ((∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) ∧ ∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵)) → Tr (𝐴 ∩ 𝐵))
25	3	inex1 5288	. . . . . . . . 9 ⊢ (𝐴 ∩ 𝐵) ∈ V
26		psseq1 4045	. . . . . . . . . . 11 ⊢ (𝑥 = (𝐴 ∩ 𝐵) → (𝑥 ⊊ 𝐴 ↔ (𝐴 ∩ 𝐵) ⊊ 𝐴))
27		treq 5227	. . . . . . . . . . 11 ⊢ (𝑥 = (𝐴 ∩ 𝐵) → (Tr 𝑥 ↔ Tr (𝐴 ∩ 𝐵)))
28	26, 27	anbi12d 644	. . . . . . . . . 10 ⊢ (𝑥 = (𝐴 ∩ 𝐵) → ((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) ↔ ((𝐴 ∩ 𝐵) ⊊ 𝐴 ∧ Tr (𝐴 ∩ 𝐵))))
29		eleq1 2853	. . . . . . . . . 10 ⊢ (𝑥 = (𝐴 ∩ 𝐵) → (𝑥 ∈ 𝐴 ↔ (𝐴 ∩ 𝐵) ∈ 𝐴))
30	28, 29	imbi12d 347	. . . . . . . . 9 ⊢ (𝑥 = (𝐴 ∩ 𝐵) → (((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) ↔ (((𝐴 ∩ 𝐵) ⊊ 𝐴 ∧ Tr (𝐴 ∩ 𝐵)) → (𝐴 ∩ 𝐵) ∈ 𝐴)))
31	25, 30	spcv 3566	. . . . . . . 8 ⊢ (∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) → (((𝐴 ∩ 𝐵) ⊊ 𝐴 ∧ Tr (𝐴 ∩ 𝐵)) → (𝐴 ∩ 𝐵) ∈ 𝐴))
32	31	adantr 486	. . . . . . 7 ⊢ ((∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) ∧ ∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵)) → (((𝐴 ∩ 𝐵) ⊊ 𝐴 ∧ Tr (𝐴 ∩ 𝐵)) → (𝐴 ∩ 𝐵) ∈ 𝐴))
33	24, 32	mpan2d 707	. . . . . 6 ⊢ ((∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) ∧ ∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵)) → ((𝐴 ∩ 𝐵) ⊊ 𝐴 → (𝐴 ∩ 𝐵) ∈ 𝐴))
34		psseq1 4045	. . . . . . . . . . 11 ⊢ (𝑦 = (𝐴 ∩ 𝐵) → (𝑦 ⊊ 𝐵 ↔ (𝐴 ∩ 𝐵) ⊊ 𝐵))
35		treq 5227	. . . . . . . . . . 11 ⊢ (𝑦 = (𝐴 ∩ 𝐵) → (Tr 𝑦 ↔ Tr (𝐴 ∩ 𝐵)))
36	34, 35	anbi12d 644	. . . . . . . . . 10 ⊢ (𝑦 = (𝐴 ∩ 𝐵) → ((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) ↔ ((𝐴 ∩ 𝐵) ⊊ 𝐵 ∧ Tr (𝐴 ∩ 𝐵))))
37		eleq1 2853	. . . . . . . . . 10 ⊢ (𝑦 = (𝐴 ∩ 𝐵) → (𝑦 ∈ 𝐵 ↔ (𝐴 ∩ 𝐵) ∈ 𝐵))
38	36, 37	imbi12d 347	. . . . . . . . 9 ⊢ (𝑦 = (𝐴 ∩ 𝐵) → (((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵) ↔ (((𝐴 ∩ 𝐵) ⊊ 𝐵 ∧ Tr (𝐴 ∩ 𝐵)) → (𝐴 ∩ 𝐵) ∈ 𝐵)))
39	25, 38	spcv 3566	. . . . . . . 8 ⊢ (∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵) → (((𝐴 ∩ 𝐵) ⊊ 𝐵 ∧ Tr (𝐴 ∩ 𝐵)) → (𝐴 ∩ 𝐵) ∈ 𝐵))
40	39	adantl 487	. . . . . . 7 ⊢ ((∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) ∧ ∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵)) → (((𝐴 ∩ 𝐵) ⊊ 𝐵 ∧ Tr (𝐴 ∩ 𝐵)) → (𝐴 ∩ 𝐵) ∈ 𝐵))
41	24, 40	mpan2d 707	. . . . . 6 ⊢ ((∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) ∧ ∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵)) → ((𝐴 ∩ 𝐵) ⊊ 𝐵 → (𝐴 ∩ 𝐵) ∈ 𝐵))
42	33, 41	anim12d 621	. . . . 5 ⊢ ((∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) ∧ ∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵)) → (((𝐴 ∩ 𝐵) ⊊ 𝐴 ∧ (𝐴 ∩ 𝐵) ⊊ 𝐵) → ((𝐴 ∩ 𝐵) ∈ 𝐴 ∧ (𝐴 ∩ 𝐵) ∈ 𝐵)))
43	17, 42	mtod 201	. . . 4 ⊢ ((∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) ∧ ∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵)) → ¬ ((𝐴 ∩ 𝐵) ⊊ 𝐴 ∧ (𝐴 ∩ 𝐵) ⊊ 𝐵))
44		ianor 997	. . . 4 ⊢ (¬ ((𝐴 ∩ 𝐵) ⊊ 𝐴 ∧ (𝐴 ∩ 𝐵) ⊊ 𝐵) ↔ (¬ (𝐴 ∩ 𝐵) ⊊ 𝐴 ∨ ¬ (𝐴 ∩ 𝐵) ⊊ 𝐵))
45	43, 44	sylib 221	. . 3 ⊢ ((∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) ∧ ∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵)) → (¬ (𝐴 ∩ 𝐵) ⊊ 𝐴 ∨ ¬ (𝐴 ∩ 𝐵) ⊊ 𝐵))
46		sspss 4057	. . . . 5 ⊢ ((𝐴 ∩ 𝐵) ⊆ 𝐴 ↔ ((𝐴 ∩ 𝐵) ⊊ 𝐴 ∨ (𝐴 ∩ 𝐵) = 𝐴))
47	1, 46	mpbi 233	. . . 4 ⊢ ((𝐴 ∩ 𝐵) ⊊ 𝐴 ∨ (𝐴 ∩ 𝐵) = 𝐴)
48		inss2 4190	. . . . 5 ⊢ (𝐴 ∩ 𝐵) ⊆ 𝐵
49		sspss 4057	. . . . 5 ⊢ ((𝐴 ∩ 𝐵) ⊆ 𝐵 ↔ ((𝐴 ∩ 𝐵) ⊊ 𝐵 ∨ (𝐴 ∩ 𝐵) = 𝐵))
50	48, 49	mpbi 233	. . . 4 ⊢ ((𝐴 ∩ 𝐵) ⊊ 𝐵 ∨ (𝐴 ∩ 𝐵) = 𝐵)
51		orel1 902	. . . . . 6 ⊢ (¬ (𝐴 ∩ 𝐵) ⊊ 𝐴 → (((𝐴 ∩ 𝐵) ⊊ 𝐴 ∨ (𝐴 ∩ 𝐵) = 𝐴) → (𝐴 ∩ 𝐵) = 𝐴))
52		orc 881	. . . . . 6 ⊢ ((𝐴 ∩ 𝐵) = 𝐴 → ((𝐴 ∩ 𝐵) = 𝐴 ∨ (𝐴 ∩ 𝐵) = 𝐵))
53	51, 52	syl6 36	. . . . 5 ⊢ (¬ (𝐴 ∩ 𝐵) ⊊ 𝐴 → (((𝐴 ∩ 𝐵) ⊊ 𝐴 ∨ (𝐴 ∩ 𝐵) = 𝐴) → ((𝐴 ∩ 𝐵) = 𝐴 ∨ (𝐴 ∩ 𝐵) = 𝐵)))
54		orel1 902	. . . . . 6 ⊢ (¬ (𝐴 ∩ 𝐵) ⊊ 𝐵 → (((𝐴 ∩ 𝐵) ⊊ 𝐵 ∨ (𝐴 ∩ 𝐵) = 𝐵) → (𝐴 ∩ 𝐵) = 𝐵))
55		olc 882	. . . . . 6 ⊢ ((𝐴 ∩ 𝐵) = 𝐵 → ((𝐴 ∩ 𝐵) = 𝐴 ∨ (𝐴 ∩ 𝐵) = 𝐵))
56	54, 55	syl6 36	. . . . 5 ⊢ (¬ (𝐴 ∩ 𝐵) ⊊ 𝐵 → (((𝐴 ∩ 𝐵) ⊊ 𝐵 ∨ (𝐴 ∩ 𝐵) = 𝐵) → ((𝐴 ∩ 𝐵) = 𝐴 ∨ (𝐴 ∩ 𝐵) = 𝐵)))
57	53, 56	jaoa 970	. . . 4 ⊢ ((¬ (𝐴 ∩ 𝐵) ⊊ 𝐴 ∨ ¬ (𝐴 ∩ 𝐵) ⊊ 𝐵) → ((((𝐴 ∩ 𝐵) ⊊ 𝐴 ∨ (𝐴 ∩ 𝐵) = 𝐴) ∧ ((𝐴 ∩ 𝐵) ⊊ 𝐵 ∨ (𝐴 ∩ 𝐵) = 𝐵)) → ((𝐴 ∩ 𝐵) = 𝐴 ∨ (𝐴 ∩ 𝐵) = 𝐵)))
58	47, 50, 57	mp2ani 711	. . 3 ⊢ ((¬ (𝐴 ∩ 𝐵) ⊊ 𝐴 ∨ ¬ (𝐴 ∩ 𝐵) ⊊ 𝐵) → ((𝐴 ∩ 𝐵) = 𝐴 ∨ (𝐴 ∩ 𝐵) = 𝐵))
59	45, 58	syl 18	. 2 ⊢ ((∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) ∧ ∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵)) → ((𝐴 ∩ 𝐵) = 𝐴 ∨ (𝐴 ∩ 𝐵) = 𝐵))
60		dfss2 3924	. . 3 ⊢ (𝐴 ⊆ 𝐵 ↔ (𝐴 ∩ 𝐵) = 𝐴)
61		sseqin2 4176	. . 3 ⊢ (𝐵 ⊆ 𝐴 ↔ (𝐴 ∩ 𝐵) = 𝐵)
62	60, 61	orbi12i 928	. 2 ⊢ ((𝐴 ⊆ 𝐵 ∨ 𝐵 ⊆ 𝐴) ↔ ((𝐴 ∩ 𝐵) = 𝐴 ∨ (𝐴 ∩ 𝐵) = 𝐵))
63	59, 62	sylibr 237	1 ⊢ ((∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) ∧ ∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵)) → (𝐴 ⊆ 𝐵 ∨ 𝐵 ⊆ 𝐴))

This proof depends on syntax axioms:  ¬ wn 3   → wi 4   ∧ wa 401   ∨ wo 861  ∀wal 1568   = wceq 1570   ∈ wcel 2146  ∀wral 3081  Vcvv 3457   ∩ cin 3905   ⊆ wss 3906   ⊊ wpss 3907  Tr wtr 5220

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 2148  ax-9 2156  ax-10 2179  ax-11 2195  ax-12 2216  ax-ext 2737  ax-sep 5259  ax-pr 5406  ax-un 7742

This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3an 1105  df-tru 1573  df-ex 1813  df-nf 1817  df-sb 2100  df-clab 2744  df-cleq 2757  df-clel 2840  df-nfc 2914  df-ne 2961  df-ral 3082  df-rex 3092  df-rab 3419  df-v 3459  df-sbc 3747  df-un 3911  df-in 3913  df-ss 3923  df-pss 3926  df-pw 4566  df-sn 4592  df-pr 4594  df-uni 4875  df-iun 4960  df-tr 5221  df-suc 6370

This theorem is used by:  dfon2lem5  36314