Theorem dfon2lem4 35291

Description: Lemma for dfon2 35297. 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 4223	. . . . . . . . 9 ⊢ (𝐴 ∩ 𝐵) ⊆ 𝐴
2	1	sseli 3973	. . . . . . . 8 ⊢ ((𝐴 ∩ 𝐵) ∈ (𝐴 ∩ 𝐵) → (𝐴 ∩ 𝐵) ∈ 𝐴)
3		dfon2lem4.1	. . . . . . . . . . . 12 ⊢ 𝐴 ∈ V
4		dfon2lem3 35290	. . . . . . . . . . . 12 ⊢ (𝐴 ∈ V → (∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) → (Tr 𝐴 ∧ ∀𝑧 ∈ 𝐴 ¬ 𝑧 ∈ 𝑧)))
5	3, 4	ax-mp 5	. . . . . . . . . . 11 ⊢ (∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) → (Tr 𝐴 ∧ ∀𝑧 ∈ 𝐴 ¬ 𝑧 ∈ 𝑧))
6	5	simprd 495	. . . . . . . . . 10 ⊢ (∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) → ∀𝑧 ∈ 𝐴 ¬ 𝑧 ∈ 𝑧)
7		eleq1 2815	. . . . . . . . . . . . 13 ⊢ (𝑧 = (𝐴 ∩ 𝐵) → (𝑧 ∈ 𝑧 ↔ (𝐴 ∩ 𝐵) ∈ 𝑧))
8		eleq2 2816	. . . . . . . . . . . . 13 ⊢ (𝑧 = (𝐴 ∩ 𝐵) → ((𝐴 ∩ 𝐵) ∈ 𝑧 ↔ (𝐴 ∩ 𝐵) ∈ (𝐴 ∩ 𝐵)))
9	7, 8	bitrd 279	. . . . . . . . . . . 12 ⊢ (𝑧 = (𝐴 ∩ 𝐵) → (𝑧 ∈ 𝑧 ↔ (𝐴 ∩ 𝐵) ∈ (𝐴 ∩ 𝐵)))
10	9	notbid 318	. . . . . . . . . . 11 ⊢ (𝑧 = (𝐴 ∩ 𝐵) → (¬ 𝑧 ∈ 𝑧 ↔ ¬ (𝐴 ∩ 𝐵) ∈ (𝐴 ∩ 𝐵)))
11	10	rspccv 3603	. . . . . . . . . 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 3959	. . . . . 6 ⊢ ((𝐴 ∩ 𝐵) ∈ (𝐴 ∩ 𝐵) ↔ ((𝐴 ∩ 𝐵) ∈ 𝐴 ∧ (𝐴 ∩ 𝐵) ∈ 𝐵))
17	15, 16	sylnib 328	. . . . 5 ⊢ ((∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) ∧ ∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵)) → ¬ ((𝐴 ∩ 𝐵) ∈ 𝐴 ∧ (𝐴 ∩ 𝐵) ∈ 𝐵))
18	5	simpld 494	. . . . . . . 8 ⊢ (∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) → Tr 𝐴)
19		dfon2lem4.2	. . . . . . . . . 10 ⊢ 𝐵 ∈ V
20		dfon2lem3 35290	. . . . . . . . . 10 ⊢ (𝐵 ∈ V → (∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵) → (Tr 𝐵 ∧ ∀𝑧 ∈ 𝐵 ¬ 𝑧 ∈ 𝑧)))
21	19, 20	ax-mp 5	. . . . . . . . 9 ⊢ (∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵) → (Tr 𝐵 ∧ ∀𝑧 ∈ 𝐵 ¬ 𝑧 ∈ 𝑧))
22	21	simpld 494	. . . . . . . 8 ⊢ (∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵) → Tr 𝐵)
23		trin 5270	. . . . . . . 8 ⊢ ((Tr 𝐴 ∧ Tr 𝐵) → Tr (𝐴 ∩ 𝐵))
24	18, 22, 23	syl2an 595	. . . . . . 7 ⊢ ((∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) ∧ ∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵)) → Tr (𝐴 ∩ 𝐵))
25	3	inex1 5310	. . . . . . . . 9 ⊢ (𝐴 ∩ 𝐵) ∈ V
26		psseq1 4082	. . . . . . . . . . 11 ⊢ (𝑥 = (𝐴 ∩ 𝐵) → (𝑥 ⊊ 𝐴 ↔ (𝐴 ∩ 𝐵) ⊊ 𝐴))
27		treq 5266	. . . . . . . . . . 11 ⊢ (𝑥 = (𝐴 ∩ 𝐵) → (Tr 𝑥 ↔ Tr (𝐴 ∩ 𝐵)))
28	26, 27	anbi12d 630	. . . . . . . . . 10 ⊢ (𝑥 = (𝐴 ∩ 𝐵) → ((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) ↔ ((𝐴 ∩ 𝐵) ⊊ 𝐴 ∧ Tr (𝐴 ∩ 𝐵))))
29		eleq1 2815	. . . . . . . . . 10 ⊢ (𝑥 = (𝐴 ∩ 𝐵) → (𝑥 ∈ 𝐴 ↔ (𝐴 ∩ 𝐵) ∈ 𝐴))
30	28, 29	imbi12d 344	. . . . . . . . 9 ⊢ (𝑥 = (𝐴 ∩ 𝐵) → (((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) ↔ (((𝐴 ∩ 𝐵) ⊊ 𝐴 ∧ Tr (𝐴 ∩ 𝐵)) → (𝐴 ∩ 𝐵) ∈ 𝐴)))
31	25, 30	spcv 3589	. . . . . . . 8 ⊢ (∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) → (((𝐴 ∩ 𝐵) ⊊ 𝐴 ∧ Tr (𝐴 ∩ 𝐵)) → (𝐴 ∩ 𝐵) ∈ 𝐴))
32	31	adantr 480	. . . . . . 7 ⊢ ((∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) ∧ ∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵)) → (((𝐴 ∩ 𝐵) ⊊ 𝐴 ∧ Tr (𝐴 ∩ 𝐵)) → (𝐴 ∩ 𝐵) ∈ 𝐴))
33	24, 32	mpan2d 691	. . . . . 6 ⊢ ((∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) ∧ ∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵)) → ((𝐴 ∩ 𝐵) ⊊ 𝐴 → (𝐴 ∩ 𝐵) ∈ 𝐴))
34		psseq1 4082	. . . . . . . . . . 11 ⊢ (𝑦 = (𝐴 ∩ 𝐵) → (𝑦 ⊊ 𝐵 ↔ (𝐴 ∩ 𝐵) ⊊ 𝐵))
35		treq 5266	. . . . . . . . . . 11 ⊢ (𝑦 = (𝐴 ∩ 𝐵) → (Tr 𝑦 ↔ Tr (𝐴 ∩ 𝐵)))
36	34, 35	anbi12d 630	. . . . . . . . . 10 ⊢ (𝑦 = (𝐴 ∩ 𝐵) → ((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) ↔ ((𝐴 ∩ 𝐵) ⊊ 𝐵 ∧ Tr (𝐴 ∩ 𝐵))))
37		eleq1 2815	. . . . . . . . . 10 ⊢ (𝑦 = (𝐴 ∩ 𝐵) → (𝑦 ∈ 𝐵 ↔ (𝐴 ∩ 𝐵) ∈ 𝐵))
38	36, 37	imbi12d 344	. . . . . . . . 9 ⊢ (𝑦 = (𝐴 ∩ 𝐵) → (((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵) ↔ (((𝐴 ∩ 𝐵) ⊊ 𝐵 ∧ Tr (𝐴 ∩ 𝐵)) → (𝐴 ∩ 𝐵) ∈ 𝐵)))
39	25, 38	spcv 3589	. . . . . . . 8 ⊢ (∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵) → (((𝐴 ∩ 𝐵) ⊊ 𝐵 ∧ Tr (𝐴 ∩ 𝐵)) → (𝐴 ∩ 𝐵) ∈ 𝐵))
40	39	adantl 481	. . . . . . 7 ⊢ ((∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) ∧ ∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵)) → (((𝐴 ∩ 𝐵) ⊊ 𝐵 ∧ Tr (𝐴 ∩ 𝐵)) → (𝐴 ∩ 𝐵) ∈ 𝐵))
41	24, 40	mpan2d 691	. . . . . 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 4094	. . . . 5 ⊢ ((𝐴 ∩ 𝐵) ⊆ 𝐴 ↔ ((𝐴 ∩ 𝐵) ⊊ 𝐴 ∨ (𝐴 ∩ 𝐵) = 𝐴))
47	1, 46	mpbi 229	. . . 4 ⊢ ((𝐴 ∩ 𝐵) ⊊ 𝐴 ∨ (𝐴 ∩ 𝐵) = 𝐴)
48		inss2 4224	. . . . 5 ⊢ (𝐴 ∩ 𝐵) ⊆ 𝐵
49		sspss 4094	. . . . 5 ⊢ ((𝐴 ∩ 𝐵) ⊆ 𝐵 ↔ ((𝐴 ∩ 𝐵) ⊊ 𝐵 ∨ (𝐴 ∩ 𝐵) = 𝐵))
50	48, 49	mpbi 229	. . . 4 ⊢ ((𝐴 ∩ 𝐵) ⊊ 𝐵 ∨ (𝐴 ∩ 𝐵) = 𝐵)
51		orel1 885	. . . . . 6 ⊢ (¬ (𝐴 ∩ 𝐵) ⊊ 𝐴 → (((𝐴 ∩ 𝐵) ⊊ 𝐴 ∨ (𝐴 ∩ 𝐵) = 𝐴) → (𝐴 ∩ 𝐵) = 𝐴))
52		orc 864	. . . . . 6 ⊢ ((𝐴 ∩ 𝐵) = 𝐴 → ((𝐴 ∩ 𝐵) = 𝐴 ∨ (𝐴 ∩ 𝐵) = 𝐵))
53	51, 52	syl6 35	. . . . 5 ⊢ (¬ (𝐴 ∩ 𝐵) ⊊ 𝐴 → (((𝐴 ∩ 𝐵) ⊊ 𝐴 ∨ (𝐴 ∩ 𝐵) = 𝐴) → ((𝐴 ∩ 𝐵) = 𝐴 ∨ (𝐴 ∩ 𝐵) = 𝐵)))
54		orel1 885	. . . . . 6 ⊢ (¬ (𝐴 ∩ 𝐵) ⊊ 𝐵 → (((𝐴 ∩ 𝐵) ⊊ 𝐵 ∨ (𝐴 ∩ 𝐵) = 𝐵) → (𝐴 ∩ 𝐵) = 𝐵))
55		olc 865	. . . . . 6 ⊢ ((𝐴 ∩ 𝐵) = 𝐵 → ((𝐴 ∩ 𝐵) = 𝐴 ∨ (𝐴 ∩ 𝐵) = 𝐵))
56	54, 55	syl6 35	. . . . 5 ⊢ (¬ (𝐴 ∩ 𝐵) ⊊ 𝐵 → (((𝐴 ∩ 𝐵) ⊊ 𝐵 ∨ (𝐴 ∩ 𝐵) = 𝐵) → ((𝐴 ∩ 𝐵) = 𝐴 ∨ (𝐴 ∩ 𝐵) = 𝐵)))
57	53, 56	jaoa 952	. . . 4 ⊢ ((¬ (𝐴 ∩ 𝐵) ⊊ 𝐴 ∨ ¬ (𝐴 ∩ 𝐵) ⊊ 𝐵) → ((((𝐴 ∩ 𝐵) ⊊ 𝐴 ∨ (𝐴 ∩ 𝐵) = 𝐴) ∧ ((𝐴 ∩ 𝐵) ⊊ 𝐵 ∨ (𝐴 ∩ 𝐵) = 𝐵)) → ((𝐴 ∩ 𝐵) = 𝐴 ∨ (𝐴 ∩ 𝐵) = 𝐵)))
58	47, 50, 57	mp2ani 695	. . 3 ⊢ ((¬ (𝐴 ∩ 𝐵) ⊊ 𝐴 ∨ ¬ (𝐴 ∩ 𝐵) ⊊ 𝐵) → ((𝐴 ∩ 𝐵) = 𝐴 ∨ (𝐴 ∩ 𝐵) = 𝐵))
59	45, 58	syl 17	. 2 ⊢ ((∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) ∧ ∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵)) → ((𝐴 ∩ 𝐵) = 𝐴 ∨ (𝐴 ∩ 𝐵) = 𝐵))
60		df-ss 3960	. . 3 ⊢ (𝐴 ⊆ 𝐵 ↔ (𝐴 ∩ 𝐵) = 𝐴)
61		sseqin2 4210	. . 3 ⊢ (𝐵 ⊆ 𝐴 ↔ (𝐴 ∩ 𝐵) = 𝐵)
62	60, 61	orbi12i 911	. 2 ⊢ ((𝐴 ⊆ 𝐵 ∨ 𝐵 ⊆ 𝐴) ↔ ((𝐴 ∩ 𝐵) = 𝐴 ∨ (𝐴 ∩ 𝐵) = 𝐵))
63	59, 62	sylibr 233	1 ⊢ ((∀𝑥((𝑥 ⊊ 𝐴 ∧ Tr 𝑥) → 𝑥 ∈ 𝐴) ∧ ∀𝑦((𝑦 ⊊ 𝐵 ∧ Tr 𝑦) → 𝑦 ∈ 𝐵)) → (𝐴 ⊆ 𝐵 ∨ 𝐵 ⊆ 𝐴))

