Operation Manual

Hoofdstuk 19: Toepassingen
291
19APPS.DOC 19 Benoît Van Hove Revised: 08/27/97 8:19 PM Printed: 08/27/97 8:39 PM Page 291 of 2019APPS.DOC 19 Benoît Van Hove Revised: 08/27/97 8:19 PM Printed: 08/27/97 8:39 PM Page 291 of 20
Het programma: de Taylor-reeks
Als u dit programma uitvoert, kunt u een functie, de orde en het centrum opgeven. Het
programma berekent dan de Taylor-reeksbenadering voor de functie en tekent de grafiek van de
ingevoerde functie. Dit voorbeeld laat zien hoe een programma vanuit een ander programma als
subroutine wordt aangeroepen.
1
Selecteer
EDIT
uit het
PRGM
-menu. Voer
MOBIUS
bij de
Name=-
prompt
in en voer onderstaand kort
programma voor het opslaan van de Mobius-reeks in, alvorens het programma
TAYLOR
in te voeren.
Het programma
TAYLOR
roept het programma Mobius aan als subroutine.
PROGRAM:MOBIUS
:{1,
L
1,
L
1,0,
L
1,1,
L
1,0,0,1,
L
1,0,
L
1,1,1,0,
L
1,0,
L
1,0}
¶
MSERIES
:Return
2
Selecteer
EDIT
uit het
PRGM
-menu. Voer
TAYLOR
bij de
Name=-prompt
in en daarna dit programma
voor berekening van Taylor-reeksen.
PROGRAM:TAYLOR
:Func:FnOff
:y14=pEval(TPOLY,x
N
center)
:GrStl(14,2)
H
uit het
CHAR GREEK
-menu
:1
E
L
9
¶H
:.1
¶
rr
:ClLCD
Gebruiker voert functie in
:InpSt "FUNCTION: ",EQ
:St
8
Eq(EQ,y13)
Gebruiker voert orde in
:Input "ORDER: ",order
:order+1
¶
dimL TPOLY
:Fill(0,TPOLY)
Gebruiker voert middelpunt in
:Input "CENTER: ",center
:evalF(y13,x,center)
¶
f0
:f0
¶
TPOLY(order+1)
De waarden van de hogere-orde-
afgeleiden die voor dit
programma nodig zijn, worden
numeriek berekend volgens de
methodes beschreven in
“Numerical Differentiation of
Analytic Functies,” J. N. Lyness
and C. B. Moler, SIAM Journal of
Numerical Analysis 4 (1967):
202-210.