Operation Manual

Anhang: Funktionen und Anweisungen 957
In der nebenstehenden als Beispiel aufgeführten
Programm-Editor-Funktion werden zum
teilweisen Einsatz symbolischer Differentiation
getType() und part() verwendet. Eine
eingehende Betrachtung der Funktion und ihre
Vervollständigung kann dabei behilflich sein, das
manuelle Differenzieren zu erlernen. Sie könnten
sogar Funktionen wie Bessel-Funktionen angeben,
die der TI-89 Titanium / Voyage™ 200 nicht
differenzieren kann.
:d(y,x)
:Func
:Local f
:If getType(y)="VAR"
: Return when(y=x,1,0,0)
:If part(y)=0
: Return 0
¦ y=p,ˆ,
i
,numbers
:part(y,0)
! f
:If f="
L" ¦ if negate
: Return
ë d(part(y,1),x)
:If f="
" ¦ if minus
: Return d(part(y,1),x)
ì d(part(y,2),x)
:If f="+"
: Return d(part(y,1),x)
+d(part(y,2),x)
:If f="
ù "
: Return part(y,1)
ù d(part(y,2),x)
+part(y,2)
ù d(part(y,1),x)
:If f="{"
: Return seq(d(part(y,k),x),
k,1,part(y))
:Return undef
:EndFunc
PassErr CATALOG
PassErr
Gibt einen Fehler an die nächste Programmebene
weiter.
Ist “errornum” gleich 0, bleibt
PassErr ohne
Wirkung.
In der Klausel
Else des Programms sollte ClrErr
oder
PassErr benutzt werden. Verwenden Sie
ClrErr, wenn der Fehler verarbeitet oder ignoriert
werden soll. Ist unbekannt, wie der Fehler
behandelt werden soll, übergeben Sie ihn mit
PassErr an die nächste Fehlerbehandlungs-
routine. (Siehe auch
ClrErr).
Siehe
ClrErr Programmliste