Urabe Lab. |1|2|3|4|5|6|7|8|9|10|11|12|13|14|15|16|17|18|19|20|21|22|23|24|25|Epilogue　

Plot3D [ (Cos[Pi x] Cos[Pi y])^3, {x, -2, 2}, {y, -2, 2}, PlotPoints -> 50, Boxed -> False, Axes -> None]	Plot3D[ Cos[Pi x] Cos[Pi y], {x, -4, 2}, {y, -4, 2}, PlotPoints -> 50, Boxed -> False, Axes -> None]	Plot3D[ (50x^2 + y^2) Exp[1 - x^2 - y^2], {x, -2.5, 2.5}, {y, -2, 2}, ViewPoint -> {1.015, -3.181, 0.548}, PlotPoints -> 50, Boxed -> False, Axes -> None]	Plot3D[ 1/Sqrt[(1 - x)^2 + y^2] + 1/Sqrt[(1 + x)^2 + y^2], {x, -2, 2}, {y, -2, 2}, PlotPoints -> 50, Boxed -> False, Axes -> None]

Send your opinions and comments to .