Syntax hints:  ¬ wn 3   → wi 4   ∧ wa 395   ∨ wo 844  ∀wal 1531   = wceq 1533   ∈ wcel 2098  ∀wral 3055  Vcvv 3468   ∩ cin 3942   ⊆ wss 3943   ⊊ wpss 3944  Tr wtr 5258

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1789  ax-4 1803  ax-5 1905  ax-6 1963  ax-7 2003  ax-8 2100  ax-9 2108  ax-10 2129  ax-11 2146  ax-12 2163  ax-ext 2697  ax-sep 5292  ax-nul 5299  ax-pr 5420  ax-un 7722

This theorem depends on definitions:  df-bi 206  df-an 396  df-or 845  df-3an 1086  df-tru 1536  df-fal 1546  df-ex 1774  df-nf 1778  df-sb 2060  df-clab 2704  df-cleq 2718  df-clel 2804  df-nfc 2879  df-ne 2935  df-ral 3056  df-rex 3065  df-rab 3427  df-v 3470  df-sbc 3773  df-dif 3946  df-un 3948  df-in 3950  df-ss 3960  df-pss 3962  df-nul 4318  df-pw 4599  df-sn 4624  df-pr 4626  df-uni 4903  df-iun 4992  df-tr 5259  df-suc 6364

This theorem is referenced by:  dfon2lem5  35292