vault backup: 2023-10-27 19:03:01
This commit is contained in:
22
SS23/Mathe/Ilias/Zusatz_Material/komplex_nullstwxm.sec
Normal file
22
SS23/Mathe/Ilias/Zusatz_Material/komplex_nullstwxm.sec
Normal file
@@ -0,0 +1,22 @@
|
||||
/* [wxMaxima batch file version 1] [ DO NOT EDIT BY HAND! ]*/
|
||||
/* [ Created with wxMaxima version 18.02.0 ] */
|
||||
/* [wxMaxima: input start ] */
|
||||
/* Komplexe Nullstellenbeispiel */
|
||||
z:a+b*%i;
|
||||
/*plot3d(abs(z^3-3*z^2+4*z-2),[a,0.25,1.75],[b,-1.25,1.25], */
|
||||
/*plot3d(abs(z^3-7*z^2+17*z-15),[a,1.5,3.2],[b,-1.2,1.2],*/
|
||||
plot3d(abs(z^2+1),[a,-1.0,1.0],[b,-1.5,1.5],
|
||||
/*contour_plot(abs(z^3-3*z^2+4*z-2),[a,0.25,1.75],[b,-1.25,1.25], [gnuplot_preamble, "set cntrparam levels 39"],*/
|
||||
/*contour_plot(abs(z^3-7*z^2+17*z-15),[a,1.5,3.2],[b,-1.2,1.2], [gnuplot_preamble, "set cntrparam levels 39"],*/
|
||||
/*contour_plot(abs(z^2+1),[a,-1.0,1.0],[b,-1.5,1.5], [gnuplot_preamble, "set cntrparam levels 39"],*/
|
||||
/*[zlabel,""],[mesh_lines_color,false], [elevation,0], [azimuth,0], */
|
||||
[grid,100,100], [ztics,false], [color_bar_tics,0.01],
|
||||
[zlabel,"|p(z)|"],[mesh_lines_color,true],[ztics,1],
|
||||
[box,true],[xtics,0.25],[ytics,0.5],
|
||||
[legend,false],[palette,[gradient, "#0000f4", "#0000ff"]],[color,blue]);
|
||||
/* [wxMaxima: input end ] */
|
||||
|
||||
|
||||
|
||||
/* Old versions of Maxima abort on loading files that end in a comment. */
|
||||
"Created with wxMaxima 18.02.0"$
|
||||
Reference in New Issue
Block a user