Dörte Haftendorn Algebraische Kurven Gleichungsübersicht Teil 2

Algebraische Kurven Gleichungsübersicht Teil 3

Mathematik mit MuPAD 2, Prof. Dr. Dörte Haftendorn 3.12.01 Version vom 7.12.01

Die Gleichungsübersicht ist auch in Html auf der Website und in Word verfügbar.

Wegen der Größe des MuPAD-Notebooks gibt es 3 Teile.

k:=2: kappakurve:=plot::implicit(y^4-x^2*(k^2-y^2),x = -4..4, y = -2..2):

plot(kappakurve,GridLines=Automatic,ViewingBox=[-4..4,-2..2],Ticks=8)

Man könnte noch Scaling=Constrained in die Optionen einfügen, aber dann werden

die Bilder sehr viel kleiner mit viel weißem Rand darum. Das ist ungünstig. So zieht man einfach nach Sicht.

a:=1:r:=1: serpentine:=plot::implicit(y*(a^2+x^2)-2*a*r*x,x = -4..4, y = -2..2):

plot(serpentine,LineWidth=15,

GridLines=Automatic,ViewingBox=[-4..4,-2..2],Ticks=8)

a:=1:r:=1: versiera:=plot::Function2d(2*r^3/(r^2+x^2),x= -4..4):

plot(versiera,LineWidth=15,

GridLines=Automatic,ViewingBox=[-4..4,-0..2],Ticks=8)

f:=1:h:=1:g:=1:; karthesiovale:=plot::implicit((x^2+y^2-f^2)^2-(h-x)*g,

x= -2..2,y=-2..2):

plot(karthesiovale,LineWidth=15,

GridLines=Automatic,ViewingBox=[-2..2,-2..2],Ticks=8)

a:=2:; doppeleilinie:=plot::implicit((x^2+y^2)^3-a^2*x^4,

x= -2..2,y=-2..2):

plot(doppeleilinie,LineWidth=15,

GridLines=Automatic,ViewingBox=[-2..2,-2..2],Ticks=8)