{VERSION 5 0 "HP RISC UNIX" "5.0" } {USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 0 1 255 0 0 1 0 1 0 0 1 0 0 0 0 1 }{PSTYLE "Normal" -1 0 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "Text Ou tput" -1 2 1 {CSTYLE "" -1 -1 "Courier" 1 10 0 0 255 1 0 0 0 0 0 1 3 0 3 0 }1 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "Warning" 2 7 1 {CSTYLE "" -1 -1 "" 0 1 0 0 255 1 0 0 0 0 0 0 1 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }} {SECT 0 {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 75 "with(plots):\nplot3d (sqrt(1-x^2-y^2), x=-1..1, y=-sqrt(1-x^2)..sqrt(1-x^2));" }}{PARA 7 " " 1 "" {TEXT -1 43 "Warning, the name arrow has been redefined\n" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 79 "plot3d(sqrt(1-x^2-y^2), x=-1 ..1, y=-sqrt(1-x^2)..sqrt(1-x^2),\ngrid=[100, 100]);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 103 "plot3d(\{sqrt(1-x^2-y^2), -sqrt(1-x^2-y^ 2)\},\nx=-1..1, y=-sqrt(1-x^2)..sqrt(1-x^2), scaling=constrained);" }} }{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 118 "plot3d([cos(phi)*cos(theta ), cos(phi)*sin(theta), sin(phi)],\nphi = -Pi..Pi, theta = -Pi/2..Pi/2 , scaling=constrained);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 10 " ?plottools" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 32 "display(octah edron([0,0,0], 1));" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 34 "disp lay(dodecahedron([0,0,0], 1));" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 33 "display(icosahedron([0,0,0], 1));" }}}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 405 "# Tetraeder als Animation\n\n\nh := sqrt(3): phi0 \+ := Pi - arcsin(sqrt(8)/3):\nA := [-1,0,0]: B := [1,0,0]: C := [0, h, 0 ]:\nF0 := polygonplot3d([A,B,C]):\nF1 := reflect(F0,[A,B]):\nF2 := ref lect(F0,[B,C]):\nF3 := reflect(F0,[A,C]):\ndisplay([seq(\ndisplay([F0, rotate(F1, -phi0/30*k, [A,B]),\nrotate(F2, -phi0/30*k, [B,C]),\nrotat e(F3, phi0/30*k, [A,C])]), k=0..30)],\ninsequence=true, axes=none, sca ling=constrained);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "?poly gonplot3d" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "10 0 0" 0 }{VIEWOPTS 1 1 0 3 2 1804 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }