>>
>>
>>
>>
>>
>>
>>
>>
>>
>>
>>
>>
with(plots):
f:=x->exp(-x^2)*sin(Pi*x^3):
plot(f(x), x=-2..2);
plot([sin(x), cos(x)], x=-Pi..Pi, color=[blue,red]);
plot(sin(x^2)/x^2, x=-6..6, y=0..1);
plot(sin(x^2)/x^2, x=-6..6, y=0..1, scaling=constrained);
plot([[1,2],[2,3],[3,5],[4,7]], style=point);
plots[polygonplot]([[3,-2],[7,-2],[5,5]],color=red, axes=none);
plot(x/(1-cos(5*x)), x=-5..5, y=-5..5, numpoints=200);
plot([cos(t), sin(t),t=0..2*Pi], scaling=constrained);
polarplot(sin(3*theta), theta=0..2*Pi);
implicitplot(x^3+y^3-5*x*y+1/5=0,x=-3..3,y=-3..3);
QETPICZWCQE\MQE [\Q
" PSEH HVE[
" WIXCHVE[CHIJEYPXW \E\MW!XVYI ]E\MW!XVYI
" J \ !I\T \B WMR TM \B
" [\HVE[ H I\TPMGMX J \ \
" [\HVE[ H GSPSV!FPYI I\TPMGMX WMR \ \ TM TM
GSPSV!VIH I\TPMGMX GSW \ \ TM TM
" [\HVE[ H ]VERKI!? A I\TPMGMX WMR \B \B \
" [\HVE[ H ]VERKI!? A I\TPMGMX WMR \B \B \
YWIVCTVIEQFPI! WIX WM^I VEXMS
" [\HVE[ H TSMRXW ?? A ? A ? A ? AA
" [\HVE[ H TSMRXW ? A ? A
" [\HVE[ H TSP]KSR ?? A ? A ? AA
" [\HVE[ H RXMGOW! ]VERKI!? A I\TPMGMX \ GSW \
\
" [\HVE[ H TEVEQIXVMG GSW X WMR X X TM
YWIVCTVIEQFPI! WIX WM^I VEXMS
" [\HVE[ H RXMGOW! TSPEV WMR XLIXE XLIXE TM
" [\HVE[ H MQTPMGMX \B ]B \ ] ! \ ]
" HVE[ H I\TPMGMX WMR \ \ TM TM XIVQMREP!ITWCGSPSV
JMPICREQI! WMR