GraduationStudy2018

2018年度卒業研究

• メンバーページ

  ウォーミングアップ資料

• 閉曲面の位相幾何学 polygonDiagrams.nb(167)
• 曲線の微分幾何学 FX1000.nb(154)
• 曲面上の平行移動 ParallelTransport9.nb(196)
• Gauss-Bonnet の定理、楕円体版 Wolfram03ellipsoid.nb(159)
• Gauss-Bonnet の定理、双曲面版 Wolfram04hyperboloid.nb(165)

DynamicModule と EventHandler の例

DynamicModule[{col = Red},
 EventHandler[
  Animate[
   Graphics[{Dynamic[col], Disk[{Cos[t], Sin[t]}, 0.2]}, 
    PlotRange -> {{-2, 2}, {-2, 2}}], {t, 0, 2 Pi}],
  {"MouseClicked" :> (col = col /. {Red -> Green, Green -> Red})}]]

文字をtexture として貼り付けるにはTexture.nb(145)