HP-97 Programs (Updated!)

[plore90]

Instructions for the above programs
1) HP-97 First Order Differential Equation Runge-Kutta III Order Method
LblD => F(x,y) Y'= eexpX - y
x0 => press A
y(x0) => press B
h >=0 => press C Integration step ex. h= 0.5
Press E to start the program calculus
.....
Next Iterations press R/S

2) HP-97 Integral F(x) AB Simpson Method
Integral S from a to b F(x) dx
LblD => F(x)
a => press A
b => press B
c => press C 'n. of intervals n to be even integer 2,4,6.....
Press E to start the program calculus

3) Hp-97 Root F(x) bisecant Method
LblD => F(x)
Xstart => press A 'ex. X0 = -2
DeltaX => press B 'X0+DeltaX
Precision => Press C ' Xtrue = Xapproxim. +- Precision
Press E to start the program calculus
4) HP-97 InvLaplace Transform
This program uses the Gaver-Stehfest algorithm to calculate the Laplace antitransform of an F (s) with poles and zeros. f(t) = Integral from 0 to infinite of F(s)*ds. Ex. (2*s quadratic-4s-7)/(2s-1). The register 5 (R5) contains the variable s of the function F (s) (look the subroutine LBlD of the listing)
The subroutine LblD contain the function F(s).
The t=0 initial value stored to A '(LblA) it cannot be 0 exact but a value close to 0 must be entered, that is 0.1 or 0.01 or 0.001 because the HP-97 stops the calculations for operation ​​divided by 0 with an ERROR flashing on display !!. The upper bound of the integral can be any value of t>0 ex.1,2, 3,4,5,...30.. etc. that is, the length of the time window of time t axis that we desire.
0.1 or 0.01 or 0.001 Press A 't0=0
tfinal Press B ' 1 or 2 or 3 or...10.. press B
Deltat sampling step 0.10 or 0.010 Press C
Press E to start the program calculus
Press R/S to terminate the Iterations