Users' Mathboxes Mathbox for Norm Megill < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  hdmap10lem Structured version   Visualization version   GIF version

Theorem hdmap10lem 42864
Description: Lemma for hdmap10 42865. (Contributed by NM, 17-May-2015.)
Hypotheses
Ref Expression
hdmap10.h 𝐻 = (LHyp‘𝐾)
hdmap10.u 𝑈 = ((DVecH‘𝐾)‘𝑊)
hdmap10.v 𝑉 = (Base‘𝑈)
hdmap10.n 𝑁 = (LSpan‘𝑈)
hdmap10.c 𝐶 = ((LCDual‘𝐾)‘𝑊)
hdmap10.l 𝐿 = (LSpan‘𝐶)
hdmap10.m 𝑀 = ((mapd‘𝐾)‘𝑊)
hdmap10.s 𝑆 = ((HDMap‘𝐾)‘𝑊)
hdmap10.k (𝜑 → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻))
hdmap10.e 𝐸 = ⟨( I ↾ (Base‘𝐾)), ( I ↾ ((LTrn‘𝐾)‘𝑊))⟩
hdmap10.o 0 = (0g‘𝑈)
hdmap10.d 𝐷 = (Base‘𝐶)
hdmap10.j 𝐽 = ((HVMap‘𝐾)‘𝑊)
hdmap10.i 𝐼 = ((HDMap1‘𝐾)‘𝑊)
hdmap10lem.t (𝜑 → 𝑇 ∈ (𝑉 ∖ { 0 }))
Assertion
Ref Expression
hdmap10lem (𝜑 → (𝑀‘(𝑁‘{𝑇})) = (𝐿‘{(𝑆‘𝑇)}))

