J E Patterson - jepspectro.com - 20231119
Name | Description | |
---|---|---|
A | Newton-Raphson solve routine - needs one guess in x | |
E | Formula to be Solved, f(x) = 0 | |
1 | loop |
Name | Description | |
---|---|---|
.1 | x1 | |
.2 | f(x1) | |
.3 | h |
Line | Display | Key Sequence | Line | Display | Key Sequence | ||
---|---|---|---|---|---|---|---|
000 | 023 | 43 34 | g RND | ||||
001 | 42,21,11 | f LBL A | 024 | 43,30, 0 | g TEST x≠0 | ||
002 | 44 .1 | STO . 1 | 025 | 22 1 | GTO 1 | ||
003 | 42,21, 1 | f LBL 1 | 026 | 45 .1 | RCL . 1 | ||
004 | 45 .1 | RCL . 1 | 027 | 43 32 | g RTN | ||
005 | 32 15 | GSB E | 028 | 42,21,15 | f LBL E | ||
006 | 44 .2 | STO . 2 | 029 | 36 | ENTER | ||
007 | 45 .1 | RCL . 1 | 030 | 36 | ENTER | ||
008 | 43 20 | g x=0 | 031 | 36 | ENTER | ||
009 | 12 | eˣ | 032 | 6 | 6 | ||
010 | 26 | EEX | 033 | 30 | − | ||
011 | 4 | 4 | 034 | 20 | × | ||
012 | 10 | ÷ | 035 | 8 | 8 | ||
013 | 44 .3 | STO . 3 | 036 | 40 | + | ||
014 | 45,40, .1 | RCL + . 1 | 037 | 20 | × | ||
015 | 32 15 | GSB E | 038 | 4 | 4 | ||
016 | 45,30, .2 | RCL − . 2 | 039 | 20 | × | ||
017 | 45,10, .3 | RCL ÷ . 3 | 040 | 7 | 7 | ||
018 | 45 .2 | RCL . 2 | 041 | 48 | . | ||
019 | 34 | x↔y | 042 | 5 | 5 | ||
020 | 10 | ÷ | 043 | 30 | − | ||
021 | 44,30, .1 | STO − . 1 | 044 | 43 32 | g RTN | ||
022 | 45 .2 | RCL . 2 |