############################# # # File: /../tmp/Downloads/tmp/DiffGeom/MonkeySaddle/monkey_Saddle-parabola-curve.cs # Created: Sun Oct 19 09:40:39 -040027 2025 # By: CenterStage v3.2 # ::cs::File Version 3.2 #################### ::class::Group Create 3D_Surface { {Transform Scale(1,1,1)} {selected 1 none} {{set z} 0 0 {{{1 0 0} 50 Red} {{1 .5 0} 0 Orange} {{1 1 0} 50 Yellow} {{0 1 0} 50 Green} {{0 1 1} 50 Cyan} {{0 0 1} 50 Blue} {{1 0 1} 50 Purple} {{0 0 0} 0 Black} {{1 1 1} 0 White}} 1} {flat 1.0 1 1 0 0 0 0 0 0 0 0 1.0 1} {{} {}} } #################### ::class::Axes Create 3D_Surface/Axes { {Length 1 Axes \{x y z\}} {always 1 none} {{::_color::Function RGB} 0 1 {{{1 0 0} 50 Red} {{1 .5 0} 0 Orange} {{1 1 0} 50 Yellow} {{0 1 0} 50 Green} {{0 1 1} 50 Cyan} {{0 0 1} 50 Blue} {{1 0 1} 50 Purple} {{0 0 0} 0 Black} {{1 1 1} 0 White}} 1} {constant 1.0 3 1 0 0 0 0 0 0 0 0 1.0 3} {{} {}} } #################### ::class::Curve Create 3D_Surface/Curve { {Domain \{-1 1 101\} Function \{t\} \{ let (x,y,z) = (t,t^2,t^3-3*t^5) \}} {always 1 none} {{ list 0 0 0} 0 1 {{{1 0 0} 50 Red} {{1 .5 0} 0 Orange} {{1 1 0} 50 Yellow} {{0 1 0} 50 Green} {{0 1 1} 50 Cyan} {{0 0 1} 50 Blue} {{1 0 1} 50 Purple} {{0 0 0} 0 Black} {{1 1 1} 0 White}} 1} {flat 1.0 4 1 0 0 0 0 0 0 0 0 1.0 4} {{} {}} {::cd::Solid} } #################### ::class::Surface Create 3D_Surface/Surface { {Domain \{\{-1 1 100\} \{-1 1 100\}\} Function \{u v\} \{ let (x,y,z) = (u, v, u^3-3*u*v^2) \} } {always 1 none} {{set z} 0 1 {{{1 0 0} 50 Red} {{1 .5 0} 0 Orange} {{1 1 0} 50 Yellow} {{0 1 0} 50 Green} {{0 1 1} 50 Cyan} {{0 0 1} 50 Blue} {{1 0 1} 50 Purple} {{0 0 0} 0 Black} {{1 1 1} 0 White}} 0} {smooth 1.0 1 1 0 0 0 0 0 0 0 0 1.0 1} {{} {}} {::sd::Patch 0 0 .25} }