Theorem paddfval 36935

Description: Projective subspace sum operation. (Contributed by NM, 29-Dec-2011.)

Hypotheses

Ref	Expression
paddfval.l	⊢ ≤ = (le‘𝐾)
paddfval.j	⊢ ∨ = (join‘𝐾)
paddfval.a	⊢ 𝐴 = (Atoms‘𝐾)
paddfval.p	⊢ + = (+𝑃‘𝐾)

Assertion

Ref	Expression
paddfval	⊢ (𝐾 ∈ 𝐵 → + = (𝑚 ∈ 𝒫 𝐴, 𝑛 ∈ 𝒫 𝐴 ↦ ((𝑚 ∪ 𝑛) ∪ {𝑝 ∈ 𝐴 ∣ ∃𝑞 ∈ 𝑚 ∃𝑟 ∈ 𝑛 𝑝 ≤ (𝑞 ∨ 𝑟)})))

Distinct variable groups:   𝑚,𝑛,𝑝,𝐴   𝑚,𝑞,𝑟,𝐾,𝑛,𝑝

Allowed substitution hints:   𝐴(𝑟,𝑞)   𝐵(𝑚,𝑛,𝑟,𝑞,𝑝)   + (𝑚,𝑛,𝑟,𝑞,𝑝)   ∨ (𝑚,𝑛,𝑟,𝑞,𝑝)   ≤ (𝑚,𝑛,𝑟,𝑞,𝑝)

Proof of Theorem paddfval

Dummy variable ℎ is distinct from all other variables.

Step	Hyp	Ref	Expression
1		elex 3514	. 2 ⊢ (𝐾 ∈ 𝐵 → 𝐾 ∈ V)
2		paddfval.p	. . 3 ⊢ + = (+𝑃‘𝐾)
3		fveq2 6672	. . . . . . 7 ⊢ (ℎ = 𝐾 → (Atoms‘ℎ) = (Atoms‘𝐾))
4		paddfval.a	. . . . . . 7 ⊢ 𝐴 = (Atoms‘𝐾)
5	3, 4	syl6eqr 2876	. . . . . 6 ⊢ (ℎ = 𝐾 → (Atoms‘ℎ) = 𝐴)
6	5	pweqd 4560	. . . . 5 ⊢ (ℎ = 𝐾 → 𝒫 (Atoms‘ℎ) = 𝒫 𝐴)
7		eqidd 2824	. . . . . . . . 9 ⊢ (ℎ = 𝐾 → 𝑝 = 𝑝)
8		fveq2 6672	. . . . . . . . . 10 ⊢ (ℎ = 𝐾 → (le‘ℎ) = (le‘𝐾))
9		paddfval.l	. . . . . . . . . 10 ⊢ ≤ = (le‘𝐾)
10	8, 9	syl6eqr 2876	. . . . . . . . 9 ⊢ (ℎ = 𝐾 → (le‘ℎ) = ≤ )
11		fveq2 6672	. . . . . . . . . . 11 ⊢ (ℎ = 𝐾 → (join‘ℎ) = (join‘𝐾))
12		paddfval.j	. . . . . . . . . . 11 ⊢ ∨ = (join‘𝐾)
13	11, 12	syl6eqr 2876	. . . . . . . . . 10 ⊢ (ℎ = 𝐾 → (join‘ℎ) = ∨ )
14	13	oveqd 7175	. . . . . . . . 9 ⊢ (ℎ = 𝐾 → (𝑞(join‘ℎ)𝑟) = (𝑞 ∨ 𝑟))
15	7, 10, 14	breq123d 5082	. . . . . . . 8 ⊢ (ℎ = 𝐾 → (𝑝(le‘ℎ)(𝑞(join‘ℎ)𝑟) ↔ 𝑝 ≤ (𝑞 ∨ 𝑟)))
16	15	2rexbidv 3302	. . . . . . 7 ⊢ (ℎ = 𝐾 → (∃𝑞 ∈ 𝑚 ∃𝑟 ∈ 𝑛 𝑝(le‘ℎ)(𝑞(join‘ℎ)𝑟) ↔ ∃𝑞 ∈ 𝑚 ∃𝑟 ∈ 𝑛 𝑝 ≤ (𝑞 ∨ 𝑟)))
17	5, 16	rabeqbidv 3487	. . . . . 6 ⊢ (ℎ = 𝐾 → {𝑝 ∈ (Atoms‘ℎ) ∣ ∃𝑞 ∈ 𝑚 ∃𝑟 ∈ 𝑛 𝑝(le‘ℎ)(𝑞(join‘ℎ)𝑟)} = {𝑝 ∈ 𝐴 ∣ ∃𝑞 ∈ 𝑚 ∃𝑟 ∈ 𝑛 𝑝 ≤ (𝑞 ∨ 𝑟)})
18	17	uneq2d 4141	. . . . 5 ⊢ (ℎ = 𝐾 → ((𝑚 ∪ 𝑛) ∪ {𝑝 ∈ (Atoms‘ℎ) ∣ ∃𝑞 ∈ 𝑚 ∃𝑟 ∈ 𝑛 𝑝(le‘ℎ)(𝑞(join‘ℎ)𝑟)}) = ((𝑚 ∪ 𝑛) ∪ {𝑝 ∈ 𝐴 ∣ ∃𝑞 ∈ 𝑚 ∃𝑟 ∈ 𝑛 𝑝 ≤ (𝑞 ∨ 𝑟)}))
19	6, 6, 18	mpoeq123dv 7231	. . . 4 ⊢ (ℎ = 𝐾 → (𝑚 ∈ 𝒫 (Atoms‘ℎ), 𝑛 ∈ 𝒫 (Atoms‘ℎ) ↦ ((𝑚 ∪ 𝑛) ∪ {𝑝 ∈ (Atoms‘ℎ) ∣ ∃𝑞 ∈ 𝑚 ∃𝑟 ∈ 𝑛 𝑝(le‘ℎ)(𝑞(join‘ℎ)𝑟)})) = (𝑚 ∈ 𝒫 𝐴, 𝑛 ∈ 𝒫 𝐴 ↦ ((𝑚 ∪ 𝑛) ∪ {𝑝 ∈ 𝐴 ∣ ∃𝑞 ∈ 𝑚 ∃𝑟 ∈ 𝑛 𝑝 ≤ (𝑞 ∨ 𝑟)})))
20		df-padd 36934	. . . 4 ⊢ +𝑃 = (ℎ ∈ V ↦ (𝑚 ∈ 𝒫 (Atoms‘ℎ), 𝑛 ∈ 𝒫 (Atoms‘ℎ) ↦ ((𝑚 ∪ 𝑛) ∪ {𝑝 ∈ (Atoms‘ℎ) ∣ ∃𝑞 ∈ 𝑚 ∃𝑟 ∈ 𝑛 𝑝(le‘ℎ)(𝑞(join‘ℎ)𝑟)})))
21	4	fvexi 6686	. . . . . 6 ⊢ 𝐴 ∈ V
22	21	pwex 5283	. . . . 5 ⊢ 𝒫 𝐴 ∈ V
23	22, 22	mpoex 7779	. . . 4 ⊢ (𝑚 ∈ 𝒫 𝐴, 𝑛 ∈ 𝒫 𝐴 ↦ ((𝑚 ∪ 𝑛) ∪ {𝑝 ∈ 𝐴 ∣ ∃𝑞 ∈ 𝑚 ∃𝑟 ∈ 𝑛 𝑝 ≤ (𝑞 ∨ 𝑟)})) ∈ V
24	19, 20, 23	fvmpt 6770	. . 3 ⊢ (𝐾 ∈ V → (+𝑃‘𝐾) = (𝑚 ∈ 𝒫 𝐴, 𝑛 ∈ 𝒫 𝐴 ↦ ((𝑚 ∪ 𝑛) ∪ {𝑝 ∈ 𝐴 ∣ ∃𝑞 ∈ 𝑚 ∃𝑟 ∈ 𝑛 𝑝 ≤ (𝑞 ∨ 𝑟)})))
25	2, 24	syl5eq 2870	. 2 ⊢ (𝐾 ∈ V → + = (𝑚 ∈ 𝒫 𝐴, 𝑛 ∈ 𝒫 𝐴 ↦ ((𝑚 ∪ 𝑛) ∪ {𝑝 ∈ 𝐴 ∣ ∃𝑞 ∈ 𝑚 ∃𝑟 ∈ 𝑛 𝑝 ≤ (𝑞 ∨ 𝑟)})))
26	1, 25	syl 17	1 ⊢ (𝐾 ∈ 𝐵 → + = (𝑚 ∈ 𝒫 𝐴, 𝑛 ∈ 𝒫 𝐴 ↦ ((𝑚 ∪ 𝑛) ∪ {𝑝 ∈ 𝐴 ∣ ∃𝑞 ∈ 𝑚 ∃𝑟 ∈ 𝑛 𝑝 ≤ (𝑞 ∨ 𝑟)})))

