HSE Home Hilbert Space Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  HSE Home  >  Th. List  >  occllem Structured version   Visualization version   GIF version

Theorem occllem 31391
Description: Lemma for occl 31392. (Contributed by NM, 7-Aug-2000.) (Revised by Mario Carneiro, 14-May-2014.) (New usage is discouraged.)
Hypotheses
Ref Expression
occl.1 (𝜑𝐴 ⊆ ℋ)
occl.2 (𝜑𝐹 ∈ Cauchy)
occl.3 (𝜑𝐹:ℕ⟶(⊥‘𝐴))
occl.4 (𝜑𝐵𝐴)
Assertion
Ref Expression
occllem (𝜑 → (( ⇝𝑣𝐹) ·ih 𝐵) = 0)

Proof of Theorem occllem
Dummy variables 𝑥 𝑘 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 eqid 2737 . . . 4 (TopOpen‘ℂfld) = (TopOpen‘ℂfld)
21cnfldhaus 24740 . . 3 (TopOpen‘ℂfld) ∈ Haus
32a1i 11 . 2 (𝜑 → (TopOpen‘ℂfld) ∈ Haus)
4 occl.2 . . . . . . 7 (𝜑𝐹 ∈ Cauchy)
5 ax-hcompl 31290 . . . . . . 7 (𝐹 ∈ Cauchy → ∃𝑥 ∈ ℋ 𝐹𝑣 𝑥)
6 hlimf 31325 . . . . . . . . . 10 𝑣 :dom ⇝𝑣 ⟶ ℋ
7 ffn 6670 . . . . . . . . . 10 ( ⇝𝑣 :dom ⇝𝑣 ⟶ ℋ → ⇝𝑣 Fn dom ⇝𝑣 )
86, 7ax-mp 5 . . . . . . . . 9 𝑣 Fn dom ⇝𝑣
9 fnbr 6608 . . . . . . . . 9 (( ⇝𝑣 Fn dom ⇝𝑣𝐹𝑣 𝑥) → 𝐹 ∈ dom ⇝𝑣 )
108, 9mpan 691 . . . . . . . 8 (𝐹𝑣 𝑥𝐹 ∈ dom ⇝𝑣 )
1110rexlimivw 3135 . . . . . . 7 (∃𝑥 ∈ ℋ 𝐹𝑣 𝑥𝐹 ∈ dom ⇝𝑣 )
124, 5, 113syl 18 . . . . . 6 (𝜑𝐹 ∈ dom ⇝𝑣 )
13 ffun 6673 . . . . . . 7 ( ⇝𝑣 :dom ⇝𝑣 ⟶ ℋ → Fun ⇝𝑣 )
14 funfvbrb 7005 . . . . . . 7 (Fun ⇝𝑣 → (𝐹 ∈ dom ⇝𝑣𝐹𝑣 ( ⇝𝑣𝐹)))
156, 13, 14mp2b 10 . . . . . 6 (𝐹 ∈ dom ⇝𝑣𝐹𝑣 ( ⇝𝑣𝐹))
1612, 15sylib 218 . . . . 5 (𝜑𝐹𝑣 ( ⇝𝑣𝐹))
17 eqid 2737 . . . . . . . 8 ⟨⟨ + , · ⟩, norm⟩ = ⟨⟨ + , · ⟩, norm
18 eqid 2737 . . . . . . . . 9 (norm ∘ − ) = (norm ∘ − )
1917, 18hhims 31260 . . . . . . . 8 (norm ∘ − ) = (IndMet‘⟨⟨ + , · ⟩, norm⟩)
20 eqid 2737 . . . . . . . 8 (MetOpen‘(norm ∘ − )) = (MetOpen‘(norm ∘ − ))
2117, 19, 20hhlm 31287 . . . . . . 7 𝑣 = ((⇝𝑡‘(MetOpen‘(norm ∘ − ))) ↾ ( ℋ ↑m ℕ))
22 resss 5968 . . . . . . 7 ((⇝𝑡‘(MetOpen‘(norm ∘ − ))) ↾ ( ℋ ↑m ℕ)) ⊆ (⇝𝑡‘(MetOpen‘(norm ∘ − )))
2321, 22eqsstri 3982 . . . . . 6 𝑣 ⊆ (⇝𝑡‘(MetOpen‘(norm ∘ − )))
2423ssbri 5145 . . . . 5 (𝐹𝑣 ( ⇝𝑣𝐹) → 𝐹(⇝𝑡‘(MetOpen‘(norm ∘ − )))( ⇝𝑣𝐹))
2516, 24syl 17 . . . 4 (𝜑𝐹(⇝𝑡‘(MetOpen‘(norm ∘ − )))( ⇝𝑣𝐹))
2618hilxmet 31283 . . . . . 6 (norm ∘ − ) ∈ (∞Met‘ ℋ)
2720mopntopon 24395 . . . . . 6 ((norm ∘ − ) ∈ (∞Met‘ ℋ) → (MetOpen‘(norm ∘ − )) ∈ (TopOn‘ ℋ))
2826, 27mp1i 13 . . . . 5 (𝜑 → (MetOpen‘(norm ∘ − )) ∈ (TopOn‘ ℋ))
2928cnmptid 23617 . . . . 5 (𝜑 → (𝑥 ∈ ℋ ↦ 𝑥) ∈ ((MetOpen‘(norm ∘ − )) Cn (MetOpen‘(norm ∘ − ))))
30 occl.1 . . . . . . 7 (𝜑𝐴 ⊆ ℋ)
31 occl.4 . . . . . . 7 (𝜑𝐵𝐴)
3230, 31sseldd 3936 . . . . . 6 (𝜑𝐵 ∈ ℋ)
3328, 28, 32cnmptc 23618 . . . . 5 (𝜑 → (𝑥 ∈ ℋ ↦ 𝐵) ∈ ((MetOpen‘(norm ∘ − )) Cn (MetOpen‘(norm ∘ − ))))
3417hhnv 31253 . . . . . 6 ⟨⟨ + , · ⟩, norm⟩ ∈ NrmCVec
3517hhip 31265 . . . . . . 7 ·ih = (·𝑖OLD‘⟨⟨ + , · ⟩, norm⟩)
3635, 19, 20, 1dipcn 30808 . . . . . 6 (⟨⟨ + , · ⟩, norm⟩ ∈ NrmCVec → ·ih ∈ (((MetOpen‘(norm ∘ − )) ×t (MetOpen‘(norm ∘ − ))) Cn (TopOpen‘ℂfld)))
3734, 36mp1i 13 . . . . 5 (𝜑·ih ∈ (((MetOpen‘(norm ∘ − )) ×t (MetOpen‘(norm ∘ − ))) Cn (TopOpen‘ℂfld)))
3828, 29, 33, 37cnmpt12f 23622 . . . 4 (𝜑 → (𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵)) ∈ ((MetOpen‘(norm ∘ − )) Cn (TopOpen‘ℂfld)))
3925, 38lmcn 23261 . . 3 (𝜑 → ((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵)) ∘ 𝐹)(⇝𝑡‘(TopOpen‘ℂfld))((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵))‘( ⇝𝑣𝐹)))
40 occl.3 . . . . . . . . . . 11 (𝜑𝐹:ℕ⟶(⊥‘𝐴))
4140ffvelcdmda 7038 . . . . . . . . . 10 ((𝜑𝑘 ∈ ℕ) → (𝐹𝑘) ∈ (⊥‘𝐴))
42 ocel 31369 . . . . . . . . . . . 12 (𝐴 ⊆ ℋ → ((𝐹𝑘) ∈ (⊥‘𝐴) ↔ ((𝐹𝑘) ∈ ℋ ∧ ∀𝑥𝐴 ((𝐹𝑘) ·ih 𝑥) = 0)))
4330, 42syl 17 . . . . . . . . . . 11 (𝜑 → ((𝐹𝑘) ∈ (⊥‘𝐴) ↔ ((𝐹𝑘) ∈ ℋ ∧ ∀𝑥𝐴 ((𝐹𝑘) ·ih 𝑥) = 0)))
4443adantr 480 . . . . . . . . . 10 ((𝜑𝑘 ∈ ℕ) → ((𝐹𝑘) ∈ (⊥‘𝐴) ↔ ((𝐹𝑘) ∈ ℋ ∧ ∀𝑥𝐴 ((𝐹𝑘) ·ih 𝑥) = 0)))
4541, 44mpbid 232 . . . . . . . . 9 ((𝜑𝑘 ∈ ℕ) → ((𝐹𝑘) ∈ ℋ ∧ ∀𝑥𝐴 ((𝐹𝑘) ·ih 𝑥) = 0))
4645simpld 494 . . . . . . . 8 ((𝜑𝑘 ∈ ℕ) → (𝐹𝑘) ∈ ℋ)
47 oveq1 7375 . . . . . . . . 9 (𝑥 = (𝐹𝑘) → (𝑥 ·ih 𝐵) = ((𝐹𝑘) ·ih 𝐵))
48 eqid 2737 . . . . . . . . 9 (𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵)) = (𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵))
49 ovex 7401 . . . . . . . . 9 ((𝐹𝑘) ·ih 𝐵) ∈ V
5047, 48, 49fvmpt 6949 . . . . . . . 8 ((𝐹𝑘) ∈ ℋ → ((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵))‘(𝐹𝑘)) = ((𝐹𝑘) ·ih 𝐵))
5146, 50syl 17 . . . . . . 7 ((𝜑𝑘 ∈ ℕ) → ((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵))‘(𝐹𝑘)) = ((𝐹𝑘) ·ih 𝐵))
52 oveq2 7376 . . . . . . . . 9 (𝑥 = 𝐵 → ((𝐹𝑘) ·ih 𝑥) = ((𝐹𝑘) ·ih 𝐵))
5352eqeq1d 2739 . . . . . . . 8 (𝑥 = 𝐵 → (((𝐹𝑘) ·ih 𝑥) = 0 ↔ ((𝐹𝑘) ·ih 𝐵) = 0))
5445simprd 495 . . . . . . . 8 ((𝜑𝑘 ∈ ℕ) → ∀𝑥𝐴 ((𝐹𝑘) ·ih 𝑥) = 0)
5531adantr 480 . . . . . . . 8 ((𝜑𝑘 ∈ ℕ) → 𝐵𝐴)
5653, 54, 55rspcdva 3579 . . . . . . 7 ((𝜑𝑘 ∈ ℕ) → ((𝐹𝑘) ·ih 𝐵) = 0)
5751, 56eqtrd 2772 . . . . . 6 ((𝜑𝑘 ∈ ℕ) → ((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵))‘(𝐹𝑘)) = 0)
58 ocss 31373 . . . . . . . . 9 (𝐴 ⊆ ℋ → (⊥‘𝐴) ⊆ ℋ)
5930, 58syl 17 . . . . . . . 8 (𝜑 → (⊥‘𝐴) ⊆ ℋ)
6040, 59fssd 6687 . . . . . . 7 (𝜑𝐹:ℕ⟶ ℋ)
61 fvco3 6941 . . . . . . 7 ((𝐹:ℕ⟶ ℋ ∧ 𝑘 ∈ ℕ) → (((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵)) ∘ 𝐹)‘𝑘) = ((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵))‘(𝐹𝑘)))
6260, 61sylan 581 . . . . . 6 ((𝜑𝑘 ∈ ℕ) → (((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵)) ∘ 𝐹)‘𝑘) = ((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵))‘(𝐹𝑘)))
63 c0ex 11138 . . . . . . . 8 0 ∈ V
6463fvconst2 7160 . . . . . . 7 (𝑘 ∈ ℕ → ((ℕ × {0})‘𝑘) = 0)
6564adantl 481 . . . . . 6 ((𝜑𝑘 ∈ ℕ) → ((ℕ × {0})‘𝑘) = 0)
6657, 62, 653eqtr4d 2782 . . . . 5 ((𝜑𝑘 ∈ ℕ) → (((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵)) ∘ 𝐹)‘𝑘) = ((ℕ × {0})‘𝑘))
6766ralrimiva 3130 . . . 4 (𝜑 → ∀𝑘 ∈ ℕ (((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵)) ∘ 𝐹)‘𝑘) = ((ℕ × {0})‘𝑘))
68 ovex 7401 . . . . . . 7 (𝑥 ·ih 𝐵) ∈ V
6968, 48fnmpti 6643 . . . . . 6 (𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵)) Fn ℋ
70 fnfco 6707 . . . . . 6 (((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵)) Fn ℋ ∧ 𝐹:ℕ⟶ ℋ) → ((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵)) ∘ 𝐹) Fn ℕ)
7169, 60, 70sylancr 588 . . . . 5 (𝜑 → ((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵)) ∘ 𝐹) Fn ℕ)
7263fconst 6728 . . . . . 6 (ℕ × {0}):ℕ⟶{0}
73 ffn 6670 . . . . . 6 ((ℕ × {0}):ℕ⟶{0} → (ℕ × {0}) Fn ℕ)
7472, 73ax-mp 5 . . . . 5 (ℕ × {0}) Fn ℕ
75 eqfnfv 6985 . . . . 5 ((((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵)) ∘ 𝐹) Fn ℕ ∧ (ℕ × {0}) Fn ℕ) → (((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵)) ∘ 𝐹) = (ℕ × {0}) ↔ ∀𝑘 ∈ ℕ (((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵)) ∘ 𝐹)‘𝑘) = ((ℕ × {0})‘𝑘)))
7671, 74, 75sylancl 587 . . . 4 (𝜑 → (((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵)) ∘ 𝐹) = (ℕ × {0}) ↔ ∀𝑘 ∈ ℕ (((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵)) ∘ 𝐹)‘𝑘) = ((ℕ × {0})‘𝑘)))
7767, 76mpbird 257 . . 3 (𝜑 → ((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵)) ∘ 𝐹) = (ℕ × {0}))
78 fvex 6855 . . . . 5 ( ⇝𝑣𝐹) ∈ V
7978hlimveci 31278 . . . 4 (𝐹𝑣 ( ⇝𝑣𝐹) → ( ⇝𝑣𝐹) ∈ ℋ)
80 oveq1 7375 . . . . 5 (𝑥 = ( ⇝𝑣𝐹) → (𝑥 ·ih 𝐵) = (( ⇝𝑣𝐹) ·ih 𝐵))
81 ovex 7401 . . . . 5 (( ⇝𝑣𝐹) ·ih 𝐵) ∈ V
8280, 48, 81fvmpt 6949 . . . 4 (( ⇝𝑣𝐹) ∈ ℋ → ((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵))‘( ⇝𝑣𝐹)) = (( ⇝𝑣𝐹) ·ih 𝐵))
8316, 79, 823syl 18 . . 3 (𝜑 → ((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵))‘( ⇝𝑣𝐹)) = (( ⇝𝑣𝐹) ·ih 𝐵))
8439, 77, 833brtr3d 5131 . 2 (𝜑 → (ℕ × {0})(⇝𝑡‘(TopOpen‘ℂfld))(( ⇝𝑣𝐹) ·ih 𝐵))
851cnfldtopon 24738 . . . 4 (TopOpen‘ℂfld) ∈ (TopOn‘ℂ)
8685a1i 11 . . 3 (𝜑 → (TopOpen‘ℂfld) ∈ (TopOn‘ℂ))
87 0cnd 11137 . . 3 (𝜑 → 0 ∈ ℂ)
88 1zzd 12534 . . 3 (𝜑 → 1 ∈ ℤ)
89 nnuz 12802 . . . 4 ℕ = (ℤ‘1)
9089lmconst 23217 . . 3 (((TopOpen‘ℂfld) ∈ (TopOn‘ℂ) ∧ 0 ∈ ℂ ∧ 1 ∈ ℤ) → (ℕ × {0})(⇝𝑡‘(TopOpen‘ℂfld))0)
9186, 87, 88, 90syl3anc 1374 . 2 (𝜑 → (ℕ × {0})(⇝𝑡‘(TopOpen‘ℂfld))0)
923, 84, 91lmmo 23336 1 (𝜑 → (( ⇝𝑣𝐹) ·ih 𝐵) = 0)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 206  wa 395   = wceq 1542  wcel 2114  wral 3052  wrex 3062  wss 3903  {csn 4582  cop 4588   class class class wbr 5100  cmpt 5181   × cxp 5630  dom cdm 5632  cres 5634  ccom 5636  Fun wfun 6494   Fn wfn 6495  wf 6496  cfv 6500  (class class class)co 7368  m cmap 8775  cc 11036  0cc0 11038  1c1 11039  cn 12157  cz 12500  TopOpenctopn 17353  ∞Metcxmet 21306  MetOpencmopn 21311  fldccnfld 21321  TopOnctopon 22866   Cn ccn 23180  𝑡clm 23182  Hauscha 23264   ×t ctx 23516  NrmCVeccnv 30672  chba 31007   + cva 31008   · csm 31009   ·ih csp 31010  normcno 31011   cmv 31013  Cauchyccauold 31014  𝑣 chli 31015  cort 31018
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1912  ax-6 1969  ax-7 2010  ax-8 2116  ax-9 2124  ax-10 2147  ax-11 2163  ax-12 2185  ax-ext 2709  ax-rep 5226  ax-sep 5243  ax-nul 5253  ax-pow 5312  ax-pr 5379  ax-un 7690  ax-inf2 9562  ax-cnex 11094  ax-resscn 11095  ax-1cn 11096  ax-icn 11097  ax-addcl 11098  ax-addrcl 11099  ax-mulcl 11100  ax-mulrcl 11101  ax-mulcom 11102  ax-addass 11103  ax-mulass 11104  ax-distr 11105  ax-i2m1 11106  ax-1ne0 11107  ax-1rid 11108  ax-rnegex 11109  ax-rrecex 11110  ax-cnre 11111  ax-pre-lttri 11112  ax-pre-lttrn 11113  ax-pre-ltadd 11114  ax-pre-mulgt0 11115  ax-pre-sup 11116  ax-addf 11117  ax-mulf 11118  ax-hilex 31087  ax-hfvadd 31088  ax-hvcom 31089  ax-hvass 31090  ax-hv0cl 31091  ax-hvaddid 31092  ax-hfvmul 31093  ax-hvmulid 31094  ax-hvmulass 31095  ax-hvdistr1 31096  ax-hvdistr2 31097  ax-hvmul0 31098  ax-hfi 31167  ax-his1 31170  ax-his2 31171  ax-his3 31172  ax-his4 31173  ax-hcompl 31290
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3or 1088  df-3an 1089  df-tru 1545  df-fal 1555  df-ex 1782  df-nf 1786  df-sb 2069  df-mo 2540  df-eu 2570  df-clab 2716  df-cleq 2729  df-clel 2812  df-nfc 2886  df-ne 2934  df-nel 3038  df-ral 3053  df-rex 3063  df-rmo 3352  df-reu 3353  df-rab 3402  df-v 3444  df-sbc 3743  df-csb 3852  df-dif 3906  df-un 3908  df-in 3910  df-ss 3920  df-pss 3923  df-nul 4288  df-if 4482  df-pw 4558  df-sn 4583  df-pr 4585  df-tp 4587  df-op 4589  df-uni 4866  df-int 4905  df-iun 4950  df-iin 4951  df-br 5101  df-opab 5163  df-mpt 5182  df-tr 5208  df-id 5527  df-eprel 5532  df-po 5540  df-so 5541  df-fr 5585  df-se 5586  df-we 5587  df-xp 5638  df-rel 5639  df-cnv 5640  df-co 5641  df-dm 5642  df-rn 5643  df-res 5644  df-ima 5645  df-pred 6267  df-ord 6328  df-on 6329  df-lim 6330  df-suc 6331  df-iota 6456  df-fun 6502  df-fn 6503  df-f 6504  df-f1 6505  df-fo 6506  df-f1o 6507  df-fv 6508  df-isom 6509  df-riota 7325  df-ov 7371  df-oprab 7372  df-mpo 7373  df-of 7632  df-om 7819  df-1st 7943  df-2nd 7944  df-supp 8113  df-frecs 8233  df-wrecs 8264  df-recs 8313  df-rdg 8351  df-1o 8407  df-2o 8408  df-er 8645  df-map 8777  df-pm 8778  df-ixp 8848  df-en 8896  df-dom 8897  df-sdom 8898  df-fin 8899  df-fsupp 9277  df-fi 9326  df-sup 9357  df-inf 9358  df-oi 9427  df-card 9863  df-pnf 11180  df-mnf 11181  df-xr 11182  df-ltxr 11183  df-le 11184  df-sub 11378  df-neg 11379  df-div 11807  df-nn 12158  df-2 12220  df-3 12221  df-4 12222  df-5 12223  df-6 12224  df-7 12225  df-8 12226  df-9 12227  df-n0 12414  df-z 12501  df-dec 12620  df-uz 12764  df-q 12874  df-rp 12918  df-xneg 13038  df-xadd 13039  df-xmul 13040  df-ioo 13277  df-icc 13280  df-fz 13436  df-fzo 13583  df-seq 13937  df-exp 13997  df-hash 14266  df-cj 15034  df-re 15035  df-im 15036  df-sqrt 15170  df-abs 15171  df-clim 15423  df-sum 15622  df-struct 17086  df-sets 17103  df-slot 17121  df-ndx 17133  df-base 17149  df-ress 17170  df-plusg 17202  df-mulr 17203  df-starv 17204  df-sca 17205  df-vsca 17206  df-ip 17207  df-tset 17208  df-ple 17209  df-ds 17211  df-unif 17212  df-hom 17213  df-cco 17214  df-rest 17354  df-topn 17355  df-0g 17373  df-gsum 17374  df-topgen 17375  df-pt 17376  df-prds 17379  df-xrs 17435  df-qtop 17440  df-imas 17441  df-xps 17443  df-mre 17517  df-mrc 17518  df-acs 17520  df-mgm 18577  df-sgrp 18656  df-mnd 18672  df-submnd 18721  df-mulg 19010  df-cntz 19258  df-cmn 19723  df-psmet 21313  df-xmet 21314  df-met 21315  df-bl 21316  df-mopn 21317  df-cnfld 21322  df-top 22850  df-topon 22867  df-topsp 22889  df-bases 22902  df-cn 23183  df-cnp 23184  df-lm 23185  df-haus 23271  df-tx 23518  df-hmeo 23711  df-xms 24276  df-ms 24277  df-tms 24278  df-grpo 30581  df-gid 30582  df-ginv 30583  df-gdiv 30584  df-ablo 30633  df-vc 30647  df-nv 30680  df-va 30683  df-ba 30684  df-sm 30685  df-0v 30686  df-vs 30687  df-nmcv 30688  df-ims 30689  df-dip 30789  df-hnorm 31056  df-hvsub 31059  df-hlim 31060  df-sh 31295  df-oc 31340
This theorem is referenced by:  occl  31392
  Copyright terms: Public domain W3C validator