Post Reply 
(71B) Euler-Taylor method for the HP-71B
12-14-2019, 03:33 AM
Post: #9
RE: (71B) Euler-Taylor method for the HP-71B
Adapting my original HP-71B to Albert Chan's approximaton of the second derivative, we get:

Code:
10 REM EULER METHOD WITH 2 DERIVATIVES
20 DEF FNE(X)=EXP(0.5*x^2)
30 DEF FNX(X,Y) = X*Y
40 READ A,B,Y,H
50 DATA 0,1,1,0.01
60 N=INT((B-A)/H+.5)
70 X=A
80 DISP "WAIT PLEASE..." @ WAIT .1
90 FOR I=1 TO N
100 D1=FNX(X,Y)
110 X = X+H @ Y= Y + H*D1
120 Y = Y + H/2*(FNX(X,Y)-D1)
130 NEXT I
140 DISP "Y=";Y @ PAUSE
150 Y0 = FNE(B)
160 DISP "Y EXACT=";Y0 @ PAUSE
170 DISP "%ERR=";100*(Y-Y0)/Y0
180 END
Find all posts by this user
Quote this message in a reply
Post Reply 


Messages In This Thread
RE: (71B) Euler-Taylor method for the HP-71B - Namir - 12-14-2019 03:33 AM



User(s) browsing this thread: 1 Guest(s)