Syntax hints:   → wi 4   = wceq 1537   ∈ wcel 2114  ∃wrex 3141  {crab 3144  Vcvv 3496   ∪ cun 3936  𝒫 cpw 4541   class class class wbr 5068  ‘cfv 6357  (class class class)co 7158   ∈ cmpo 7160  lecple 16574  joincjn 17556  Atomscatm 36401  +_𝑃cpadd 36933

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1911  ax-6 1970  ax-7 2015  ax-8 2116  ax-9 2124  ax-10 2145  ax-11 2161  ax-12 2177  ax-ext 2795  ax-rep 5192  ax-sep 5205  ax-nul 5212  ax-pow 5268  ax-pr 5332  ax-un 7463

This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-3an 1085  df-tru 1540  df-ex 1781  df-nf 1785  df-sb 2070  df-mo 2622  df-eu 2654  df-clab 2802  df-cleq 2816  df-clel 2895  df-nfc 2965  df-ne 3019  df-ral 3145  df-rex 3146  df-reu 3147  df-rab 3149  df-v 3498  df-sbc 3775  df-csb 3886  df-dif 3941  df-un 3943  df-in 3945  df-ss 3954  df-nul 4294  df-if 4470  df-pw 4543  df-sn 4570  df-pr 4572  df-op 4576  df-uni 4841  df-iun 4923  df-br 5069  df-opab 5131  df-mpt 5149  df-id 5462  df-xp 5563  df-rel 5564  df-cnv 5565  df-co 5566  df-dm 5567  df-rn 5568  df-res 5569  df-ima 5570  df-iota 6316  df-fun 6359  df-fn 6360  df-f 6361  df-f1 6362  df-fo 6363  df-f1o 6364  df-fv 6365  df-ov 7161  df-oprab 7162  df-mpo 7163  df-1st 7691  df-2nd 7692  df-padd 36934

This theorem is referenced by:  paddval  36936