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

Theorem occllem 31655
Description: Lemma for occl 31656. (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 2763 . . . 4 (TopOpen‘ℂfld) = (TopOpen‘ℂfld)
21cnfldhaus 24941 . . 3 (TopOpen‘ℂfld) ∈ Haus
32a1i 11 . 2 (𝜑 → (TopOpen‘ℂfld) ∈ Haus)
4 occl.2 . . . . . . 7 (𝜑𝐹 ∈ Cauchy)
5 ax-hcompl 31554 . . . . . . 7 (𝐹 ∈ Cauchy → ∃𝑥 ∈ ℋ 𝐹𝑣 𝑥)
6 hlimf 31589 . . . . . . . . . 10 𝑣 :dom ⇝𝑣 ⟶ ℋ
7 ffn 6705 . . . . . . . . . 10 ( ⇝𝑣 :dom ⇝𝑣 ⟶ ℋ → ⇝𝑣 Fn dom ⇝𝑣 )
86, 7ax-mp 5 . . . . . . . . 9 𝑣 Fn dom ⇝𝑣
9 fnbr 6643 . . . . . . . . 9 (( ⇝𝑣 Fn dom ⇝𝑣𝐹𝑣 𝑥) → 𝐹 ∈ dom ⇝𝑣 )
108, 9mpan 702 . . . . . . . 8 (𝐹𝑣 𝑥𝐹 ∈ dom ⇝𝑣 )
1110rexlimivw 3162 . . . . . . 7 (∃𝑥 ∈ ℋ 𝐹𝑣 𝑥𝐹 ∈ dom ⇝𝑣 )
124, 5, 113syl 19 . . . . . 6 (𝜑𝐹 ∈ dom ⇝𝑣 )
13 ffun 6708 . . . . . . 7 ( ⇝𝑣 :dom ⇝𝑣 ⟶ ℋ → Fun ⇝𝑣 )
14 funfvbrb 7046 . . . . . . 7 (Fun ⇝𝑣 → (𝐹 ∈ dom ⇝𝑣𝐹𝑣 ( ⇝𝑣𝐹)))
156, 13, 14mp2b 10 . . . . . 6 (𝐹 ∈ dom ⇝𝑣𝐹𝑣 ( ⇝𝑣𝐹))
1612, 15sylib 221 . . . . 5 (𝜑𝐹𝑣 ( ⇝𝑣𝐹))
17 eqid 2763 . . . . . . . 8 ⟨⟨ + , · ⟩, norm⟩ = ⟨⟨ + , · ⟩, norm
18 eqid 2763 . . . . . . . . 9 (norm ∘ − ) = (norm ∘ − )
1917, 18hhims 31524 . . . . . . . 8 (norm ∘ − ) = (IndMet‘⟨⟨ + , · ⟩, norm⟩)
20 eqid 2763 . . . . . . . 8 (MetOpen‘(norm ∘ − )) = (MetOpen‘(norm ∘ − ))
2117, 19, 20hhlm 31551 . . . . . . 7 𝑣 = ((⇝𝑡‘(MetOpen‘(norm ∘ − ))) ↾ ( ℋ ↑m ℕ))
22 resss 6000 . . . . . . 7 ((⇝𝑡‘(MetOpen‘(norm ∘ − ))) ↾ ( ℋ ↑m ℕ)) ⊆ (⇝𝑡‘(MetOpen‘(norm ∘ − )))
2321, 22eqsstri 3983 . . . . . 6 𝑣 ⊆ (⇝𝑡‘(MetOpen‘(norm ∘ − )))
2423ssbri 5156 . . . . 5 (𝐹𝑣 ( ⇝𝑣𝐹) → 𝐹(⇝𝑡‘(MetOpen‘(norm ∘ − )))( ⇝𝑣𝐹))
2516, 24syl 18 . . . 4 (𝜑𝐹(⇝𝑡‘(MetOpen‘(norm ∘ − )))( ⇝𝑣𝐹))
2618hilxmet 31547 . . . . . 6 (norm ∘ − ) ∈ (∞Met‘ ℋ)
2720mopntopon 24596 . . . . . 6 ((norm ∘ − ) ∈ (∞Met‘ ℋ) → (MetOpen‘(norm ∘ − )) ∈ (TopOn‘ ℋ))
2826, 27mp1i 14 . . . . 5 (𝜑 → (MetOpen‘(norm ∘ − )) ∈ (TopOn‘ ℋ))
2928cnmptid 23818 . . . . 5 (𝜑 → (𝑥 ∈ ℋ ↦ 𝑥) ∈ ((MetOpen‘(norm ∘ − )) Cn (MetOpen‘(norm ∘ − ))))
30 occl.1 . . . . . . 7 (𝜑𝐴 ⊆ ℋ)
31 occl.4 . . . . . . 7 (𝜑𝐵𝐴)
3230, 31sseldd 3938 . . . . . 6 (𝜑𝐵 ∈ ℋ)
3328, 28, 32cnmptc 23819 . . . . 5 (𝜑 → (𝑥 ∈ ℋ ↦ 𝐵) ∈ ((MetOpen‘(norm ∘ − )) Cn (MetOpen‘(norm ∘ − ))))
3417hhnv 31517 . . . . . 6 ⟨⟨ + , · ⟩, norm⟩ ∈ NrmCVec
3517hhip 31529 . . . . . . 7 ·ih = (·𝑖OLD‘⟨⟨ + , · ⟩, norm⟩)
3635, 19, 20, 1dipcn 31072 . . . . . 6 (⟨⟨ + , · ⟩, norm⟩ ∈ NrmCVec → ·ih ∈ (((MetOpen‘(norm ∘ − )) ×t (MetOpen‘(norm ∘ − ))) Cn (TopOpen‘ℂfld)))
3734, 36mp1i 14 . . . . 5 (𝜑·ih ∈ (((MetOpen‘(norm ∘ − )) ×t (MetOpen‘(norm ∘ − ))) Cn (TopOpen‘ℂfld)))
3828, 29, 33, 37cnmpt12f 23823 . . . 4 (𝜑 → (𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵)) ∈ ((MetOpen‘(norm ∘ − )) Cn (TopOpen‘ℂfld)))
3925, 38lmcn 23462 . . 3 (𝜑 → ((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵)) ∘ 𝐹)(⇝𝑡‘(TopOpen‘ℂfld))((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵))‘( ⇝𝑣𝐹)))
40 occl.3 . . . . . . . . . . 11 (𝜑𝐹:ℕ⟶(⊥‘𝐴))
4140ffvelcdmda 7079 . . . . . . . . . 10 ((𝜑𝑘 ∈ ℕ) → (𝐹𝑘) ∈ (⊥‘𝐴))
42 ocel 31633 . . . . . . . . . . . 12 (𝐴 ⊆ ℋ → ((𝐹𝑘) ∈ (⊥‘𝐴) ↔ ((𝐹𝑘) ∈ ℋ ∧ ∀𝑥𝐴 ((𝐹𝑘) ·ih 𝑥) = 0)))
4330, 42syl 18 . . . . . . . . . . 11 (𝜑 → ((𝐹𝑘) ∈ (⊥‘𝐴) ↔ ((𝐹𝑘) ∈ ℋ ∧ ∀𝑥𝐴 ((𝐹𝑘) ·ih 𝑥) = 0)))
4443adantr 485 . . . . . . . . . 10 ((𝜑𝑘 ∈ ℕ) → ((𝐹𝑘) ∈ (⊥‘𝐴) ↔ ((𝐹𝑘) ∈ ℋ ∧ ∀𝑥𝐴 ((𝐹𝑘) ·ih 𝑥) = 0)))
4541, 44mpbid 235 . . . . . . . . 9 ((𝜑𝑘 ∈ ℕ) → ((𝐹𝑘) ∈ ℋ ∧ ∀𝑥𝐴 ((𝐹𝑘) ·ih 𝑥) = 0))
4645simpld 499 . . . . . . . 8 ((𝜑𝑘 ∈ ℕ) → (𝐹𝑘) ∈ ℋ)
47 oveq1 7417 . . . . . . . . 9 (𝑥 = (𝐹𝑘) → (𝑥 ·ih 𝐵) = ((𝐹𝑘) ·ih 𝐵))
48 eqid 2763 . . . . . . . . 9 (𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵)) = (𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵))
49 ovex 7443 . . . . . . . . 9 ((𝐹𝑘) ·ih 𝐵) ∈ V
5047, 48, 49fvmpt 6989 . . . . . . . 8 ((𝐹𝑘) ∈ ℋ → ((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵))‘(𝐹𝑘)) = ((𝐹𝑘) ·ih 𝐵))
5146, 50syl 18 . . . . . . 7 ((𝜑𝑘 ∈ ℕ) → ((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵))‘(𝐹𝑘)) = ((𝐹𝑘) ·ih 𝐵))
52 oveq2 7418 . . . . . . . . 9 (𝑥 = 𝐵 → ((𝐹𝑘) ·ih 𝑥) = ((𝐹𝑘) ·ih 𝐵))
5352eqeq1d 2765 . . . . . . . 8 (𝑥 = 𝐵 → (((𝐹𝑘) ·ih 𝑥) = 0 ↔ ((𝐹𝑘) ·ih 𝐵) = 0))
5445simprd 500 . . . . . . . 8 ((𝜑𝑘 ∈ ℕ) → ∀𝑥𝐴 ((𝐹𝑘) ·ih 𝑥) = 0)
5531adantr 485 . . . . . . . 8 ((𝜑𝑘 ∈ ℕ) → 𝐵𝐴)
5653, 54, 55rspcdva 3582 . . . . . . 7 ((𝜑𝑘 ∈ ℕ) → ((𝐹𝑘) ·ih 𝐵) = 0)
5751, 56eqtrd 2798 . . . . . 6 ((𝜑𝑘 ∈ ℕ) → ((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵))‘(𝐹𝑘)) = 0)
58 ocss 31637 . . . . . . . . 9 (𝐴 ⊆ ℋ → (⊥‘𝐴) ⊆ ℋ)
5930, 58syl 18 . . . . . . . 8 (𝜑 → (⊥‘𝐴) ⊆ ℋ)
6040, 59fssd 6723 . . . . . . 7 (𝜑𝐹:ℕ⟶ ℋ)
61 fvco3 6981 . . . . . . 7 ((𝐹:ℕ⟶ ℋ ∧ 𝑘 ∈ ℕ) → (((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵)) ∘ 𝐹)‘𝑘) = ((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵))‘(𝐹𝑘)))
6260, 61sylan 591 . . . . . 6 ((𝜑𝑘 ∈ ℕ) → (((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵)) ∘ 𝐹)‘𝑘) = ((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵))‘(𝐹𝑘)))
63 c0ex 11195 . . . . . . . 8 0 ∈ V
6463fvconst2 7202 . . . . . . 7 (𝑘 ∈ ℕ → ((ℕ × {0})‘𝑘) = 0)
6564adantl 486 . . . . . 6 ((𝜑𝑘 ∈ ℕ) → ((ℕ × {0})‘𝑘) = 0)
6657, 62, 653eqtr4d 2808 . . . . 5 ((𝜑𝑘 ∈ ℕ) → (((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵)) ∘ 𝐹)‘𝑘) = ((ℕ × {0})‘𝑘))
6766ralrimiva 3157 . . . 4 (𝜑 → ∀𝑘 ∈ ℕ (((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵)) ∘ 𝐹)‘𝑘) = ((ℕ × {0})‘𝑘))
68 ovex 7443 . . . . . . 7 (𝑥 ·ih 𝐵) ∈ V
6968, 48fnmpti 6678 . . . . . 6 (𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵)) Fn ℋ
70 fnfco 6743 . . . . . 6 (((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵)) Fn ℋ ∧ 𝐹:ℕ⟶ ℋ) → ((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵)) ∘ 𝐹) Fn ℕ)
7169, 60, 70sylancr 598 . . . . 5 (𝜑 → ((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵)) ∘ 𝐹) Fn ℕ)
7263fconst 6764 . . . . . 6 (ℕ × {0}):ℕ⟶{0}
73 ffn 6705 . . . . . 6 ((ℕ × {0}):ℕ⟶{0} → (ℕ × {0}) Fn ℕ)
7472, 73ax-mp 5 . . . . 5 (ℕ × {0}) Fn ℕ
75 eqfnfv 7025 . . . . 5 ((((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵)) ∘ 𝐹) Fn ℕ ∧ (ℕ × {0}) Fn ℕ) → (((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵)) ∘ 𝐹) = (ℕ × {0}) ↔ ∀𝑘 ∈ ℕ (((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵)) ∘ 𝐹)‘𝑘) = ((ℕ × {0})‘𝑘)))
7671, 74, 75sylancl 597 . . . 4 (𝜑 → (((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵)) ∘ 𝐹) = (ℕ × {0}) ↔ ∀𝑘 ∈ ℕ (((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵)) ∘ 𝐹)‘𝑘) = ((ℕ × {0})‘𝑘)))
7767, 76mpbird 260 . . 3 (𝜑 → ((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵)) ∘ 𝐹) = (ℕ × {0}))
78 fvex 6894 . . . . 5 ( ⇝𝑣𝐹) ∈ V
7978hlimveci 31542 . . . 4 (𝐹𝑣 ( ⇝𝑣𝐹) → ( ⇝𝑣𝐹) ∈ ℋ)
80 oveq1 7417 . . . . 5 (𝑥 = ( ⇝𝑣𝐹) → (𝑥 ·ih 𝐵) = (( ⇝𝑣𝐹) ·ih 𝐵))
81 ovex 7443 . . . . 5 (( ⇝𝑣𝐹) ·ih 𝐵) ∈ V
8280, 48, 81fvmpt 6989 . . . 4 (( ⇝𝑣𝐹) ∈ ℋ → ((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵))‘( ⇝𝑣𝐹)) = (( ⇝𝑣𝐹) ·ih 𝐵))
8316, 79, 823syl 19 . . 3 (𝜑 → ((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵))‘( ⇝𝑣𝐹)) = (( ⇝𝑣𝐹) ·ih 𝐵))
8439, 77, 833brtr3d 5142 . 2 (𝜑 → (ℕ × {0})(⇝𝑡‘(TopOpen‘ℂfld))(( ⇝𝑣𝐹) ·ih 𝐵))
851cnfldtopon 24939 . . . 4 (TopOpen‘ℂfld) ∈ (TopOn‘ℂ)
8685a1i 11 . . 3 (𝜑 → (TopOpen‘ℂfld) ∈ (TopOn‘ℂ))
87 0cnd 11194 . . 3 (𝜑 → 0 ∈ ℂ)
88 1zzd 12620 . . 3 (𝜑 → 1 ∈ ℤ)
89 nnuz 12896 . . . 4 ℕ = (ℤ‘1)
9089lmconst 23418 . . 3 (((TopOpen‘ℂfld) ∈ (TopOn‘ℂ) ∧ 0 ∈ ℂ ∧ 1 ∈ ℤ) → (ℕ × {0})(⇝𝑡‘(TopOpen‘ℂfld))0)
9186, 87, 88, 90syl3anc 1398 . 2 (𝜑 → (ℕ × {0})(⇝𝑡‘(TopOpen‘ℂfld))0)
923, 84, 91lmmo 23537 1 (𝜑 → (( ⇝𝑣𝐹) ·ih 𝐵) = 0)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 209  wa 400   = wceq 1570  wcel 2143  wral 3079  wrex 3089  wss 3905  {csn 4589  cop 4595   class class class wbr 5109  cmpt 5192   × cxp 5659  dom cdm 5661  cres 5663  ccom 5665  Fun wfun 6530   Fn wfn 6531  wf 6532  cfv 6536  (class class class)co 7410  m cmap 8820  cc 11093  0cc0 11095  1c1 11096  cn 12228  cz 12586  TopOpenctopn 17469  ∞Metcxmet 21507  MetOpencmopn 21512  fldccnfld 21522  TopOnctopon 23067   Cn ccn 23381  𝑡clm 23383  Hauscha 23465   ×t ctx 23717  NrmCVeccnv 30936  chba 31271   + cva 31272   · csm 31273   ·ih csp 31274  normcno 31275   cmv 31277  Cauchyccauold 31278  𝑣 chli 31279  cort 31282
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1825  ax-4 1839  ax-5 1940  ax-6 1997  ax-7 2038  ax-8 2145  ax-9 2153  ax-10 2176  ax-11 2192  ax-12 2213  ax-ext 2735  ax-rep 5238  ax-sep 5257  ax-nul 5269  ax-pow 5336  ax-pr 5404  ax-un 7732  ax-inf2 9606  ax-cnex 11151  ax-resscn 11152  ax-1cn 11153  ax-icn 11154  ax-addcl 11155  ax-addrcl 11156  ax-mulcl 11157  ax-mulrcl 11158  ax-mulcom 11159  ax-addass 11160  ax-mulass 11161  ax-distr 11162  ax-i2m1 11163  ax-1ne0 11164  ax-1rid 11165  ax-rnegex 11166  ax-rrecex 11167  ax-cnre 11168  ax-pre-lttri 11169  ax-pre-lttrn 11170  ax-pre-ltadd 11171  ax-pre-mulgt0 11172  ax-pre-sup 11173  ax-addf 11174  ax-mulf 11175  ax-hilex 31351  ax-hfvadd 31352  ax-hvcom 31353  ax-hvass 31354  ax-hv0cl 31355  ax-hvaddid 31356  ax-hfvmul 31357  ax-hvmulid 31358  ax-hvmulass 31359  ax-hvdistr1 31360  ax-hvdistr2 31361  ax-hvmul0 31362  ax-hfi 31431  ax-his1 31434  ax-his2 31435  ax-his3 31436  ax-his4 31437  ax-hcompl 31554
This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1810  df-nf 1814  df-sb 2097  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2838  df-nfc 2912  df-ne 2959  df-nel 3065  df-ral 3080  df-rex 3090  df-rmo 3369  df-reu 3370  df-rab 3417  df-v 3457  df-sbc 3745  df-csb 3854  df-dif 3908  df-un 3910  df-in 3912  df-ss 3922  df-pss 3925  df-nul 4287  df-if 4488  df-pw 4564  df-sn 4590  df-pr 4592  df-tp 4594  df-op 4596  df-uni 4873  df-int 4913  df-iun 4958  df-iin 4959  df-br 5110  df-opab 5174  df-mpt 5193  df-tr 5219  df-id 5556  df-eprel 5561  df-po 5569  df-so 5570  df-fr 5614  df-se 5615  df-we 5616  df-xp 5667  df-rel 5668  df-cnv 5669  df-co 5670  df-dm 5671  df-rn 5672  df-res 5673  df-ima 5674  df-pred 6302  df-ord 6363  df-on 6364  df-lim 6365  df-suc 6366  df-iota 6492  df-fun 6538  df-fn 6539  df-f 6540  df-f1 6541  df-fo 6542  df-f1o 6543  df-fv 6544  df-isom 6545  df-riota 7367  df-ov 7413  df-oprab 7414  df-mpo 7415  df-of 7674  df-om 7859  df-1st 7982  df-2nd 7983  df-supp 8153  df-frecs 8274  df-wrecs 8305  df-recs 8354  df-rdg 8393  df-1o 8449  df-2o 8450  df-er 8690  df-map 8822  df-pm 8823  df-ixp 8892  df-en 8940  df-dom 8941  df-sdom 8942  df-fin 8943  df-fsupp 9318  df-fi 9367  df-sup 9398  df-inf 9399  df-oi 9468  df-card 9921  df-pnf 11240  df-mnf 11241  df-xr 11242  df-ltxr 11243  df-le 11244  df-sub 11438  df-neg 11439  df-div 11867  df-nn 12229  df-2 12298  df-3 12299  df-4 12300  df-5 12301  df-6 12302  df-7 12303  df-8 12304  df-9 12305  df-n0 12500  df-z 12587  df-dec 12707  df-uz 12858  df-q 12968  df-rp 13012  df-xneg 13132  df-xadd 13133  df-xmul 13134  df-ioo 13371  df-icc 13374  df-fz 13531  df-fzo 13679  df-seq 14034  df-exp 14094  df-hash 14363  df-cj 15146  df-re 15147  df-im 15148  df-sqrt 15282  df-abs 15283  df-clim 15535  df-sum 15734  df-struct 17202  df-sets 17219  df-slot 17237  df-ndx 17249  df-base 17265  df-ress 17286  df-plusg 17318  df-mulr 17319  df-starv 17320  df-sca 17321  df-vsca 17322  df-ip 17323  df-tset 17324  df-ple 17325  df-ds 17327  df-unif 17328  df-hom 17329  df-cco 17330  df-rest 17470  df-topn 17471  df-0g 17489  df-gsum 17490  df-topgen 17491  df-pt 17492  df-prds 17495  df-xrs 17551  df-qtop 17556  df-imas 17557  df-xps 17559  df-mre 17633  df-mrc 17634  df-acs 17636  df-mgm 18693  df-sgrp 18772  df-mnd 18788  df-submnd 18837  df-mulg 19129  df-cntz 19382  df-cmn 19847  df-psmet 21514  df-xmet 21515  df-met 21516  df-bl 21517  df-mopn 21518  df-cnfld 21523  df-top 23051  df-topon 23068  df-topsp 23090  df-bases 23103  df-cn 23384  df-cnp 23385  df-lm 23386  df-haus 23472  df-tx 23719  df-hmeo 23912  df-xms 24477  df-ms 24478  df-tms 24479  df-grpo 30845  df-gid 30846  df-ginv 30847  df-gdiv 30848  df-ablo 30897  df-vc 30911  df-nv 30944  df-va 30947  df-ba 30948  df-sm 30949  df-0v 30950  df-vs 30951  df-nmcv 30952  df-ims 30953  df-dip 31053  df-hnorm 31320  df-hvsub 31323  df-hlim 31324  df-sh 31559  df-oc 31604
This theorem is referenced by:  occl  31656
  Copyright terms: Public domain W3C validator