Theorem sumdmdlem2 30199

Description: Lemma for sumdmdi 30200. (Contributed by NM, 23-Dec-2004.) (New usage is discouraged.)

Hypotheses

Ref	Expression
sumdmdi.1	⊢ 𝐴 ∈ Cℋ
sumdmdi.2	⊢ 𝐵 ∈ Cℋ

Assertion

Ref	Expression
sumdmdlem2	⊢ (∀𝑥 ∈ HAtoms ((𝑥 ∨ℋ 𝐵) ∩ (𝐴 ∨ℋ 𝐵)) ⊆ (((𝑥 ∨ℋ 𝐵) ∩ 𝐴) ∨ℋ 𝐵) → (𝐴 +ℋ 𝐵) = (𝐴 ∨ℋ 𝐵))

Distinct variable groups:   𝑥,𝐴   𝑥,𝐵

Proof of Theorem sumdmdlem2

Dummy variable 𝑦 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		sumdmdi.1	. . . . . . . 8 ⊢ 𝐴 ∈ Cℋ
2		sumdmdi.2	. . . . . . . 8 ⊢ 𝐵 ∈ Cℋ
3	1, 2	chjcli 29237	. . . . . . 7 ⊢ (𝐴 ∨ℋ 𝐵) ∈ Cℋ
4	3	cheli 29012	. . . . . 6 ⊢ (𝑦 ∈ (𝐴 ∨ℋ 𝐵) → 𝑦 ∈ ℋ)
5		spansnsh 29341	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ ℋ → (span‘{𝑦}) ∈ Sℋ )
6	2	chshii 29007	. . . . . . . . . . . . 13 ⊢ 𝐵 ∈ Sℋ
7		shsub2 29105	. . . . . . . . . . . . 13 ⊢ (((span‘{𝑦}) ∈ Sℋ ∧ 𝐵 ∈ Sℋ ) → (span‘{𝑦}) ⊆ (𝐵 +ℋ (span‘{𝑦})))
8	5, 6, 7	sylancl 588	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ ℋ → (span‘{𝑦}) ⊆ (𝐵 +ℋ (span‘{𝑦})))
9		spansnid 29343	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ ℋ → 𝑦 ∈ (span‘{𝑦}))
10	8, 9	sseldd 3971	. . . . . . . . . . 11 ⊢ (𝑦 ∈ ℋ → 𝑦 ∈ (𝐵 +ℋ (span‘{𝑦})))
11	10	ad2antrl 726	. . . . . . . . . 10 ⊢ ((∀𝑥 ∈ HAtoms ((𝑥 ∨ℋ 𝐵) ∩ (𝐴 ∨ℋ 𝐵)) ⊆ (((𝑥 ∨ℋ 𝐵) ∩ 𝐴) ∨ℋ 𝐵) ∧ (𝑦 ∈ ℋ ∧ ¬ 𝑦 ∈ (𝐴 +ℋ 𝐵))) → 𝑦 ∈ (𝐵 +ℋ (span‘{𝑦})))
12		elin 4172	. . . . . . . . . . 11 ⊢ (𝑦 ∈ ((𝐵 +ℋ (span‘{𝑦})) ∩ (𝐴 ∨ℋ 𝐵)) ↔ (𝑦 ∈ (𝐵 +ℋ (span‘{𝑦})) ∧ 𝑦 ∈ (𝐴 ∨ℋ 𝐵)))
13		df-ne 3020	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑦 ≠ 0ℎ ↔ ¬ 𝑦 = 0ℎ)
14		spansna 30130	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑦 ∈ ℋ ∧ 𝑦 ≠ 0ℎ) → (span‘{𝑦}) ∈ HAtoms)
15	13, 14	sylan2br 596	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑦 ∈ ℋ ∧ ¬ 𝑦 = 0ℎ) → (span‘{𝑦}) ∈ HAtoms)
16		oveq1 7166	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑥 = (span‘{𝑦}) → (𝑥 ∨ℋ 𝐵) = ((span‘{𝑦}) ∨ℋ 𝐵))
17	16	ineq1d 4191	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑥 = (span‘{𝑦}) → ((𝑥 ∨ℋ 𝐵) ∩ (𝐴 ∨ℋ 𝐵)) = (((span‘{𝑦}) ∨ℋ 𝐵) ∩ (𝐴 ∨ℋ 𝐵)))
18	16	ineq1d 4191	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑥 = (span‘{𝑦}) → ((𝑥 ∨ℋ 𝐵) ∩ 𝐴) = (((span‘{𝑦}) ∨ℋ 𝐵) ∩ 𝐴))
19	18	oveq1d 7174	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑥 = (span‘{𝑦}) → (((𝑥 ∨ℋ 𝐵) ∩ 𝐴) ∨ℋ 𝐵) = ((((span‘{𝑦}) ∨ℋ 𝐵) ∩ 𝐴) ∨ℋ 𝐵))
20	17, 19	sseq12d 4003	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑥 = (span‘{𝑦}) → (((𝑥 ∨ℋ 𝐵) ∩ (𝐴 ∨ℋ 𝐵)) ⊆ (((𝑥 ∨ℋ 𝐵) ∩ 𝐴) ∨ℋ 𝐵) ↔ (((span‘{𝑦}) ∨ℋ 𝐵) ∩ (𝐴 ∨ℋ 𝐵)) ⊆ ((((span‘{𝑦}) ∨ℋ 𝐵) ∩ 𝐴) ∨ℋ 𝐵)))
21	20	rspcv 3621	. . . . . . . . . . . . . . . . . . 19 ⊢ ((span‘{𝑦}) ∈ HAtoms → (∀𝑥 ∈ HAtoms ((𝑥 ∨ℋ 𝐵) ∩ (𝐴 ∨ℋ 𝐵)) ⊆ (((𝑥 ∨ℋ 𝐵) ∩ 𝐴) ∨ℋ 𝐵) → (((span‘{𝑦}) ∨ℋ 𝐵) ∩ (𝐴 ∨ℋ 𝐵)) ⊆ ((((span‘{𝑦}) ∨ℋ 𝐵) ∩ 𝐴) ∨ℋ 𝐵)))
22	15, 21	syl 17	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑦 ∈ ℋ ∧ ¬ 𝑦 = 0ℎ) → (∀𝑥 ∈ HAtoms ((𝑥 ∨ℋ 𝐵) ∩ (𝐴 ∨ℋ 𝐵)) ⊆ (((𝑥 ∨ℋ 𝐵) ∩ 𝐴) ∨ℋ 𝐵) → (((span‘{𝑦}) ∨ℋ 𝐵) ∩ (𝐴 ∨ℋ 𝐵)) ⊆ ((((span‘{𝑦}) ∨ℋ 𝐵) ∩ 𝐴) ∨ℋ 𝐵)))
23		spansnj 29427	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((𝐵 ∈ Cℋ ∧ 𝑦 ∈ ℋ) → (𝐵 +ℋ (span‘{𝑦})) = (𝐵 ∨ℋ (span‘{𝑦})))
24		spansnch 29340	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝑦 ∈ ℋ → (span‘{𝑦}) ∈ Cℋ )
25		chjcom 29286	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((𝐵 ∈ Cℋ ∧ (span‘{𝑦}) ∈ Cℋ ) → (𝐵 ∨ℋ (span‘{𝑦})) = ((span‘{𝑦}) ∨ℋ 𝐵))
26	24, 25	sylan2 594	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((𝐵 ∈ Cℋ ∧ 𝑦 ∈ ℋ) → (𝐵 ∨ℋ (span‘{𝑦})) = ((span‘{𝑦}) ∨ℋ 𝐵))
27	23, 26	eqtrd 2859	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝐵 ∈ Cℋ ∧ 𝑦 ∈ ℋ) → (𝐵 +ℋ (span‘{𝑦})) = ((span‘{𝑦}) ∨ℋ 𝐵))
28	2, 27	mpan 688	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑦 ∈ ℋ → (𝐵 +ℋ (span‘{𝑦})) = ((span‘{𝑦}) ∨ℋ 𝐵))
29	28	ineq1d 4191	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑦 ∈ ℋ → ((𝐵 +ℋ (span‘{𝑦})) ∩ (𝐴 ∨ℋ 𝐵)) = (((span‘{𝑦}) ∨ℋ 𝐵) ∩ (𝐴 ∨ℋ 𝐵)))
30	28	ineq1d 4191	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑦 ∈ ℋ → ((𝐵 +ℋ (span‘{𝑦})) ∩ 𝐴) = (((span‘{𝑦}) ∨ℋ 𝐵) ∩ 𝐴))
31	30	oveq1d 7174	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑦 ∈ ℋ → (((𝐵 +ℋ (span‘{𝑦})) ∩ 𝐴) ∨ℋ 𝐵) = ((((span‘{𝑦}) ∨ℋ 𝐵) ∩ 𝐴) ∨ℋ 𝐵))
32	29, 31	sseq12d 4003	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑦 ∈ ℋ → (((𝐵 +ℋ (span‘{𝑦})) ∩ (𝐴 ∨ℋ 𝐵)) ⊆ (((𝐵 +ℋ (span‘{𝑦})) ∩ 𝐴) ∨ℋ 𝐵) ↔ (((span‘{𝑦}) ∨ℋ 𝐵) ∩ (𝐴 ∨ℋ 𝐵)) ⊆ ((((span‘{𝑦}) ∨ℋ 𝐵) ∩ 𝐴) ∨ℋ 𝐵)))
33	32	adantr 483	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑦 ∈ ℋ ∧ ¬ 𝑦 = 0ℎ) → (((𝐵 +ℋ (span‘{𝑦})) ∩ (𝐴 ∨ℋ 𝐵)) ⊆ (((𝐵 +ℋ (span‘{𝑦})) ∩ 𝐴) ∨ℋ 𝐵) ↔ (((span‘{𝑦}) ∨ℋ 𝐵) ∩ (𝐴 ∨ℋ 𝐵)) ⊆ ((((span‘{𝑦}) ∨ℋ 𝐵) ∩ 𝐴) ∨ℋ 𝐵)))
34	22, 33	sylibrd 261	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑦 ∈ ℋ ∧ ¬ 𝑦 = 0ℎ) → (∀𝑥 ∈ HAtoms ((𝑥 ∨ℋ 𝐵) ∩ (𝐴 ∨ℋ 𝐵)) ⊆ (((𝑥 ∨ℋ 𝐵) ∩ 𝐴) ∨ℋ 𝐵) → ((𝐵 +ℋ (span‘{𝑦})) ∩ (𝐴 ∨ℋ 𝐵)) ⊆ (((𝐵 +ℋ (span‘{𝑦})) ∩ 𝐴) ∨ℋ 𝐵)))
35	34	com12 32	. . . . . . . . . . . . . . . 16 ⊢ (∀𝑥 ∈ HAtoms ((𝑥 ∨ℋ 𝐵) ∩ (𝐴 ∨ℋ 𝐵)) ⊆ (((𝑥 ∨ℋ 𝐵) ∩ 𝐴) ∨ℋ 𝐵) → ((𝑦 ∈ ℋ ∧ ¬ 𝑦 = 0ℎ) → ((𝐵 +ℋ (span‘{𝑦})) ∩ (𝐴 ∨ℋ 𝐵)) ⊆ (((𝐵 +ℋ (span‘{𝑦})) ∩ 𝐴) ∨ℋ 𝐵)))
36	35	expdimp 455	. . . . . . . . . . . . . . 15 ⊢ ((∀𝑥 ∈ HAtoms ((𝑥 ∨ℋ 𝐵) ∩ (𝐴 ∨ℋ 𝐵)) ⊆ (((𝑥 ∨ℋ 𝐵) ∩ 𝐴) ∨ℋ 𝐵) ∧ 𝑦 ∈ ℋ) → (¬ 𝑦 = 0ℎ → ((𝐵 +ℋ (span‘{𝑦})) ∩ (𝐴 ∨ℋ 𝐵)) ⊆ (((𝐵 +ℋ (span‘{𝑦})) ∩ 𝐴) ∨ℋ 𝐵)))
37		ssid 3992	. . . . . . . . . . . . . . . 16 ⊢ 𝐵 ⊆ 𝐵
38		sneq 4580	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑦 = 0ℎ → {𝑦} = {0ℎ})
39	38	fveq2d 6677	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑦 = 0ℎ → (span‘{𝑦}) = (span‘{0ℎ}))
40		spansn0 29321	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (span‘{0ℎ}) = 0ℋ
41	39, 40	syl6eq 2875	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑦 = 0ℎ → (span‘{𝑦}) = 0ℋ)
42	41	oveq2d 7175	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑦 = 0ℎ → (𝐵 +ℋ (span‘{𝑦})) = (𝐵 +ℋ 0ℋ))
43	6	shs0i 29229	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝐵 +ℋ 0ℋ) = 𝐵
44	42, 43	syl6eq 2875	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑦 = 0ℎ → (𝐵 +ℋ (span‘{𝑦})) = 𝐵)
45	44	ineq1d 4191	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑦 = 0ℎ → ((𝐵 +ℋ (span‘{𝑦})) ∩ (𝐴 ∨ℋ 𝐵)) = (𝐵 ∩ (𝐴 ∨ℋ 𝐵)))
46		inss1 4208	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝐵 ∩ (𝐴 ∨ℋ 𝐵)) ⊆ 𝐵
47	2, 1	chub2i 29250	. . . . . . . . . . . . . . . . . . . 20 ⊢ 𝐵 ⊆ (𝐴 ∨ℋ 𝐵)
48	37, 47	ssini 4211	. . . . . . . . . . . . . . . . . . 19 ⊢ 𝐵 ⊆ (𝐵 ∩ (𝐴 ∨ℋ 𝐵))
49	46, 48	eqssi 3986	. . . . . . . . . . . . . . . . . 18 ⊢ (𝐵 ∩ (𝐴 ∨ℋ 𝐵)) = 𝐵
50	45, 49	syl6eq 2875	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 = 0ℎ → ((𝐵 +ℋ (span‘{𝑦})) ∩ (𝐴 ∨ℋ 𝐵)) = 𝐵)
51	44	ineq1d 4191	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑦 = 0ℎ → ((𝐵 +ℋ (span‘{𝑦})) ∩ 𝐴) = (𝐵 ∩ 𝐴))
52	51	oveq1d 7174	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑦 = 0ℎ → (((𝐵 +ℋ (span‘{𝑦})) ∩ 𝐴) ∨ℋ 𝐵) = ((𝐵 ∩ 𝐴) ∨ℋ 𝐵))
53	2, 1	chincli 29240	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝐵 ∩ 𝐴) ∈ Cℋ
54	53, 2	chjcomi 29248	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝐵 ∩ 𝐴) ∨ℋ 𝐵) = (𝐵 ∨ℋ (𝐵 ∩ 𝐴))
55	2, 1	chabs1i 29298	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝐵 ∨ℋ (𝐵 ∩ 𝐴)) = 𝐵
56	54, 55	eqtri 2847	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝐵 ∩ 𝐴) ∨ℋ 𝐵) = 𝐵
57	52, 56	syl6eq 2875	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 = 0ℎ → (((𝐵 +ℋ (span‘{𝑦})) ∩ 𝐴) ∨ℋ 𝐵) = 𝐵)
58	50, 57	sseq12d 4003	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 = 0ℎ → (((𝐵 +ℋ (span‘{𝑦})) ∩ (𝐴 ∨ℋ 𝐵)) ⊆ (((𝐵 +ℋ (span‘{𝑦})) ∩ 𝐴) ∨ℋ 𝐵) ↔ 𝐵 ⊆ 𝐵))
59	37, 58	mpbiri 260	. . . . . . . . . . . . . . 15 ⊢ (𝑦 = 0ℎ → ((𝐵 +ℋ (span‘{𝑦})) ∩ (𝐴 ∨ℋ 𝐵)) ⊆ (((𝐵 +ℋ (span‘{𝑦})) ∩ 𝐴) ∨ℋ 𝐵))
60	36, 59	pm2.61d2 183	. . . . . . . . . . . . . 14 ⊢ ((∀𝑥 ∈ HAtoms ((𝑥 ∨ℋ 𝐵) ∩ (𝐴 ∨ℋ 𝐵)) ⊆ (((𝑥 ∨ℋ 𝐵) ∩ 𝐴) ∨ℋ 𝐵) ∧ 𝑦 ∈ ℋ) → ((𝐵 +ℋ (span‘{𝑦})) ∩ (𝐴 ∨ℋ 𝐵)) ⊆ (((𝐵 +ℋ (span‘{𝑦})) ∩ 𝐴) ∨ℋ 𝐵))
61	60	adantrr 715	. . . . . . . . . . . . 13 ⊢ ((∀𝑥 ∈ HAtoms ((𝑥 ∨ℋ 𝐵) ∩ (𝐴 ∨ℋ 𝐵)) ⊆ (((𝑥 ∨ℋ 𝐵) ∩ 𝐴) ∨ℋ 𝐵) ∧ (𝑦 ∈ ℋ ∧ ¬ 𝑦 ∈ (𝐴 +ℋ 𝐵))) → ((𝐵 +ℋ (span‘{𝑦})) ∩ (𝐴 ∨ℋ 𝐵)) ⊆ (((𝐵 +ℋ (span‘{𝑦})) ∩ 𝐴) ∨ℋ 𝐵))
62	1, 2	sumdmdlem 30198	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑦 ∈ ℋ ∧ ¬ 𝑦 ∈ (𝐴 +ℋ 𝐵)) → ((𝐵 +ℋ (span‘{𝑦})) ∩ 𝐴) = (𝐵 ∩ 𝐴))
63	62	oveq1d 7174	. . . . . . . . . . . . . . . 16 ⊢ ((𝑦 ∈ ℋ ∧ ¬ 𝑦 ∈ (𝐴 +ℋ 𝐵)) → (((𝐵 +ℋ (span‘{𝑦})) ∩ 𝐴) ∨ℋ 𝐵) = ((𝐵 ∩ 𝐴) ∨ℋ 𝐵))
64	63, 56	syl6eq 2875	. . . . . . . . . . . . . . 15 ⊢ ((𝑦 ∈ ℋ ∧ ¬ 𝑦 ∈ (𝐴 +ℋ 𝐵)) → (((𝐵 +ℋ (span‘{𝑦})) ∩ 𝐴) ∨ℋ 𝐵) = 𝐵)
65	1	chshii 29007	. . . . . . . . . . . . . . . 16 ⊢ 𝐴 ∈ Sℋ
66	6, 65	shsub2i 29153	. . . . . . . . . . . . . . 15 ⊢ 𝐵 ⊆ (𝐴 +ℋ 𝐵)
67	64, 66	eqsstrdi 4024	. . . . . . . . . . . . . 14 ⊢ ((𝑦 ∈ ℋ ∧ ¬ 𝑦 ∈ (𝐴 +ℋ 𝐵)) → (((𝐵 +ℋ (span‘{𝑦})) ∩ 𝐴) ∨ℋ 𝐵) ⊆ (𝐴 +ℋ 𝐵))
68	67	adantl 484	. . . . . . . . . . . . 13 ⊢ ((∀𝑥 ∈ HAtoms ((𝑥 ∨ℋ 𝐵) ∩ (𝐴 ∨ℋ 𝐵)) ⊆ (((𝑥 ∨ℋ 𝐵) ∩ 𝐴) ∨ℋ 𝐵) ∧ (𝑦 ∈ ℋ ∧ ¬ 𝑦 ∈ (𝐴 +ℋ 𝐵))) → (((𝐵 +ℋ (span‘{𝑦})) ∩ 𝐴) ∨ℋ 𝐵) ⊆ (𝐴 +ℋ 𝐵))
69	61, 68	sstrd 3980	. . . . . . . . . . . 12 ⊢ ((∀𝑥 ∈ HAtoms ((𝑥 ∨ℋ 𝐵) ∩ (𝐴 ∨ℋ 𝐵)) ⊆ (((𝑥 ∨ℋ 𝐵) ∩ 𝐴) ∨ℋ 𝐵) ∧ (𝑦 ∈ ℋ ∧ ¬ 𝑦 ∈ (𝐴 +ℋ 𝐵))) → ((𝐵 +ℋ (span‘{𝑦})) ∩ (𝐴 ∨ℋ 𝐵)) ⊆ (𝐴 +ℋ 𝐵))
70	69	sseld 3969	. . . . . . . . . . 11 ⊢ ((∀𝑥 ∈ HAtoms ((𝑥 ∨ℋ 𝐵) ∩ (𝐴 ∨ℋ 𝐵)) ⊆ (((𝑥 ∨ℋ 𝐵) ∩ 𝐴) ∨ℋ 𝐵) ∧ (𝑦 ∈ ℋ ∧ ¬ 𝑦 ∈ (𝐴 +ℋ 𝐵))) → (𝑦 ∈ ((𝐵 +ℋ (span‘{𝑦})) ∩ (𝐴 ∨ℋ 𝐵)) → 𝑦 ∈ (𝐴 +ℋ 𝐵)))
71	12, 70	syl5bir 245	. . . . . . . . . 10 ⊢ ((∀𝑥 ∈ HAtoms ((𝑥 ∨ℋ 𝐵) ∩ (𝐴 ∨ℋ 𝐵)) ⊆ (((𝑥 ∨ℋ 𝐵) ∩ 𝐴) ∨ℋ 𝐵) ∧ (𝑦 ∈ ℋ ∧ ¬ 𝑦 ∈ (𝐴 +ℋ 𝐵))) → ((𝑦 ∈ (𝐵 +ℋ (span‘{𝑦})) ∧ 𝑦 ∈ (𝐴 ∨ℋ 𝐵)) → 𝑦 ∈ (𝐴 +ℋ 𝐵)))
72	11, 71	mpand 693	. . . . . . . . 9 ⊢ ((∀𝑥 ∈ HAtoms ((𝑥 ∨ℋ 𝐵) ∩ (𝐴 ∨ℋ 𝐵)) ⊆ (((𝑥 ∨ℋ 𝐵) ∩ 𝐴) ∨ℋ 𝐵) ∧ (𝑦 ∈ ℋ ∧ ¬ 𝑦 ∈ (𝐴 +ℋ 𝐵))) → (𝑦 ∈ (𝐴 ∨ℋ 𝐵) → 𝑦 ∈ (𝐴 +ℋ 𝐵)))
73	72	exp32 423	. . . . . . . 8 ⊢ (∀𝑥 ∈ HAtoms ((𝑥 ∨ℋ 𝐵) ∩ (𝐴 ∨ℋ 𝐵)) ⊆ (((𝑥 ∨ℋ 𝐵) ∩ 𝐴) ∨ℋ 𝐵) → (𝑦 ∈ ℋ → (¬ 𝑦 ∈ (𝐴 +ℋ 𝐵) → (𝑦 ∈ (𝐴 ∨ℋ 𝐵) → 𝑦 ∈ (𝐴 +ℋ 𝐵)))))
74	73	com34 91	. . . . . . 7 ⊢ (∀𝑥 ∈ HAtoms ((𝑥 ∨ℋ 𝐵) ∩ (𝐴 ∨ℋ 𝐵)) ⊆ (((𝑥 ∨ℋ 𝐵) ∩ 𝐴) ∨ℋ 𝐵) → (𝑦 ∈ ℋ → (𝑦 ∈ (𝐴 ∨ℋ 𝐵) → (¬ 𝑦 ∈ (𝐴 +ℋ 𝐵) → 𝑦 ∈ (𝐴 +ℋ 𝐵)))))
75		pm2.18 128	. . . . . . 7 ⊢ ((¬ 𝑦 ∈ (𝐴 +ℋ 𝐵) → 𝑦 ∈ (𝐴 +ℋ 𝐵)) → 𝑦 ∈ (𝐴 +ℋ 𝐵))
76	74, 75	syl8 76	. . . . . 6 ⊢ (∀𝑥 ∈ HAtoms ((𝑥 ∨ℋ 𝐵) ∩ (𝐴 ∨ℋ 𝐵)) ⊆ (((𝑥 ∨ℋ 𝐵) ∩ 𝐴) ∨ℋ 𝐵) → (𝑦 ∈ ℋ → (𝑦 ∈ (𝐴 ∨ℋ 𝐵) → 𝑦 ∈ (𝐴 +ℋ 𝐵))))
77	4, 76	syl5 34	. . . . 5 ⊢ (∀𝑥 ∈ HAtoms ((𝑥 ∨ℋ 𝐵) ∩ (𝐴 ∨ℋ 𝐵)) ⊆ (((𝑥 ∨ℋ 𝐵) ∩ 𝐴) ∨ℋ 𝐵) → (𝑦 ∈ (𝐴 ∨ℋ 𝐵) → (𝑦 ∈ (𝐴 ∨ℋ 𝐵) → 𝑦 ∈ (𝐴 +ℋ 𝐵))))
78	77	pm2.43d 53	. . . 4 ⊢ (∀𝑥 ∈ HAtoms ((𝑥 ∨ℋ 𝐵) ∩ (𝐴 ∨ℋ 𝐵)) ⊆ (((𝑥 ∨ℋ 𝐵) ∩ 𝐴) ∨ℋ 𝐵) → (𝑦 ∈ (𝐴 ∨ℋ 𝐵) → 𝑦 ∈ (𝐴 +ℋ 𝐵)))
79	78	ssrdv 3976	. . 3 ⊢ (∀𝑥 ∈ HAtoms ((𝑥 ∨ℋ 𝐵) ∩ (𝐴 ∨ℋ 𝐵)) ⊆ (((𝑥 ∨ℋ 𝐵) ∩ 𝐴) ∨ℋ 𝐵) → (𝐴 ∨ℋ 𝐵) ⊆ (𝐴 +ℋ 𝐵))
80	1, 2	chsleji 29238	. . 3 ⊢ (𝐴 +ℋ 𝐵) ⊆ (𝐴 ∨ℋ 𝐵)
81	79, 80	jctil 522	. 2 ⊢ (∀𝑥 ∈ HAtoms ((𝑥 ∨ℋ 𝐵) ∩ (𝐴 ∨ℋ 𝐵)) ⊆ (((𝑥 ∨ℋ 𝐵) ∩ 𝐴) ∨ℋ 𝐵) → ((𝐴 +ℋ 𝐵) ⊆ (𝐴 ∨ℋ 𝐵) ∧ (𝐴 ∨ℋ 𝐵) ⊆ (𝐴 +ℋ 𝐵)))
82		eqss 3985	. 2 ⊢ ((𝐴 +ℋ 𝐵) = (𝐴 ∨ℋ 𝐵) ↔ ((𝐴 +ℋ 𝐵) ⊆ (𝐴 ∨ℋ 𝐵) ∧ (𝐴 ∨ℋ 𝐵) ⊆ (𝐴 +ℋ 𝐵)))
83	81, 82	sylibr 236	1 ⊢ (∀𝑥 ∈ HAtoms ((𝑥 ∨ℋ 𝐵) ∩ (𝐴 ∨ℋ 𝐵)) ⊆ (((𝑥 ∨ℋ 𝐵) ∩ 𝐴) ∨ℋ 𝐵) → (𝐴 +ℋ 𝐵) = (𝐴 ∨ℋ 𝐵))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 208   ∧ wa 398   = wceq 1536   ∈ wcel 2113   ≠ wne 3019  ∀wral 3141   ∩ cin 3938   ⊆ wss 3939  {csn 4570  ‘cfv 6358  (class class class)co 7159   ℋchba 28699  0_ℎc0v 28704   S_ℋ csh 28708   C_ℋ cch 28709   +_ℋ cph 28711  spancspn 28712   ∨_ℋ chj 28713  0_ℋc0h 28715  HAtomscat 28745

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1969  ax-7 2014  ax-8 2115  ax-9 2123  ax-10 2144  ax-11 2160  ax-12 2176  ax-ext 2796  ax-rep 5193  ax-sep 5206  ax-nul 5213  ax-pow 5269  ax-pr 5333  ax-un 7464  ax-inf2 9107  ax-cc 9860  ax-cnex 10596  ax-resscn 10597  ax-1cn 10598  ax-icn 10599  ax-addcl 10600  ax-addrcl 10601  ax-mulcl 10602  ax-mulrcl 10603  ax-mulcom 10604  ax-addass 10605  ax-mulass 10606  ax-distr 10607  ax-i2m1 10608  ax-1ne0 10609  ax-1rid 10610  ax-rnegex 10611  ax-rrecex 10612  ax-cnre 10613  ax-pre-lttri 10614  ax-pre-lttrn 10615  ax-pre-ltadd 10616  ax-pre-mulgt0 10617  ax-pre-sup 10618  ax-addf 10619  ax-mulf 10620  ax-hilex 28779  ax-hfvadd 28780  ax-hvcom 28781  ax-hvass 28782  ax-hv0cl 28783  ax-hvaddid 28784  ax-hfvmul 28785  ax-hvmulid 28786  ax-hvmulass 28787  ax-hvdistr1 28788  ax-hvdistr2 28789  ax-hvmul0 28790  ax-hfi 28859  ax-his1 28862  ax-his2 28863  ax-his3 28864  ax-his4 28865  ax-hcompl 28982

This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-3or 1084  df-3an 1085  df-tru 1539  df-fal 1549  df-ex 1780  df-nf 1784  df-sb 2069  df-mo 2621  df-eu 2653  df-clab 2803  df-cleq 2817  df-clel 2896  df-nfc 2966  df-ne 3020  df-nel 3127  df-ral 3146  df-rex 3147  df-reu 3148  df-rmo 3149  df-rab 3150  df-v 3499  df-sbc 3776  df-csb 3887  df-dif 3942  df-un 3944  df-in 3946  df-ss 3955  df-pss 3957  df-nul 4295  df-if 4471  df-pw 4544  df-sn 4571  df-pr 4573  df-tp 4575  df-op 4577  df-uni 4842  df-int 4880  df-iun 4924  df-iin 4925  df-br 5070  df-opab 5132  df-mpt 5150  df-tr 5176  df-id 5463  df-eprel 5468  df-po 5477  df-so 5478  df-fr 5517  df-se 5518  df-we 5519  df-xp 5564  df-rel 5565  df-cnv 5566  df-co 5567  df-dm 5568  df-rn 5569  df-res 5570  df-ima 5571  df-pred 6151  df-ord 6197  df-on 6198  df-lim 6199  df-suc 6200  df-iota 6317  df-fun 6360  df-fn 6361  df-f 6362  df-f1 6363  df-fo 6364  df-f1o 6365  df-fv 6366  df-isom 6367  df-riota 7117  df-ov 7162  df-oprab 7163  df-mpo 7164  df-of 7412  df-om 7584  df-1st 7692  df-2nd 7693  df-supp 7834  df-wrecs 7950  df-recs 8011  df-rdg 8049  df-1o 8105  df-2o 8106  df-oadd 8109  df-omul 8110  df-er 8292  df-map 8411  df-pm 8412  df-ixp 8465  df-en 8513  df-dom 8514  df-sdom 8515  df-fin 8516  df-fsupp 8837  df-fi 8878  df-sup 8909  df-inf 8910  df-oi 8977  df-card 9371  df-acn 9374  df-pnf 10680  df-mnf 10681  df-xr 10682  df-ltxr 10683  df-le 10684  df-sub 10875  df-neg 10876  df-div 11301  df-nn 11642  df-2 11703  df-3 11704  df-4 11705  df-5 11706  df-6 11707  df-7 11708  df-8 11709  df-9 11710  df-n0 11901  df-z 11985  df-dec 12102  df-uz 12247  df-q 12352  df-rp 12393  df-xneg 12510  df-xadd 12511  df-xmul 12512  df-ioo 12745  df-ico 12747  df-icc 12748  df-fz 12896  df-fzo 13037  df-fl 13165  df-seq 13373  df-exp 13433  df-hash 13694  df-cj 14461  df-re 14462  df-im 14463  df-sqrt 14597  df-abs 14598  df-clim 14848  df-rlim 14849  df-sum 15046  df-struct 16488  df-ndx 16489  df-slot 16490  df-base 16492  df-sets 16493  df-ress 16494  df-plusg 16581  df-mulr 16582  df-starv 16583  df-sca 16584  df-vsca 16585  df-ip 16586  df-tset 16587  df-ple 16588  df-ds 16590  df-unif 16591  df-hom 16592  df-cco 16593  df-rest 16699  df-topn 16700  df-0g 16718  df-gsum 16719  df-topgen 16720  df-pt 16721  df-prds 16724  df-xrs 16778  df-qtop 16783  df-imas 16784  df-xps 16786  df-mre 16860  df-mrc 16861  df-acs 16863  df-mgm 17855  df-sgrp 17904  df-mnd 17915  df-submnd 17960  df-mulg 18228  df-cntz 18450  df-cmn 18911  df-psmet 20540  df-xmet 20541  df-met 20542  df-bl 20543  df-mopn 20544  df-fbas 20545  df-fg 20546  df-cnfld 20549  df-top 21505  df-topon 21522  df-topsp 21544  df-bases 21557  df-cld 21630  df-ntr 21631  df-cls 21632  df-nei 21709  df-cn 21838  df-cnp 21839  df-lm 21840  df-haus 21926  df-tx 22173  df-hmeo 22366  df-fil 22457  df-fm 22549  df-flim 22550  df-flf 22551  df-xms 22933  df-ms 22934  df-tms 22935  df-cfil 23861  df-cau 23862  df-cmet 23863  df-grpo 28273  df-gid 28274  df-ginv 28275  df-gdiv 28276  df-ablo 28325  df-vc 28339  df-nv 28372  df-va 28375  df-ba 28376  df-sm 28377  df-0v 28378  df-vs 28379  df-nmcv 28380  df-ims 28381  df-dip 28481  df-ssp 28502  df-ph 28593  df-cbn 28643  df-hnorm 28748  df-hba 28749  df-hvsub 28751  df-hlim 28752  df-hcau 28753  df-sh 28987  df-ch 29001  df-oc 29032  df-ch0 29033  df-shs 29088  df-span 29089  df-chj 29090  df-pjh 29175  df-cv 30059  df-at 30118

This theorem is referenced by:  sumdmdi  30200  dmdbr4ati  30201  dmdbr5ati  30202