Theorem dfon2lem4 33144

Description: Lemma for dfon2 33150. 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 4155	. . . . . . . . 9 ⊢ (𝐴 ∩ 𝐵) ⊆ 𝐴
2	1	sseli 3911	. . . . . . . 8 ⊢ ((𝐴 ∩ 𝐵) ∈ (𝐴 ∩ 𝐵) → (𝐴 ∩ 𝐵) ∈ 𝐴)
3		dfon2lem4.1	. . . . . . . . . . . 12 ⊢ 𝐴 ∈ V
4		dfon2lem3 33143	. . . . . . . . . . . 12 ⊢ (𝐴 ∈ V → (∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) → (Tr 𝐴 ∧ ∀𝑧 ∈ 𝐴 ¬ 𝑧 ∈ 𝑧)))
5	3, 4	ax-mp 5	. . . . . . . . . . 11 ⊢ (∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) → (Tr 𝐴 ∧ ∀𝑧 ∈ 𝐴 ¬ 𝑧 ∈ 𝑧))
6	5	simprd 499	. . . . . . . . . 10 ⊢ (∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) → ∀𝑧 ∈ 𝐴 ¬ 𝑧 ∈ 𝑧)
7		eleq1 2877	. . . . . . . . . . . . 13 ⊢ (𝑧 = (𝐴 ∩ 𝐵) → (𝑧 ∈ 𝑧 ↔ (𝐴 ∩ 𝐵) ∈ 𝑧))
8		eleq2 2878	. . . . . . . . . . . . 13 ⊢ (𝑧 = (𝐴 ∩ 𝐵) → ((𝐴 ∩ 𝐵) ∈ 𝑧 ↔ (𝐴 ∩ 𝐵) ∈ (𝐴 ∩ 𝐵)))
9	7, 8	bitrd 282	. . . . . . . . . . . 12 ⊢ (𝑧 = (𝐴 ∩ 𝐵) → (𝑧 ∈ 𝑧 ↔ (𝐴 ∩ 𝐵) ∈ (𝐴 ∩ 𝐵)))
10	9	notbid 321	. . . . . . . . . . 11 ⊢ (𝑧 = (𝐴 ∩ 𝐵) → (¬ 𝑧 ∈ 𝑧 ↔ ¬ (𝐴 ∩ 𝐵) ∈ (𝐴 ∩ 𝐵)))
11	10	rspccv 3568	. . . . . . . . . 10 ⊢ (∀𝑧 ∈ 𝐴 ¬ 𝑧 ∈ 𝑧 → ((𝐴 ∩ 𝐵) ∈ 𝐴 → ¬ (𝐴 ∩ 𝐵) ∈ (𝐴 ∩ 𝐵)))
12	6, 11	syl 17	. . . . . . . . 9 ⊢ (∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) → ((𝐴 ∩ 𝐵) ∈ 𝐴 → ¬ (𝐴 ∩ 𝐵) ∈ (𝐴 ∩ 𝐵)))
13	12	adantr 484	. . . . . . . 8 ⊢ ((∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) ∧ ∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵)) → ((𝐴 ∩ 𝐵) ∈ 𝐴 → ¬ (𝐴 ∩ 𝐵) ∈ (𝐴 ∩ 𝐵)))
14	2, 13	syl5 34	. . . . . . 7 ⊢ ((∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) ∧ ∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵)) → ((𝐴 ∩ 𝐵) ∈ (𝐴 ∩ 𝐵) → ¬ (𝐴 ∩ 𝐵) ∈ (𝐴 ∩ 𝐵)))
15	14	pm2.01d 193	. . . . . 6 ⊢ ((∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) ∧ ∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵)) → ¬ (𝐴 ∩ 𝐵) ∈ (𝐴 ∩ 𝐵))
16		elin 3897	. . . . . 6 ⊢ ((𝐴 ∩ 𝐵) ∈ (𝐴 ∩ 𝐵) ↔ ((𝐴 ∩ 𝐵) ∈ 𝐴 ∧ (𝐴 ∩ 𝐵) ∈ 𝐵))
17	15, 16	sylnib 331	. . . . 5 ⊢ ((∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) ∧ ∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵)) → ¬ ((𝐴 ∩ 𝐵) ∈ 𝐴 ∧ (𝐴 ∩ 𝐵) ∈ 𝐵))
18	5	simpld 498	. . . . . . . 8 ⊢ (∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) → Tr 𝐴)
19		dfon2lem4.2	. . . . . . . . . 10 ⊢ 𝐵 ∈ V
20		dfon2lem3 33143	. . . . . . . . . 10 ⊢ (𝐵 ∈ V → (∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵) → (Tr 𝐵 ∧ ∀𝑧 ∈ 𝐵 ¬ 𝑧 ∈ 𝑧)))
21	19, 20	ax-mp 5	. . . . . . . . 9 ⊢ (∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵) → (Tr 𝐵 ∧ ∀𝑧 ∈ 𝐵 ¬ 𝑧 ∈ 𝑧))
22	21	simpld 498	. . . . . . . 8 ⊢ (∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵) → Tr 𝐵)
23		trin 5146	. . . . . . . 8 ⊢ ((Tr 𝐴 ∧ Tr 𝐵) → Tr (𝐴 ∩ 𝐵))
24	18, 22, 23	syl2an 598	. . . . . . 7 ⊢ ((∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) ∧ ∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵)) → Tr (𝐴 ∩ 𝐵))
25	3	inex1 5185	. . . . . . . . 9 ⊢ (𝐴 ∩ 𝐵) ∈ V
26		psseq1 4015	. . . . . . . . . . 11 ⊢ (𝑥 = (𝐴 ∩ 𝐵) → (𝑥 ⊊ 𝐴 ↔ (𝐴 ∩ 𝐵) ⊊ 𝐴))
27		treq 5142	. . . . . . . . . . 11 ⊢ (𝑥 = (𝐴 ∩ 𝐵) → (Tr 𝑥 ↔ Tr (𝐴 ∩ 𝐵)))
28	26, 27	anbi12d 633	. . . . . . . . . 10 ⊢ (𝑥 = (𝐴 ∩ 𝐵) → ((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) ↔ ((𝐴 ∩ 𝐵) ⊊ 𝐴 ∧ Tr (𝐴 ∩ 𝐵))))
29		eleq1 2877	. . . . . . . . . 10 ⊢ (𝑥 = (𝐴 ∩ 𝐵) → (𝑥 ∈ 𝐴 ↔ (𝐴 ∩ 𝐵) ∈ 𝐴))
30	28, 29	imbi12d 348	. . . . . . . . 9 ⊢ (𝑥 = (𝐴 ∩ 𝐵) → (((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) ↔ (((𝐴 ∩ 𝐵) ⊊ 𝐴 ∧ Tr (𝐴 ∩ 𝐵)) → (𝐴 ∩ 𝐵) ∈ 𝐴)))
31	25, 30	spcv 3554	. . . . . . . 8 ⊢ (∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) → (((𝐴 ∩ 𝐵) ⊊ 𝐴 ∧ Tr (𝐴 ∩ 𝐵)) → (𝐴 ∩ 𝐵) ∈ 𝐴))
32	31	adantr 484	. . . . . . 7 ⊢ ((∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) ∧ ∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵)) → (((𝐴 ∩ 𝐵) ⊊ 𝐴 ∧ Tr (𝐴 ∩ 𝐵)) → (𝐴 ∩ 𝐵) ∈ 𝐴))
33	24, 32	mpan2d 693	. . . . . 6 ⊢ ((∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) ∧ ∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵)) → ((𝐴 ∩ 𝐵) ⊊ 𝐴 → (𝐴 ∩ 𝐵) ∈ 𝐴))
34		psseq1 4015	. . . . . . . . . . 11 ⊢ (𝑦 = (𝐴 ∩ 𝐵) → (𝑦 ⊊ 𝐵 ↔ (𝐴 ∩ 𝐵) ⊊ 𝐵))
35		treq 5142	. . . . . . . . . . 11 ⊢ (𝑦 = (𝐴 ∩ 𝐵) → (Tr 𝑦 ↔ Tr (𝐴 ∩ 𝐵)))
36	34, 35	anbi12d 633	. . . . . . . . . 10 ⊢ (𝑦 = (𝐴 ∩ 𝐵) → ((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) ↔ ((𝐴 ∩ 𝐵) ⊊ 𝐵 ∧ Tr (𝐴 ∩ 𝐵))))
37		eleq1 2877	. . . . . . . . . 10 ⊢ (𝑦 = (𝐴 ∩ 𝐵) → (𝑦 ∈ 𝐵 ↔ (𝐴 ∩ 𝐵) ∈ 𝐵))
38	36, 37	imbi12d 348	. . . . . . . . 9 ⊢ (𝑦 = (𝐴 ∩ 𝐵) → (((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵) ↔ (((𝐴 ∩ 𝐵) ⊊ 𝐵 ∧ Tr (𝐴 ∩ 𝐵)) → (𝐴 ∩ 𝐵) ∈ 𝐵)))
39	25, 38	spcv 3554	. . . . . . . 8 ⊢ (∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵) → (((𝐴 ∩ 𝐵) ⊊ 𝐵 ∧ Tr (𝐴 ∩ 𝐵)) → (𝐴 ∩ 𝐵) ∈ 𝐵))
40	39	adantl 485	. . . . . . 7 ⊢ ((∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) ∧ ∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵)) → (((𝐴 ∩ 𝐵) ⊊ 𝐵 ∧ Tr (𝐴 ∩ 𝐵)) → (𝐴 ∩ 𝐵) ∈ 𝐵))
41	24, 40	mpan2d 693	. . . . . 6 ⊢ ((∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) ∧ ∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵)) → ((𝐴 ∩ 𝐵) ⊊ 𝐵 → (𝐴 ∩ 𝐵) ∈ 𝐵))
42	33, 41	anim12d 611	. . . . 5 ⊢ ((∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) ∧ ∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵)) → (((𝐴 ∩ 𝐵) ⊊ 𝐴 ∧ (𝐴 ∩ 𝐵) ⊊ 𝐵) → ((𝐴 ∩ 𝐵) ∈ 𝐴 ∧ (𝐴 ∩ 𝐵) ∈ 𝐵)))
43	17, 42	mtod 201	. . . 4 ⊢ ((∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) ∧ ∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵)) → ¬ ((𝐴 ∩ 𝐵) ⊊ 𝐴 ∧ (𝐴 ∩ 𝐵) ⊊ 𝐵))
44		ianor 979	. . . 4 ⊢ (¬ ((𝐴 ∩ 𝐵) ⊊ 𝐴 ∧ (𝐴 ∩ 𝐵) ⊊ 𝐵) ↔ (¬ (𝐴 ∩ 𝐵) ⊊ 𝐴 ∨ ¬ (𝐴 ∩ 𝐵) ⊊ 𝐵))
45	43, 44	sylib 221	. . 3 ⊢ ((∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) ∧ ∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵)) → (¬ (𝐴 ∩ 𝐵) ⊊ 𝐴 ∨ ¬ (𝐴 ∩ 𝐵) ⊊ 𝐵))
46		sspss 4027	. . . . 5 ⊢ ((𝐴 ∩ 𝐵) ⊆ 𝐴 ↔ ((𝐴 ∩ 𝐵) ⊊ 𝐴 ∨ (𝐴 ∩ 𝐵) = 𝐴))
47	1, 46	mpbi 233	. . . 4 ⊢ ((𝐴 ∩ 𝐵) ⊊ 𝐴 ∨ (𝐴 ∩ 𝐵) = 𝐴)
48		inss2 4156	. . . . 5 ⊢ (𝐴 ∩ 𝐵) ⊆ 𝐵
49		sspss 4027	. . . . 5 ⊢ ((𝐴 ∩ 𝐵) ⊆ 𝐵 ↔ ((𝐴 ∩ 𝐵) ⊊ 𝐵 ∨ (𝐴 ∩ 𝐵) = 𝐵))
50	48, 49	mpbi 233	. . . 4 ⊢ ((𝐴 ∩ 𝐵) ⊊ 𝐵 ∨ (𝐴 ∩ 𝐵) = 𝐵)
51		orel1 886	. . . . . 6 ⊢ (¬ (𝐴 ∩ 𝐵) ⊊ 𝐴 → (((𝐴 ∩ 𝐵) ⊊ 𝐴 ∨ (𝐴 ∩ 𝐵) = 𝐴) → (𝐴 ∩ 𝐵) = 𝐴))
52		orc 864	. . . . . 6 ⊢ ((𝐴 ∩ 𝐵) = 𝐴 → ((𝐴 ∩ 𝐵) = 𝐴 ∨ (𝐴 ∩ 𝐵) = 𝐵))
53	51, 52	syl6 35	. . . . 5 ⊢ (¬ (𝐴 ∩ 𝐵) ⊊ 𝐴 → (((𝐴 ∩ 𝐵) ⊊ 𝐴 ∨ (𝐴 ∩ 𝐵) = 𝐴) → ((𝐴 ∩ 𝐵) = 𝐴 ∨ (𝐴 ∩ 𝐵) = 𝐵)))
54		orel1 886	. . . . . 6 ⊢ (¬ (𝐴 ∩ 𝐵) ⊊ 𝐵 → (((𝐴 ∩ 𝐵) ⊊ 𝐵 ∨ (𝐴 ∩ 𝐵) = 𝐵) → (𝐴 ∩ 𝐵) = 𝐵))
55		olc 865	. . . . . 6 ⊢ ((𝐴 ∩ 𝐵) = 𝐵 → ((𝐴 ∩ 𝐵) = 𝐴 ∨ (𝐴 ∩ 𝐵) = 𝐵))
56	54, 55	syl6 35	. . . . 5 ⊢ (¬ (𝐴 ∩ 𝐵) ⊊ 𝐵 → (((𝐴 ∩ 𝐵) ⊊ 𝐵 ∨ (𝐴 ∩ 𝐵) = 𝐵) → ((𝐴 ∩ 𝐵) = 𝐴 ∨ (𝐴 ∩ 𝐵) = 𝐵)))
57	53, 56	jaoa 953	. . . 4 ⊢ ((¬ (𝐴 ∩ 𝐵) ⊊ 𝐴 ∨ ¬ (𝐴 ∩ 𝐵) ⊊ 𝐵) → ((((𝐴 ∩ 𝐵) ⊊ 𝐴 ∨ (𝐴 ∩ 𝐵) = 𝐴) ∧ ((𝐴 ∩ 𝐵) ⊊ 𝐵 ∨ (𝐴 ∩ 𝐵) = 𝐵)) → ((𝐴 ∩ 𝐵) = 𝐴 ∨ (𝐴 ∩ 𝐵) = 𝐵)))
58	47, 50, 57	mp2ani 697	. . 3 ⊢ ((¬ (𝐴 ∩ 𝐵) ⊊ 𝐴 ∨ ¬ (𝐴 ∩ 𝐵) ⊊ 𝐵) → ((𝐴 ∩ 𝐵) = 𝐴 ∨ (𝐴 ∩ 𝐵) = 𝐵))
59	45, 58	syl 17	. 2 ⊢ ((∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) ∧ ∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵)) → ((𝐴 ∩ 𝐵) = 𝐴 ∨ (𝐴 ∩ 𝐵) = 𝐵))
60		df-ss 3898	. . 3 ⊢ (𝐴 ⊆ 𝐵 ↔ (𝐴 ∩ 𝐵) = 𝐴)
61		sseqin2 4142	. . 3 ⊢ (𝐵 ⊆ 𝐴 ↔ (𝐴 ∩ 𝐵) = 𝐵)
62	60, 61	orbi12i 912	. 2 ⊢ ((𝐴 ⊆ 𝐵 ∨ 𝐵 ⊆ 𝐴) ↔ ((𝐴 ∩ 𝐵) = 𝐴 ∨ (𝐴 ∩ 𝐵) = 𝐵))
63	59, 62	sylibr 237	1 ⊢ ((∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) ∧ ∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵)) → (𝐴 ⊆ 𝐵 ∨ 𝐵 ⊆ 𝐴))

Syntax hints:  ¬ wn 3   → wi 4   ∧ wa 399   ∨ wo 844  ∀wal 1536   = wceq 1538   ∈ wcel 2111  ∀wral 3106  Vcvv 3441   ∩ cin 3880   ⊆ wss 3881   ⊊ wpss 3882  Tr wtr 5136

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  ax-sep 5167  ax-nul 5174  ax-pr 5295  ax-un 7441

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-ne 2988  df-ral 3111  df-rex 3112  df-rab 3115  df-v 3443  df-sbc 3721  df-dif 3884  df-un 3886  df-in 3888  df-ss 3898  df-pss 3900  df-nul 4244  df-pw 4499  df-sn 4526  df-pr 4528  df-uni 4801  df-iun 4883  df-tr 5137  df-suc 6165

This theorem is referenced by:  dfon2lem5  33145