vault backup: 2023-10-27 19:03:01

This commit is contained in:
2023-10-27 19:03:01 +02:00
parent dcc7ce922f
commit f3c5c79da8
331 changed files with 23583 additions and 102 deletions

View 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"$