Mathbox for Norm Megill |
< Previous
Next >
Nearby theorems |
||
Mirrors > Home > MPE Home > Th. List > Mathboxes > dochval | Structured version Visualization version GIF version |
Description: Subspace orthocomplement for DVecH vector space. (Contributed by NM, 14-Mar-2014.) |
Ref | Expression |
---|---|
dochval.b | ⊢ 𝐵 = (Base‘𝐾) |
dochval.g | ⊢ 𝐺 = (glb‘𝐾) |
dochval.o | ⊢ ⊥ = (oc‘𝐾) |
dochval.h | ⊢ 𝐻 = (LHyp‘𝐾) |
dochval.i | ⊢ 𝐼 = ((DIsoH‘𝐾)‘𝑊) |
dochval.u | ⊢ 𝑈 = ((DVecH‘𝐾)‘𝑊) |
dochval.v | ⊢ 𝑉 = (Base‘𝑈) |
dochval.n | ⊢ 𝑁 = ((ocH‘𝐾)‘𝑊) |
Ref | Expression |
---|---|
dochval | ⊢ (((𝐾 ∈ 𝑌 ∧ 𝑊 ∈ 𝐻) ∧ 𝑋 ⊆ 𝑉) → (𝑁‘𝑋) = (𝐼‘( ⊥ ‘(𝐺‘{𝑦 ∈ 𝐵 ∣ 𝑋 ⊆ (𝐼‘𝑦)})))) |
Step | Hyp | Ref | Expression |
---|---|---|---|
1 | dochval.b | . . . . 5 ⊢ 𝐵 = (Base‘𝐾) | |
2 | dochval.g | . . . . 5 ⊢ 𝐺 = (glb‘𝐾) | |
3 | dochval.o | . . . . 5 ⊢ ⊥ = (oc‘𝐾) | |
4 | dochval.h | . . . . 5 ⊢ 𝐻 = (LHyp‘𝐾) | |
5 | dochval.i | . . . . 5 ⊢ 𝐼 = ((DIsoH‘𝐾)‘𝑊) | |
6 | dochval.u | . . . . 5 ⊢ 𝑈 = ((DVecH‘𝐾)‘𝑊) | |
7 | dochval.v | . . . . 5 ⊢ 𝑉 = (Base‘𝑈) | |
8 | dochval.n | . . . . 5 ⊢ 𝑁 = ((ocH‘𝐾)‘𝑊) | |
9 | 1, 2, 3, 4, 5, 6, 7, 8 | dochfval 38480 | . . . 4 ⊢ ((𝐾 ∈ 𝑌 ∧ 𝑊 ∈ 𝐻) → 𝑁 = (𝑥 ∈ 𝒫 𝑉 ↦ (𝐼‘( ⊥ ‘(𝐺‘{𝑦 ∈ 𝐵 ∣ 𝑥 ⊆ (𝐼‘𝑦)}))))) |
10 | 9 | adantr 483 | . . 3 ⊢ (((𝐾 ∈ 𝑌 ∧ 𝑊 ∈ 𝐻) ∧ 𝑋 ⊆ 𝑉) → 𝑁 = (𝑥 ∈ 𝒫 𝑉 ↦ (𝐼‘( ⊥ ‘(𝐺‘{𝑦 ∈ 𝐵 ∣ 𝑥 ⊆ (𝐼‘𝑦)}))))) |
11 | 10 | fveq1d 6667 | . 2 ⊢ (((𝐾 ∈ 𝑌 ∧ 𝑊 ∈ 𝐻) ∧ 𝑋 ⊆ 𝑉) → (𝑁‘𝑋) = ((𝑥 ∈ 𝒫 𝑉 ↦ (𝐼‘( ⊥ ‘(𝐺‘{𝑦 ∈ 𝐵 ∣ 𝑥 ⊆ (𝐼‘𝑦)}))))‘𝑋)) |
12 | 7 | fvexi 6679 | . . . . . 6 ⊢ 𝑉 ∈ V |
13 | 12 | elpw2 5241 | . . . . 5 ⊢ (𝑋 ∈ 𝒫 𝑉 ↔ 𝑋 ⊆ 𝑉) |
14 | 13 | biimpri 230 | . . . 4 ⊢ (𝑋 ⊆ 𝑉 → 𝑋 ∈ 𝒫 𝑉) |
15 | 14 | adantl 484 | . . 3 ⊢ (((𝐾 ∈ 𝑌 ∧ 𝑊 ∈ 𝐻) ∧ 𝑋 ⊆ 𝑉) → 𝑋 ∈ 𝒫 𝑉) |
16 | fvex 6678 | . . 3 ⊢ (𝐼‘( ⊥ ‘(𝐺‘{𝑦 ∈ 𝐵 ∣ 𝑋 ⊆ (𝐼‘𝑦)}))) ∈ V | |
17 | sseq1 3992 | . . . . . . . 8 ⊢ (𝑥 = 𝑋 → (𝑥 ⊆ (𝐼‘𝑦) ↔ 𝑋 ⊆ (𝐼‘𝑦))) | |
18 | 17 | rabbidv 3481 | . . . . . . 7 ⊢ (𝑥 = 𝑋 → {𝑦 ∈ 𝐵 ∣ 𝑥 ⊆ (𝐼‘𝑦)} = {𝑦 ∈ 𝐵 ∣ 𝑋 ⊆ (𝐼‘𝑦)}) |
19 | 18 | fveq2d 6669 | . . . . . 6 ⊢ (𝑥 = 𝑋 → (𝐺‘{𝑦 ∈ 𝐵 ∣ 𝑥 ⊆ (𝐼‘𝑦)}) = (𝐺‘{𝑦 ∈ 𝐵 ∣ 𝑋 ⊆ (𝐼‘𝑦)})) |
20 | 19 | fveq2d 6669 | . . . . 5 ⊢ (𝑥 = 𝑋 → ( ⊥ ‘(𝐺‘{𝑦 ∈ 𝐵 ∣ 𝑥 ⊆ (𝐼‘𝑦)})) = ( ⊥ ‘(𝐺‘{𝑦 ∈ 𝐵 ∣ 𝑋 ⊆ (𝐼‘𝑦)}))) |
21 | 20 | fveq2d 6669 | . . . 4 ⊢ (𝑥 = 𝑋 → (𝐼‘( ⊥ ‘(𝐺‘{𝑦 ∈ 𝐵 ∣ 𝑥 ⊆ (𝐼‘𝑦)}))) = (𝐼‘( ⊥ ‘(𝐺‘{𝑦 ∈ 𝐵 ∣ 𝑋 ⊆ (𝐼‘𝑦)})))) |
22 | eqid 2821 | . . . 4 ⊢ (𝑥 ∈ 𝒫 𝑉 ↦ (𝐼‘( ⊥ ‘(𝐺‘{𝑦 ∈ 𝐵 ∣ 𝑥 ⊆ (𝐼‘𝑦)})))) = (𝑥 ∈ 𝒫 𝑉 ↦ (𝐼‘( ⊥ ‘(𝐺‘{𝑦 ∈ 𝐵 ∣ 𝑥 ⊆ (𝐼‘𝑦)})))) | |
23 | 21, 22 | fvmptg 6761 | . . 3 ⊢ ((𝑋 ∈ 𝒫 𝑉 ∧ (𝐼‘( ⊥ ‘(𝐺‘{𝑦 ∈ 𝐵 ∣ 𝑋 ⊆ (𝐼‘𝑦)}))) ∈ V) → ((𝑥 ∈ 𝒫 𝑉 ↦ (𝐼‘( ⊥ ‘(𝐺‘{𝑦 ∈ 𝐵 ∣ 𝑥 ⊆ (𝐼‘𝑦)}))))‘𝑋) = (𝐼‘( ⊥ ‘(𝐺‘{𝑦 ∈ 𝐵 ∣ 𝑋 ⊆ (𝐼‘𝑦)})))) |
24 | 15, 16, 23 | sylancl 588 | . 2 ⊢ (((𝐾 ∈ 𝑌 ∧ 𝑊 ∈ 𝐻) ∧ 𝑋 ⊆ 𝑉) → ((𝑥 ∈ 𝒫 𝑉 ↦ (𝐼‘( ⊥ ‘(𝐺‘{𝑦 ∈ 𝐵 ∣ 𝑥 ⊆ (𝐼‘𝑦)}))))‘𝑋) = (𝐼‘( ⊥ ‘(𝐺‘{𝑦 ∈ 𝐵 ∣ 𝑋 ⊆ (𝐼‘𝑦)})))) |
25 | 11, 24 | eqtrd 2856 | 1 ⊢ (((𝐾 ∈ 𝑌 ∧ 𝑊 ∈ 𝐻) ∧ 𝑋 ⊆ 𝑉) → (𝑁‘𝑋) = (𝐼‘( ⊥ ‘(𝐺‘{𝑦 ∈ 𝐵 ∣ 𝑋 ⊆ (𝐼‘𝑦)})))) |
Colors of variables: wff setvar class |
Syntax hints: → wi 4 ∧ wa 398 = wceq 1533 ∈ wcel 2110 {crab 3142 Vcvv 3495 ⊆ wss 3936 𝒫 cpw 4539 ↦ cmpt 5139 ‘cfv 6350 Basecbs 16477 occoc 16567 glbcglb 17547 LHypclh 37114 DVecHcdvh 38208 DIsoHcdih 38358 ocHcoch 38477 |
This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1792 ax-4 1806 ax-5 1907 ax-6 1966 ax-7 2011 ax-8 2112 ax-9 2120 ax-10 2141 ax-11 2156 ax-12 2172 ax-ext 2793 ax-rep 5183 ax-sep 5196 ax-nul 5203 ax-pow 5259 ax-pr 5322 |
This theorem depends on definitions: df-bi 209 df-an 399 df-or 844 df-3an 1085 df-tru 1536 df-ex 1777 df-nf 1781 df-sb 2066 df-mo 2618 df-eu 2650 df-clab 2800 df-cleq 2814 df-clel 2893 df-nfc 2963 df-ne 3017 df-ral 3143 df-rex 3144 df-reu 3145 df-rab 3147 df-v 3497 df-sbc 3773 df-csb 3884 df-dif 3939 df-un 3941 df-in 3943 df-ss 3952 df-nul 4292 df-if 4468 df-pw 4541 df-sn 4562 df-pr 4564 df-op 4568 df-uni 4833 df-iun 4914 df-br 5060 df-opab 5122 df-mpt 5140 df-id 5455 df-xp 5556 df-rel 5557 df-cnv 5558 df-co 5559 df-dm 5560 df-rn 5561 df-res 5562 df-ima 5563 df-iota 6309 df-fun 6352 df-fn 6353 df-f 6354 df-f1 6355 df-fo 6356 df-f1o 6357 df-fv 6358 df-doch 38478 |
This theorem is referenced by: dochval2 38482 dochcl 38483 dochvalr 38487 dochss 38495 |
Copyright terms: Public domain | W3C validator |