Theorem dfon2lem4 33668

Description: Lemma for dfon2 33674. 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 4159	. . . . . . . . 9 ⊢ (𝐴 ∩ 𝐵) ⊆ 𝐴
2	1	sseli 3913	. . . . . . . 8 ⊢ ((𝐴 ∩ 𝐵) ∈ (𝐴 ∩ 𝐵) → (𝐴 ∩ 𝐵) ∈ 𝐴)
3		dfon2lem4.1	. . . . . . . . . . . 12 ⊢ 𝐴 ∈ V
4		dfon2lem3 33667	. . . . . . . . . . . 12 ⊢ (𝐴 ∈ V → (∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) → (Tr 𝐴 ∧ ∀𝑧 ∈ 𝐴 ¬ 𝑧 ∈ 𝑧)))
5	3, 4	ax-mp 5	. . . . . . . . . . 11 ⊢ (∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) → (Tr 𝐴 ∧ ∀𝑧 ∈ 𝐴 ¬ 𝑧 ∈ 𝑧))
6	5	simprd 495	. . . . . . . . . 10 ⊢ (∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) → ∀𝑧 ∈ 𝐴 ¬ 𝑧 ∈ 𝑧)
7		eleq1 2826	. . . . . . . . . . . . 13 ⊢ (𝑧 = (𝐴 ∩ 𝐵) → (𝑧 ∈ 𝑧 ↔ (𝐴 ∩ 𝐵) ∈ 𝑧))
8		eleq2 2827	. . . . . . . . . . . . 13 ⊢ (𝑧 = (𝐴 ∩ 𝐵) → ((𝐴 ∩ 𝐵) ∈ 𝑧 ↔ (𝐴 ∩ 𝐵) ∈ (𝐴 ∩ 𝐵)))
9	7, 8	bitrd 278	. . . . . . . . . . . 12 ⊢ (𝑧 = (𝐴 ∩ 𝐵) → (𝑧 ∈ 𝑧 ↔ (𝐴 ∩ 𝐵) ∈ (𝐴 ∩ 𝐵)))
10	9	notbid 317	. . . . . . . . . . 11 ⊢ (𝑧 = (𝐴 ∩ 𝐵) → (¬ 𝑧 ∈ 𝑧 ↔ ¬ (𝐴 ∩ 𝐵) ∈ (𝐴 ∩ 𝐵)))
11	10	rspccv 3549	. . . . . . . . . 10 ⊢ (∀𝑧 ∈ 𝐴 ¬ 𝑧 ∈ 𝑧 → ((𝐴 ∩ 𝐵) ∈ 𝐴 → ¬ (𝐴 ∩ 𝐵) ∈ (𝐴 ∩ 𝐵)))
12	6, 11	syl 17	. . . . . . . . 9 ⊢ (∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) → ((𝐴 ∩ 𝐵) ∈ 𝐴 → ¬ (𝐴 ∩ 𝐵) ∈ (𝐴 ∩ 𝐵)))
13	12	adantr 480	. . . . . . . 8 ⊢ ((∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) ∧ ∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵)) → ((𝐴 ∩ 𝐵) ∈ 𝐴 → ¬ (𝐴 ∩ 𝐵) ∈ (𝐴 ∩ 𝐵)))
14	2, 13	syl5 34	. . . . . . 7 ⊢ ((∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) ∧ ∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵)) → ((𝐴 ∩ 𝐵) ∈ (𝐴 ∩ 𝐵) → ¬ (𝐴 ∩ 𝐵) ∈ (𝐴 ∩ 𝐵)))
15	14	pm2.01d 189	. . . . . 6 ⊢ ((∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) ∧ ∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵)) → ¬ (𝐴 ∩ 𝐵) ∈ (𝐴 ∩ 𝐵))
16		elin 3899	. . . . . 6 ⊢ ((𝐴 ∩ 𝐵) ∈ (𝐴 ∩ 𝐵) ↔ ((𝐴 ∩ 𝐵) ∈ 𝐴 ∧ (𝐴 ∩ 𝐵) ∈ 𝐵))
17	15, 16	sylnib 327	. . . . 5 ⊢ ((∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) ∧ ∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵)) → ¬ ((𝐴 ∩ 𝐵) ∈ 𝐴 ∧ (𝐴 ∩ 𝐵) ∈ 𝐵))
18	5	simpld 494	. . . . . . . 8 ⊢ (∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) → Tr 𝐴)
19		dfon2lem4.2	. . . . . . . . . 10 ⊢ 𝐵 ∈ V
20		dfon2lem3 33667	. . . . . . . . . 10 ⊢ (𝐵 ∈ V → (∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵) → (Tr 𝐵 ∧ ∀𝑧 ∈ 𝐵 ¬ 𝑧 ∈ 𝑧)))
21	19, 20	ax-mp 5	. . . . . . . . 9 ⊢ (∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵) → (Tr 𝐵 ∧ ∀𝑧 ∈ 𝐵 ¬ 𝑧 ∈ 𝑧))
22	21	simpld 494	. . . . . . . 8 ⊢ (∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵) → Tr 𝐵)
23		trin 5197	. . . . . . . 8 ⊢ ((Tr 𝐴 ∧ Tr 𝐵) → Tr (𝐴 ∩ 𝐵))
24	18, 22, 23	syl2an 595	. . . . . . 7 ⊢ ((∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) ∧ ∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵)) → Tr (𝐴 ∩ 𝐵))
25	3	inex1 5236	. . . . . . . . 9 ⊢ (𝐴 ∩ 𝐵) ∈ V
26		psseq1 4018	. . . . . . . . . . 11 ⊢ (𝑥 = (𝐴 ∩ 𝐵) → (𝑥 ⊊ 𝐴 ↔ (𝐴 ∩ 𝐵) ⊊ 𝐴))
27		treq 5193	. . . . . . . . . . 11 ⊢ (𝑥 = (𝐴 ∩ 𝐵) → (Tr 𝑥 ↔ Tr (𝐴 ∩ 𝐵)))
28	26, 27	anbi12d 630	. . . . . . . . . 10 ⊢ (𝑥 = (𝐴 ∩ 𝐵) → ((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) ↔ ((𝐴 ∩ 𝐵) ⊊ 𝐴 ∧ Tr (𝐴 ∩ 𝐵))))
29		eleq1 2826	. . . . . . . . . 10 ⊢ (𝑥 = (𝐴 ∩ 𝐵) → (𝑥 ∈ 𝐴 ↔ (𝐴 ∩ 𝐵) ∈ 𝐴))
30	28, 29	imbi12d 344	. . . . . . . . 9 ⊢ (𝑥 = (𝐴 ∩ 𝐵) → (((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) ↔ (((𝐴 ∩ 𝐵) ⊊ 𝐴 ∧ Tr (𝐴 ∩ 𝐵)) → (𝐴 ∩ 𝐵) ∈ 𝐴)))
31	25, 30	spcv 3534	. . . . . . . 8 ⊢ (∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) → (((𝐴 ∩ 𝐵) ⊊ 𝐴 ∧ Tr (𝐴 ∩ 𝐵)) → (𝐴 ∩ 𝐵) ∈ 𝐴))
32	31	adantr 480	. . . . . . 7 ⊢ ((∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) ∧ ∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵)) → (((𝐴 ∩ 𝐵) ⊊ 𝐴 ∧ Tr (𝐴 ∩ 𝐵)) → (𝐴 ∩ 𝐵) ∈ 𝐴))
33	24, 32	mpan2d 690	. . . . . 6 ⊢ ((∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) ∧ ∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵)) → ((𝐴 ∩ 𝐵) ⊊ 𝐴 → (𝐴 ∩ 𝐵) ∈ 𝐴))
34		psseq1 4018	. . . . . . . . . . 11 ⊢ (𝑦 = (𝐴 ∩ 𝐵) → (𝑦 ⊊ 𝐵 ↔ (𝐴 ∩ 𝐵) ⊊ 𝐵))
35		treq 5193	. . . . . . . . . . 11 ⊢ (𝑦 = (𝐴 ∩ 𝐵) → (Tr 𝑦 ↔ Tr (𝐴 ∩ 𝐵)))
36	34, 35	anbi12d 630	. . . . . . . . . 10 ⊢ (𝑦 = (𝐴 ∩ 𝐵) → ((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) ↔ ((𝐴 ∩ 𝐵) ⊊ 𝐵 ∧ Tr (𝐴 ∩ 𝐵))))
37		eleq1 2826	. . . . . . . . . 10 ⊢ (𝑦 = (𝐴 ∩ 𝐵) → (𝑦 ∈ 𝐵 ↔ (𝐴 ∩ 𝐵) ∈ 𝐵))
38	36, 37	imbi12d 344	. . . . . . . . 9 ⊢ (𝑦 = (𝐴 ∩ 𝐵) → (((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵) ↔ (((𝐴 ∩ 𝐵) ⊊ 𝐵 ∧ Tr (𝐴 ∩ 𝐵)) → (𝐴 ∩ 𝐵) ∈ 𝐵)))
39	25, 38	spcv 3534	. . . . . . . 8 ⊢ (∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵) → (((𝐴 ∩ 𝐵) ⊊ 𝐵 ∧ Tr (𝐴 ∩ 𝐵)) → (𝐴 ∩ 𝐵) ∈ 𝐵))
40	39	adantl 481	. . . . . . 7 ⊢ ((∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) ∧ ∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵)) → (((𝐴 ∩ 𝐵) ⊊ 𝐵 ∧ Tr (𝐴 ∩ 𝐵)) → (𝐴 ∩ 𝐵) ∈ 𝐵))
41	24, 40	mpan2d 690	. . . . . 6 ⊢ ((∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) ∧ ∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵)) → ((𝐴 ∩ 𝐵) ⊊ 𝐵 → (𝐴 ∩ 𝐵) ∈ 𝐵))
42	33, 41	anim12d 608	. . . . 5 ⊢ ((∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) ∧ ∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵)) → (((𝐴 ∩ 𝐵) ⊊ 𝐴 ∧ (𝐴 ∩ 𝐵) ⊊ 𝐵) → ((𝐴 ∩ 𝐵) ∈ 𝐴 ∧ (𝐴 ∩ 𝐵) ∈ 𝐵)))
43	17, 42	mtod 197	. . . 4 ⊢ ((∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) ∧ ∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵)) → ¬ ((𝐴 ∩ 𝐵) ⊊ 𝐴 ∧ (𝐴 ∩ 𝐵) ⊊ 𝐵))
44		ianor 978	. . . 4 ⊢ (¬ ((𝐴 ∩ 𝐵) ⊊ 𝐴 ∧ (𝐴 ∩ 𝐵) ⊊ 𝐵) ↔ (¬ (𝐴 ∩ 𝐵) ⊊ 𝐴 ∨ ¬ (𝐴 ∩ 𝐵) ⊊ 𝐵))
45	43, 44	sylib 217	. . 3 ⊢ ((∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) ∧ ∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵)) → (¬ (𝐴 ∩ 𝐵) ⊊ 𝐴 ∨ ¬ (𝐴 ∩ 𝐵) ⊊ 𝐵))
46		sspss 4030	. . . . 5 ⊢ ((𝐴 ∩ 𝐵) ⊆ 𝐴 ↔ ((𝐴 ∩ 𝐵) ⊊ 𝐴 ∨ (𝐴 ∩ 𝐵) = 𝐴))
47	1, 46	mpbi 229	. . . 4 ⊢ ((𝐴 ∩ 𝐵) ⊊ 𝐴 ∨ (𝐴 ∩ 𝐵) = 𝐴)
48		inss2 4160	. . . . 5 ⊢ (𝐴 ∩ 𝐵) ⊆ 𝐵
49		sspss 4030	. . . . 5 ⊢ ((𝐴 ∩ 𝐵) ⊆ 𝐵 ↔ ((𝐴 ∩ 𝐵) ⊊ 𝐵 ∨ (𝐴 ∩ 𝐵) = 𝐵))
50	48, 49	mpbi 229	. . . 4 ⊢ ((𝐴 ∩ 𝐵) ⊊ 𝐵 ∨ (𝐴 ∩ 𝐵) = 𝐵)
51		orel1 885	. . . . . 6 ⊢ (¬ (𝐴 ∩ 𝐵) ⊊ 𝐴 → (((𝐴 ∩ 𝐵) ⊊ 𝐴 ∨ (𝐴 ∩ 𝐵) = 𝐴) → (𝐴 ∩ 𝐵) = 𝐴))
52		orc 863	. . . . . 6 ⊢ ((𝐴 ∩ 𝐵) = 𝐴 → ((𝐴 ∩ 𝐵) = 𝐴 ∨ (𝐴 ∩ 𝐵) = 𝐵))
53	51, 52	syl6 35	. . . . 5 ⊢ (¬ (𝐴 ∩ 𝐵) ⊊ 𝐴 → (((𝐴 ∩ 𝐵) ⊊ 𝐴 ∨ (𝐴 ∩ 𝐵) = 𝐴) → ((𝐴 ∩ 𝐵) = 𝐴 ∨ (𝐴 ∩ 𝐵) = 𝐵)))
54		orel1 885	. . . . . 6 ⊢ (¬ (𝐴 ∩ 𝐵) ⊊ 𝐵 → (((𝐴 ∩ 𝐵) ⊊ 𝐵 ∨ (𝐴 ∩ 𝐵) = 𝐵) → (𝐴 ∩ 𝐵) = 𝐵))
55		olc 864	. . . . . 6 ⊢ ((𝐴 ∩ 𝐵) = 𝐵 → ((𝐴 ∩ 𝐵) = 𝐴 ∨ (𝐴 ∩ 𝐵) = 𝐵))
56	54, 55	syl6 35	. . . . 5 ⊢ (¬ (𝐴 ∩ 𝐵) ⊊ 𝐵 → (((𝐴 ∩ 𝐵) ⊊ 𝐵 ∨ (𝐴 ∩ 𝐵) = 𝐵) → ((𝐴 ∩ 𝐵) = 𝐴 ∨ (𝐴 ∩ 𝐵) = 𝐵)))
57	53, 56	jaoa 952	. . . 4 ⊢ ((¬ (𝐴 ∩ 𝐵) ⊊ 𝐴 ∨ ¬ (𝐴 ∩ 𝐵) ⊊ 𝐵) → ((((𝐴 ∩ 𝐵) ⊊ 𝐴 ∨ (𝐴 ∩ 𝐵) = 𝐴) ∧ ((𝐴 ∩ 𝐵) ⊊ 𝐵 ∨ (𝐴 ∩ 𝐵) = 𝐵)) → ((𝐴 ∩ 𝐵) = 𝐴 ∨ (𝐴 ∩ 𝐵) = 𝐵)))
58	47, 50, 57	mp2ani 694	. . 3 ⊢ ((¬ (𝐴 ∩ 𝐵) ⊊ 𝐴 ∨ ¬ (𝐴 ∩ 𝐵) ⊊ 𝐵) → ((𝐴 ∩ 𝐵) = 𝐴 ∨ (𝐴 ∩ 𝐵) = 𝐵))
59	45, 58	syl 17	. 2 ⊢ ((∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) ∧ ∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵)) → ((𝐴 ∩ 𝐵) = 𝐴 ∨ (𝐴 ∩ 𝐵) = 𝐵))
60		df-ss 3900	. . 3 ⊢ (𝐴 ⊆ 𝐵 ↔ (𝐴 ∩ 𝐵) = 𝐴)
61		sseqin2 4146	. . 3 ⊢ (𝐵 ⊆ 𝐴 ↔ (𝐴 ∩ 𝐵) = 𝐵)
62	60, 61	orbi12i 911	. 2 ⊢ ((𝐴 ⊆ 𝐵 ∨ 𝐵 ⊆ 𝐴) ↔ ((𝐴 ∩ 𝐵) = 𝐴 ∨ (𝐴 ∩ 𝐵) = 𝐵))
63	59, 62	sylibr 233	1 ⊢ ((∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) ∧ ∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵)) → (𝐴 ⊆ 𝐵 ∨ 𝐵 ⊆ 𝐴))

Syntax hints:  ¬ wn 3   → wi 4   ∧ wa 395   ∨ wo 843  ∀wal 1537   = wceq 1539   ∈ wcel 2108  ∀wral 3063  Vcvv 3422   ∩ cin 3882   ⊆ wss 3883   ⊊ wpss 3884  Tr wtr 5187

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1799  ax-4 1813  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2110  ax-9 2118  ax-10 2139  ax-11 2156  ax-12 2173  ax-ext 2709  ax-sep 5218  ax-nul 5225  ax-pr 5347  ax-un 7566

This theorem depends on definitions:  df-bi 206  df-an 396  df-or 844  df-3an 1087  df-tru 1542  df-fal 1552  df-ex 1784  df-nf 1788  df-sb 2069  df-clab 2716  df-cleq 2730  df-clel 2817  df-nfc 2888  df-ne 2943  df-ral 3068  df-rex 3069  df-rab 3072  df-v 3424  df-sbc 3712  df-dif 3886  df-un 3888  df-in 3890  df-ss 3900  df-pss 3902  df-nul 4254  df-pw 4532  df-sn 4559  df-pr 4561  df-uni 4837  df-iun 4923  df-tr 5188  df-suc 6257

This theorem is referenced by:  dfon2lem5  33669