[Maple OLE 2.0 Object]

Überblick

Hinweise zum Einsatz des Worksheets

Dieses Worksheet ist sicherlich sinnvoller in der Hand des Lehrers (zur Unterrichtsvorbereitung bzw. Lösung oder Korrektur von Klausuren/Klassenarbeiten) einsetzbar. Für den Einsatz im Unterricht wird sich dieses Worksheet eher nicht eignen.
Die Prozeduren sind so aufbereitet, dass sie den Anforderungen an schulische Kurvendiskussionen angepasst sind. Insbesondere wurde versucht, die komplexen Lösungen, die Maple standardmäßig mitliefert, auszublenden.

Inhaltsverzeichnis

-----------------------

>

Definitionslücken

Die Prozedur Definitionsluecken bestimmt die Menge der Definitionslücken der rationalen Funktion f, die Prozedur Definitionsbereich bestimmt den maximalen Definitionsbereich und gibt ihn aus.

> f:=x->1/(x+1)-2/x;

> Definitionsluecken(f);

> Definitionsbereich(f);

f := proc (x) options operator, arrow; 1/(x+1)-2/x ...

{-1, 0}

`D = R \\`, {-1, 0}

zurück zum Anfang

>

Ableitungen

Die Prozedur Ableitungen bestimmt die ersten drei Ableitungen der rationalen Funktion f.

> f:=x->1/(x+1)-2/x;

> Ableitungen(f);

f := proc (x) options operator, arrow; 1/(x+1)-2/x ...

`Funktion:      f(x) ` = 1/(x+1)-2/x

`1. Ableitung:  f'(x) ` = -1/((x+1)^2)+2/(x^2)

`2. Ableitung:  f''(x) ` = 2*1/((x+1)^3)-4/(x^3)

`3. Ableitung:  f'''(x) ` = -6*1/((x+1)^4)+12/(x^4)...

zurück zum Anfang

>

Nullstellen

Die Prozedur Nullstellen bestimmt die Nullstellen der rationalen Funktion f.

> f:=x->1/(x+1)-2/x;

> Nullstellen(f);

> Nullpunkte(f);

f := proc (x) options operator, arrow; 1/(x+1)-2/x ...

{-2}

`Nullstellen der Funktion:`

[-2, 0, m = -1/2]

zurück zum Anfang

>

Horizontalstellen

Die Prozedur Horizontalstellen bestimmt die Stellen der rationalen Funktion f mit Ableitung 0 , die Prozedur Horizontalpunkte entsprechend diejenigen Punkte mit horizontaler Tangente.

> f:=x->1/(x+1)-2/x;
Stellen:=3:

> Horizontalstellen(f);

> Horizontalpunkte(f,Stellen);

f := proc (x) options operator, arrow; 1/(x+1)-2/x ...

{-2-sqrt(2), -2+sqrt(2)}

`Punkte mit horizontaler Tangente:`

[-3.41, .171, m = 0.], [-.59, 5.82, m = 0.]

zurück zum Anfang

>

Extremstellen

Die Prozedur Extremstellen bestimmt die Extremstellen der rationalen Funktion f (Geprüft wird nur eine hinreichende Bedingung über die zweite Ableitung), die Prozedur Extrempunkte gibt die entsprechenden Punkte aus.

> f:=x->1/(x+1)-2/x;
Stellen:=3:

> Extremstellen(f);

> Extrempunkte(f,Stellen);

f := proc (x) options operator, arrow; 1/(x+1)-2/x ...

{-2-sqrt(2), -2+sqrt(2)}

`Extremstellen:`

-3.41, -.59

`Krümmungen an diesen Stellen:`

-.42e-1, 48.5

`Extrempunkte:`

H[1](-3.41,.171,m = 0.)

T[1](-.59,5.82,m = 0.)

zurück zum Anfang

>

Wendestellen

Die Prozedur Wendestellen bestimmt die Wendestellen der rationalen Funktion f, die Prozedur Wendepunkte gibt die entsprechenden Punkte aus..

> f:=x->1/(x+1)-2/x;
Stellen:=3:

> Wendestellen(f);

> Wendepunkte(f,Stellen);

f := proc (x) options operator, arrow; 1/(x+1)-2/x ...

{-2^(2/3)-2^(1/3)-2}

`Wendestellen:`

{-4.85}

`Dritte Ableitung an diesen Stellen:`

-.56e-2

`Wendepunkte:`

W[1](-4.85,.152,m = .176e-1)

zurück zum Anfang

>

Tangente an Schaubild