Proof of Theorem hdmap10lem
Dummy variable 𝑥 is distinct from all other variables.
StepHypRef Expression
1 hdmap10.h . . 3 𝐻 = (LHyp‘𝐾)
2 hdmap10.u . . 3 𝑈 = ((DVecH‘𝐾)‘𝑊)
3 hdmap10.v . . 3 𝑉 = (Base‘𝑈)
4 hdmap10.n . . 3 𝑁 = (LSpan‘𝑈)
5 hdmap10.k . . 3 (𝜑 → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻))
6 eqid 2761 . . . . 5 (Base‘𝐾) = (Base‘𝐾)
7 eqid 2761 . . . . 5 ((LTrn‘𝐾)‘𝑊) = ((LTrn‘𝐾)‘𝑊)
8 hdmap10.o . . . . 5 0 = (0g‘𝑈)
9 hdmap10.e . . . . 5 𝐸 = ⟨( I ↾ (Base‘𝐾)), ( I ↾ ((LTrn‘𝐾)‘𝑊))⟩
101, 6, 7, 2, 3, 8, 9, 5dvheveccl 42137 . . . 4 (𝜑 → 𝐸 ∈ (𝑉 ∖ { 0 }))
1110eldifad 3911 . . 3 (𝜑 → 𝐸 ∈ 𝑉)
12 hdmap10lem.t . . . 4 (𝜑 → 𝑇 ∈ (𝑉 ∖ { 0 }))
1312eldifad 3911 . . 3 (𝜑 → 𝑇 ∈ 𝑉)
141, 2, 3, 4, 5, 11, 13dvh3dim 42471 . 2 (𝜑 → ∃𝑥 ∈ 𝑉 ¬ 𝑥 ∈ (𝑁‘{𝐸, 𝑇}))
15 hdmap10.c . . . . . . 7 𝐶 = ((LCDual‘𝐾)‘𝑊)
16 hdmap10.d . . . . . . 7 𝐷 = (Base‘𝐶)
17 hdmap10.j . . . . . . 7 𝐽 = ((HVMap‘𝐾)‘𝑊)
18 hdmap10.i . . . . . . 7 𝐼 = ((HDMap1‘𝐾)‘𝑊)
19 hdmap10.s . . . . . . 7 𝑆 = ((HDMap‘𝐾)‘𝑊)
2053ad2ant1 1151 . . . . . . 7 ((𝜑 ∧ 𝑥 ∈ 𝑉 ∧ ¬ 𝑥 ∈ (𝑁‘{𝐸, 𝑇})) → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻))
21133ad2ant1 1151 . . . . . . 7 ((𝜑 ∧ 𝑥 ∈ 𝑉 ∧ ¬ 𝑥 ∈ (𝑁‘{𝐸, 𝑇})) → 𝑇 ∈ 𝑉)
22 simp2 1155 . . . . . . 7 ((𝜑 ∧ 𝑥 ∈ 𝑉 ∧ ¬ 𝑥 ∈ (𝑁‘{𝐸, 𝑇})) → 𝑥 ∈ 𝑉)
23 eqid 2761 . . . . . . . . . . . 12 (LSubSp‘𝑈) = (LSubSp‘𝑈)
241, 2, 5dvhlmod 42135 . . . . . . . . . . . 12 (𝜑 → 𝑈 ∈ LMod)
253, 23, 4, 24, 11, 13lspprcl 21233 . . . . . . . . . . . 12 (𝜑 → (𝑁‘{𝐸, 𝑇}) ∈ (LSubSp‘𝑈))
263, 4, 24, 11, 13lspprid1 21252 . . . . . . . . . . . 12 (𝜑 → 𝐸 ∈ (𝑁‘{𝐸, 𝑇}))
2723, 4, 24, 25, 26ellspsn5 21251 . . . . . . . . . . 11 (𝜑 → (𝑁‘{𝐸}) ⊆ (𝑁‘{𝐸, 𝑇}))
283, 4, 24, 11, 13lspprid2 21253 . . . . . . . . . . . 12 (𝜑 → 𝑇 ∈ (𝑁‘{𝐸, 𝑇}))
2923, 4, 24, 25, 28ellspsn5 21251 . . . . . . . . . . 11 (𝜑 → (𝑁‘{𝑇}) ⊆ (𝑁‘{𝐸, 𝑇}))
3027, 29unssd 4138 . . . . . . . . . 10 (𝜑 → ((𝑁‘{𝐸}) ∪ (𝑁‘{𝑇})) ⊆ (𝑁‘{𝐸, 𝑇}))
3130sseld 3930 . . . . . . . . 9 (𝜑 → (𝑥 ∈ ((𝑁‘{𝐸}) ∪ (𝑁‘{𝑇})) → 𝑥 ∈ (𝑁‘{𝐸, 𝑇})))
3231con3dimp 414 . . . . . . . 8 ((𝜑 ∧ ¬ 𝑥 ∈ (𝑁‘{𝐸, 𝑇})) → ¬ 𝑥 ∈ ((𝑁‘{𝐸}) ∪ (𝑁‘{𝑇})))
33323adant2 1149 . . . . . . 7 ((𝜑 ∧ 𝑥 ∈ 𝑉 ∧ ¬ 𝑥 ∈ (𝑁‘{𝐸, 𝑇})) → ¬ 𝑥 ∈ ((𝑁‘{𝐸}) ∪ (𝑁‘{𝑇})))
341, 9, 2, 3, 4, 15, 16, 17, 18, 19, 20, 21, 22, 33hdmapval2 42857 . . . . . 6 ((𝜑 ∧ 𝑥 ∈ 𝑉 ∧ ¬ 𝑥 ∈ (𝑁‘{𝐸, 𝑇})) → (𝑆‘𝑇) = (𝐼‘⟨𝑥, (𝐼‘⟨𝐸, (𝐽‘𝐸), 𝑥⟩), 𝑇⟩))
3534eqcomd 2767 . . . . 5 ((𝜑 ∧ 𝑥 ∈ 𝑉 ∧ ¬ 𝑥 ∈ (𝑁‘{𝐸, 𝑇})) → (𝐼‘⟨𝑥, (𝐼‘⟨𝐸, (𝐽‘𝐸), 𝑥⟩), 𝑇⟩) = (𝑆‘𝑇))
36 eqid 2761 . . . . . 6 (-g‘𝑈) = (-g‘𝑈)
37 eqid 2761 . . . . . 6 (-g‘𝐶) = (-g‘𝐶)
38 hdmap10.l . . . . . 6 𝐿 = (LSpan‘𝐶)
39 hdmap10.m . . . . . 6 𝑀 = ((mapd‘𝐾)‘𝑊)
40243ad2ant1 1151 . . . . . . 7 ((𝜑 ∧ 𝑥 ∈ 𝑉 ∧ ¬ 𝑥 ∈ (𝑁‘{𝐸, 𝑇})) → 𝑈 ∈ LMod)
41253ad2ant1 1151 . . . . . . 7 ((𝜑 ∧ 𝑥 ∈ 𝑉 ∧ ¬ 𝑥 ∈ (𝑁‘{𝐸, 𝑇})) → (𝑁‘{𝐸, 𝑇}) ∈ (LSubSp‘𝑈))
42 simp3 1156 . . . . . . 7 ((𝜑 ∧ 𝑥 ∈ 𝑉 ∧ ¬ 𝑥 ∈ (𝑁‘{𝐸, 𝑇})) → ¬ 𝑥 ∈ (𝑁‘{𝐸, 𝑇}))
438, 23, 40, 41, 22, 42lssneln0 21208 . . . . . 6 ((𝜑 ∧ 𝑥 ∈ 𝑉 ∧ ¬ 𝑥 ∈ (𝑁‘{𝐸, 𝑇})) → 𝑥 ∈ (𝑉 ∖ { 0 }))
44 eqid 2761 . . . . . . . . . 10 (0g‘𝐶) = (0g‘𝐶)
451, 2, 3, 8, 15, 16, 44, 17, 5, 10hvmapcl2 42791 . . . . . . . . 9 (𝜑 → (𝐽‘𝐸) ∈ (𝐷 ∖ {(0g‘𝐶)}))
4645eldifad 3911 . . . . . . . 8 (𝜑 → (𝐽‘𝐸) ∈ 𝐷)
47463ad2ant1 1151 . . . . . . 7 ((𝜑 ∧ 𝑥 ∈ 𝑉 ∧ ¬ 𝑥 ∈ (𝑁‘{𝐸, 𝑇})) → (𝐽‘𝐸) ∈ 𝐷)
481, 2, 3, 8, 4, 15, 38, 39, 17, 5, 10mapdhvmap 42794 . . . . . . . 8 (𝜑 → (𝑀‘(𝑁‘{𝐸})) = (𝐿‘{(𝐽‘𝐸)}))
49483ad2ant1 1151 . . . . . . 7 ((𝜑 ∧ 𝑥 ∈ 𝑉 ∧ ¬ 𝑥 ∈ (𝑁‘{𝐸, 𝑇})) → (𝑀‘(𝑁‘{𝐸})) = (𝐿‘{(𝐽‘𝐸)}))
501, 2, 5dvhlvec 42134 . . . . . . . . . . 11 (𝜑 → 𝑈 ∈ LVec)
51503ad2ant1 1151 . . . . . . . . . 10 ((𝜑 ∧ 𝑥 ∈ 𝑉 ∧ ¬ 𝑥 ∈ (𝑁‘{𝐸, 𝑇})) → 𝑈 ∈ LVec)
52113ad2ant1 1151 . . . . . . . . . 10 ((𝜑 ∧ 𝑥 ∈ 𝑉 ∧ ¬ 𝑥 ∈ (𝑁‘{𝐸, 𝑇})) → 𝐸 ∈ 𝑉)
533, 4, 51, 22, 52, 21, 42lspindpi 21390 . . . . . . . . 9 ((𝜑 ∧ 𝑥 ∈ 𝑉 ∧ ¬ 𝑥 ∈ (𝑁‘{𝐸, 𝑇})) → ((𝑁‘{𝑥}) ≠ (𝑁‘{𝐸}) ∧ (𝑁‘{𝑥}) ≠ (𝑁‘{𝑇})))
5453simpld 500 . . . . . . . 8 ((𝜑 ∧ 𝑥 ∈ 𝑉 ∧ ¬ 𝑥 ∈ (𝑁‘{𝐸, 𝑇})) → (𝑁‘{𝑥}) ≠ (𝑁‘{𝐸}))
5554necomd 3011 . . . . . . 7 ((𝜑 ∧ 𝑥 ∈ 𝑉 ∧ ¬ 𝑥 ∈ (𝑁‘{𝐸, 𝑇})) → (𝑁‘{𝐸}) ≠ (𝑁‘{𝑥}))
56103ad2ant1 1151 . . . . . . 7 ((𝜑 ∧ 𝑥 ∈ 𝑉 ∧ ¬ 𝑥 ∈ (𝑁‘{𝐸, 𝑇})) → 𝐸 ∈ (𝑉 ∖ { 0 }))
571, 2, 3, 8, 4, 15, 16, 38, 39, 18, 20, 47, 49, 55, 56, 22hdmap1cl 42829 . . . . . 6 ((𝜑 ∧ 𝑥 ∈ 𝑉 ∧ ¬ 𝑥 ∈ (𝑁‘{𝐸, 𝑇})) → (𝐼‘⟨𝐸, (𝐽‘𝐸), 𝑥⟩) ∈ 𝐷)
58123ad2ant1 1151 . . . . . 6 ((𝜑 ∧ 𝑥 ∈ 𝑉 ∧ ¬ 𝑥 ∈ (𝑁‘{𝐸, 𝑇})) → 𝑇 ∈ (𝑉 ∖ { 0 }))
591, 2, 3, 15, 16, 19, 5, 13hdmapcl 42855 . . . . . . 7 (𝜑 → (𝑆‘𝑇) ∈ 𝐷)
60593ad2ant1 1151 . . . . . 6 ((𝜑 ∧ 𝑥 ∈ 𝑉 ∧ ¬ 𝑥 ∈ (𝑁‘{𝐸, 𝑇})) → (𝑆‘𝑇) ∈ 𝐷)
6153simprd 501 . . . . . 6 ((𝜑 ∧ 𝑥 ∈ 𝑉 ∧ ¬ 𝑥 ∈ (𝑁‘{𝐸, 𝑇})) → (𝑁‘{𝑥}) ≠ (𝑁‘{𝑇}))
62 eqid 2761 . . . . . . . 8 (𝐼‘⟨𝐸, (𝐽‘𝐸), 𝑥⟩) = (𝐼‘⟨𝐸, (𝐽‘𝐸), 𝑥⟩)
631, 2, 3, 36, 8, 4, 15, 16, 37, 38, 39, 18, 20, 56, 47, 43, 57, 55, 49hdmap1eq 42826 . . . . . . . 8 ((𝜑 ∧ 𝑥 ∈ 𝑉 ∧ ¬ 𝑥 ∈ (𝑁‘{𝐸, 𝑇})) → ((𝐼‘⟨𝐸, (𝐽‘𝐸), 𝑥⟩) = (𝐼‘⟨𝐸, (𝐽‘𝐸), 𝑥⟩) ↔ ((𝑀‘(𝑁‘{𝑥})) = (𝐿‘{(𝐼‘⟨𝐸, (𝐽‘𝐸), 𝑥⟩)}) ∧ (𝑀‘(𝑁‘{(𝐸(-g‘𝑈)𝑥)})) = (𝐿‘{((𝐽‘𝐸)(-g‘𝐶)(𝐼‘⟨𝐸, (𝐽‘𝐸), 𝑥⟩))}))))
6462, 63mpbii 236 . . . . . . 7 ((𝜑 ∧ 𝑥 ∈ 𝑉 ∧ ¬ 𝑥 ∈ (𝑁‘{𝐸, 𝑇})) → ((𝑀‘(𝑁‘{𝑥})) = (𝐿‘{(𝐼‘⟨𝐸, (𝐽‘𝐸), 𝑥⟩)}) ∧ (𝑀‘(𝑁‘{(𝐸(-g‘𝑈)𝑥)})) = (𝐿‘{((𝐽‘𝐸)(-g‘𝐶)(𝐼‘⟨𝐸, (𝐽‘𝐸), 𝑥⟩))})))
6564simpld 500 . . . . . 6 ((𝜑 ∧ 𝑥 ∈ 𝑉 ∧ ¬ 𝑥 ∈ (𝑁‘{𝐸, 𝑇})) → (𝑀‘(𝑁‘{𝑥})) = (𝐿‘{(𝐼‘⟨𝐸, (𝐽‘𝐸), 𝑥⟩)}))
661, 2, 3, 36, 8, 4, 15, 16, 37, 38, 39, 18, 20, 43, 57, 58, 60, 61, 65hdmap1eq 42826 . . . . 5 ((𝜑 ∧ 𝑥 ∈ 𝑉 ∧ ¬ 𝑥 ∈ (𝑁‘{𝐸, 𝑇})) → ((𝐼‘⟨𝑥, (𝐼‘⟨𝐸, (𝐽‘𝐸), 𝑥⟩), 𝑇⟩) = (𝑆‘𝑇) ↔ ((𝑀‘(𝑁‘{𝑇})) = (𝐿‘{(𝑆‘𝑇)}) ∧ (𝑀‘(𝑁‘{(𝑥(-g‘𝑈)𝑇)})) = (𝐿‘{((𝐼‘⟨𝐸, (𝐽‘𝐸), 𝑥⟩)(-g‘𝐶)(𝑆‘𝑇))}))))
6735, 66mpbid 235 . . . 4 ((𝜑 ∧ 𝑥 ∈ 𝑉 ∧ ¬ 𝑥 ∈ (𝑁‘{𝐸, 𝑇})) → ((𝑀‘(𝑁‘{𝑇})) = (𝐿‘{(𝑆‘𝑇)}) ∧ (𝑀‘(𝑁‘{(𝑥(-g‘𝑈)𝑇)})) = (𝐿‘{((𝐼‘⟨𝐸, (𝐽‘𝐸), 𝑥⟩)(-g‘𝐶)(𝑆‘𝑇))})))
6867simpld 500 . . 3 ((𝜑 ∧ 𝑥 ∈ 𝑉 ∧ ¬ 𝑥 ∈ (𝑁‘{𝐸, 𝑇})) → (𝑀‘(𝑁‘{𝑇})) = (𝐿‘{(𝑆‘𝑇)}))
6968rexlimdv3a 3168 . 2 (𝜑 → (∃𝑥 ∈ 𝑉 ¬ 𝑥 ∈ (𝑁‘{𝐸, 𝑇}) → (𝑀‘(𝑁‘{𝑇})) = (𝐿‘{(𝑆‘𝑇)})))
7014, 69mpd 16 1 (𝜑 → (𝑀‘(𝑁‘{𝑇})) = (𝐿‘{(𝑆‘𝑇)}))
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  ¬ wn 3   → wi 4   ∧ wa 401   ∧ w3a 1103   = wceq 1570   ∈ wcel 2145   ≠ wne 2956  ∃wrex 3087   ∖ cdif 3896   ∪ cun 3897  {csn 4584  {cpr 4586  ⟨cop 4590  ⟨cotp 4592   I cid 5545   ↾ cres 5653  ‘cfv 6531  (class class class)co 7412  Basecbs 17367  0gc0g 17590  -gcsg 19126  LModclmod 21115  LSubSpclss 21186  LSpanclspn 21226  LVecclvec 21357  HLchlt 40375  LHypclh 41009  LTrncltrn 41126  DVecHcdvh 42103  LCDualclcd 42611  mapdcmpd 42649  HVMapchvm 42781  HDMap1chdma1 42816  HDMapchdma 42817
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2213  ax-ext 2733  ax-rep 5232  ax-sep 5249  ax-nul 5260  ax-pow 5327  ax-pr 5391  ax-un 7740  ax-cnex 11237  ax-resscn 11238  ax-1cn 11239  ax-icn 11240  ax-addcl 11241  ax-addrcl 11242  ax-mulcl 11243  ax-mulrcl 11244  ax-mulcom 11245  ax-addass 11246  ax-mulass 11247  ax-distr 11248  ax-i2m1 11249  ax-1ne0 11250  ax-1rid 11251  ax-rnegex 11252  ax-rrecex 11253  ax-cnre 11254  ax-pre-lttri 11255  ax-pre-lttrn 11256  ax-pre-ltadd 11257  ax-pre-mulgt0 11258  ax-riotaBAD 39978
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2565  df-eu 2595  df-clab 2740  df-cleq 2753  df-clel 2836  df-nfc 2910  df-ne 2957  df-nel 3063  df-ral 3078  df-rex 3088  df-rmo 3366  df-reu 3367  df-rab 3414  df-v 3453  df-sbc 3740  df-csb 3848  df-dif 3902  df-un 3904  df-in 3906  df-ss 3916  df-pss 3919  df-nul 4280  df-if 4483  df-pw 4559  df-sn 4585  df-pr 4587  df-tp 4589  df-op 4591  df-ot 4593  df-uni 4868  df-int 4908  df-iun 4953  df-iin 4954  df-br 5104  df-opab 5168  df-mpt 5187  df-tr 5213  df-id 5546  df-eprel 5551  df-po 5559  df-so 5560  df-fr 5604  df-we 5606  df-xp 5657  df-rel 5658  df-cnv 5659  df-co 5660  df-dm 5661  df-rn 5662  df-res 5663  df-ima 5664  df-pred 6297  df-ord 6358  df-on 6359  df-lim 6360  df-suc 6361  df-iota 6487  df-fun 6533  df-fn 6534  df-f 6535  df-f1 6536  df-fo 6537  df-f1o 6538  df-fv 6539  df-riota 7369  df-ov 7415  df-oprab 7416  df-mpo 7417  df-of 7682  df-om 7867  df-1st 7990  df-2nd 7991  df-tpos 8227  df-undef 8274  df-frecs 8283  df-wrecs 8314  df-recs 8363  df-rdg 8402  df-1o 8460  df-2o 8461  df-er 8701  df-map 8833  df-en 8958  df-dom 8959  df-sdom 8960  df-fin 8961  df-pnf 11326  df-mnf 11327  df-xr 11328  df-ltxr 11329  df-le 11330  df-sub 11524  df-neg 11525  df-nn 12317  df-2 12386  df-3 12387  df-4 12388  df-5 12389  df-6 12390  df-n0 12588  df-z 12675  df-uz 12947  df-fz 13621  df-struct 17305  df-sets 17322  df-slot 17340  df-ndx 17352  df-base 17368  df-ress 17389  df-plusg 17421  df-mulr 17422  df-sca 17424  df-vsca 17425  df-0g 17592  df-mre 17736  df-mrc 17737  df-acs 17739  df-proset 18448  df-poset 18467  df-plt 18482  df-lub 18498  df-glb 18499  df-join 18500  df-meet 18501  df-p0 18577  df-p1 18578  df-lat 18586  df-clat 18653  df-mgm 18796  df-sgrp 18888  df-mnd 18904  df-submnd 18959  df-grp 19127  df-minusg 19128  df-sbg 19129  df-subg 19313  df-cntz 19511  df-oppg 19540  df-lsm 19830  df-cmn 19976  df-abl 19977  df-mgp 20341  df-rng 20355  df-ur 20388  df-ring 20441  df-oppr 20547  df-dvdsr 20567  df-unit 20568  df-invr 20598  df-dvr 20611  df-nzr 20743  df-rlreg 20926  df-domn 20927  df-drng 20962  df-lmod 21117  df-lss 21187  df-lsp 21227  df-lvec 21358  df-lsatoms 40001  df-lshyp 40002  df-lcv 40044  df-lfl 40083  df-lkr 40111  df-ldual 40149  df-oposet 40201  df-ol 40203  df-oml 40204  df-covers 40291  df-ats 40292  df-atl 40323  df-cvlat 40347  df-hlat 40376  df-llines 40523  df-lplanes 40524  df-lvols 40525  df-lines 40526  df-psubsp 40528  df-pmap 40529  df-padd 40821  df-lhyp 41013  df-laut 41014  df-ldil 41129  df-ltrn 41130  df-trl 41184  df-tgrp 41768  df-tendo 41780  df-edring 41782  df-dveca 42028  df-disoa 42054  df-dvech 42104  df-dib 42164  df-dic 42198  df-dih 42254  df-doch 42373  df-djh 42420  df-lcdual 42612  df-mapd 42650  df-hvmap 42782  df-hdmap1 42818  df-hdmap 42819
This theorem is used by:  hdmap10  42865
  Copyright terms: Public domain W3C validator