Die Prozedur Tangente bestimmt die Funktionsvorschrift der Tangente an die rationalen Funktion f an einer Stelle x0.

> f:=x->1/(x+1)-2/x;
x0:=2:

> print(`Tangente an der Stelle x0=2: `);

> print(`y`=Tangente(f,x0)(x));

f := proc (x) options operator, arrow; 1/(x+1)-2/x ...

`Tangente an der Stelle x0=2: `

y = 7/18*x-13/9

zurück zum Anfang

>

Normale in einem Kurvenpunkt

Die Prozedur Normale bestimmt die Funktionsvorschrift der Normalen zu einer rationalen Funktion f an einer Stelle x0.

> f:=x->1/(x+1)-2/x;
x0:=2:

> print(`Normale an der Stelle x0=2: `);

> print( `y`=Normale(f,x0)(x));

f := proc (x) options operator, arrow; 1/(x+1)-2/x ...

`Normale an der Stelle x0=2: `

y = -18/7*x+94/21

zurück zum Anfang

>

Wertetabelle

Die Prozedur Wertetabelle gibt eine Wertetabelle für die rationale Funktion f im Intervall [a,b] mit der Schrittweite s aus..

> f:=x->1/(x+1)-2/x;
a:=-4: # optional: Startwert
b:=5: # optional: Endwert
s:=1: # optional: Schrittweite

> Wertetabelle(f,a,b,s);

f := proc (x) options operator, arrow; 1/(x+1)-2/x ...

Wertetabelle für die Funktion  f: x -> 1/(x+1)-2/x

----------------------------------------------------------------------

   x         f(x)

[ -4.000   / .167     ]

[ -3.000   / .167     ]

[ -2.000   / 0.000    ]

Definitionslücke bei -1.000  

Definitionslücke bei 0.000   

[ 1.000    / -1.500   ]

[ 2.000    / -.667    ]

[ 3.000    / -.417    ]

[ 4.000    / -.300    ]

[ 5.000    / -.233    ]

zurück zum Anfang

>

Näherungslösung einer Gleichung

Die Prozedur Newton bestimmt näherungsweise die Nullstelle einer Funktion g mit einem Startwert s mittels der Newton-Iteration mit n Iterationen.

> f:=x->1/(x+1)-2/x;
g:= unapply( f(x)+1 , x);
Ziffern := 20: # optional: Ziffernanzahl
Startwert:=1; Schritte:=8;

> Newton( g, Startwert, Schritte , Ziffern);

f := proc (x) options operator, arrow; 1/(x+1)-2/x ...

g := proc (x) options operator, arrow; 1/(x+1)-2/x+...

Startwert := 1

Schritte := 8

1. Näherung : 1.2857142857142857143

2. Näherung : 1.4016288650030777972

3. Näherung : 1.4140920532308439923

4. Näherung : 1.4142135510374985901

5. Näherung : 1.4142135623730949502

6. Näherung : 1.4142135623730950488

7. Näherung : 1.4142135623730950488

8. Näherung : 1.4142135623730950488

1.4142135623730950488

zurück zum Anfang

>

Schaubild

Die Prozedur Schaubild zeichnet das Schaubild der rationalen Funktion f im Intervall [a,b] mit dem Wertebereich [ymin,ymax].
Achtung : MapleV zeichnet standardmäßig die Polstellen als senkrechte Geraden in das Schaubild. Wenn dies nicht erwünscht ist, muss man die Option 'discont = true' ergänzen.

> f:=x->1/(x+1)-2/x; # Funktion
a:=-3: b:=2: # optional: Zeichenbereich
Optionen:=thickness=2,color=blue,view=[a..b,-5..10]: # optional

> Schaubild( f, a..b, Optionen );

f := proc (x) options operator, arrow; 1/(x+1)-2/x ...

proc (x) options operator, arrow; 1/(x+1)-2/x end p...

[Maple Plot]

>

zurück zum Anfang

Polstellen

Die Prozedur Polstellen bestimmt die Polstellen der rationalen Funktion f..

> f:=x->1/(x+1)-2/x;

> print(`Polstellen liegen bei folgenden x-Werten vor:`);
print( op(Polstellen(f)) );

f := proc (x) options operator, arrow; 1/(x+1)-2/x ...

`Polstellen liegen bei folgenden x-Werten vor:`

-1, 0

zurück zum Anfang

>

Asymptoten

Die Prozedur Asymptote bestimmt die horizontale bwz schiefe Asymptote der rationalen Funktion f.

> f:=x->1/(x+1)-2/x;

> Asymptote(f);
lprint(`Die schiefe bzw. horizontale Asymptote heisst:`,y=Asymptote(f)(x));

f := proc (x) options operator, arrow; 1/(x+1)-2/x ...

0

`Die schiefe bzw. horizontale Asymptote heisst:`, y = 0

zurück zum Anfang

>

Muster-Kurvendiskussion

Im Folgenden wird eine Beispiel-Kurvendiskussion vorgestellt, die einen Teil der Prozeduren des Pakets kurvdisk verwendet. Die Befehle sind auf rationale Funktionen abgestimmt, eine Übertragbarkeit auf andere Funktionsklassen ist fraglich! Da die Aufgabenstellungen (insbesondere bei Tangenten und Normalen sowie dem Zeichenbereich fuer das Schaubild nicht unabhaengig von der Funktion sein koennen, wurde auf eine Kapselung in eine Prozedur verzichtet und stattdessen die Befehlsaufrufe einzeln aufgeführt.

Definition der Funktion:

> restart:with(kurvdisk):
f := x->1/6*(x+3/x+4);

f := proc (x) options operator, arrow; 1/6*x+1/2/x+...

Bestimmung der Definitionsmenge:

> Definitionsbereich(f);

`D = R \\`, {0}

Ableitungen:

> Ableitungen(f);

`Funktion:      f(x) ` = 1/6*x+1/2/x+2/3

`1. Ableitung:  f'(x) ` = 1/6-1/2*1/(x^2)

`2. Ableitung:  f''(x) ` = 1/(x^3)

`3. Ableitung:  f'''(x) ` = -3*1/(x^4)

Untersuchung auf Polstellen und Asymptoten:

> if Polstellen(f) <> {} then
print(`vertikale Asymptote bei x=`,op(Polstellen(f)))
else
print(`keine Polstellen`) fi;

> if Asymptote(f) <> NULL then
print(`schiefe Asymptote:`,y=Asymptote(f)(x))
else
print(`keine schiefe oder horizontale Asymptote`) fi;

`vertikale Asymptote bei x=`, 0

`schiefe Asymptote:`, y = 1/6*x+2/3

Nullstellen:

> Nullpunkte(f);

`Nullstellen der Funktion:`

[-3, 0, m = 1/9], [-1, 0, m = -1/3]

Extrempunkte:

> Extrempunkte(f);

`Extremstellen:`

-sqrt(3), sqrt(3)

`Krümmungen an diesen Stellen:`

-.192, .192

`Extrempunkte:`

H[1](-sqrt(3),-1/3*sqrt(3)+2/3,m = 0)

T[1](sqrt(3),1/3*sqrt(3)+2/3,m = 0)

Wendepunkte:

> Wendepunkte(f);

`Wendestellen:`

{}

`Dritte Ableitung an diesen Stellen:`

`Wendepunkte:`

Näherungslösung für die Nullstelle von f mittels Newtonscher Iteration:

> Newton(f,1,7);

1. Näherung : 5.

2. Näherung : -5.90909091

3. Näherung : -3.265147591

4. Näherung : -3.009176545

5. Näherung : -3.000013907

6. Näherung : -3.000000001

7. Näherung : -3.000000000

-3.000000000

Wertetabelle:

> Wertetabelle(f,-4,4,1);

Wertetabelle für die Funktion  f: x -> 1/6*x+1/2/x+2/3

----------------------------------------------------------------------

   x         f(x)

[ -4.000   / -.125    ]

[ -3.000   / 0.000    ]

[ -2.000   / .083     ]

[ -1.000   / 0.000    ]

Definitionslücke bei 0.000   

[ 1.000    / 1.333    ]

[ 2.000    / 1.250    ]

[ 3.000    / 1.333    ]

[ 4.000    / 1.458    ]

Tangente an der Stelle x=-2 an das Schaubild von f:

> t:=Tangente(f,1);

t := proc (x) options operator, arrow; -1/3*x+5/3 e...

N ormale an das Schaubild von f an der Stelle x=1:

> n:=Normale(f,1);

n := proc (x) options operator, arrow; 3*x-5/3 end ...

Schaubild von f samt obiger Tangente und Normale: :

> Optionen:=color=[black,red,blue,maroon],
thickness=2,scaling=constrained,labels=["x","y"]:

> Schaubild([f,t,n,Asymptote(f)],-3..3,view=[-3..3,-3..3],Optionen);

[f, t, n, proc (x) options operator, arrow; 1/6*x+2...

[Maple Plot]

zurück zum Anfang

>