Integrování Simpsonovou metodou s přesností danou zobrazením pro TI-58/59

Program ze základního SW modulu pro výpočet integrálu Simpsonovou metodou je doplněn o stanovení počtu iterací zvolenou přesností zobrazení funkce Fix. Program je opět jednorázově prováděnou sekvenci instrukcí a lze ho umístit na libovolné místo programové paměti.

ADDR CODE LEVEL COMMENT
191 76 95 Lbl = dolní mez je na displeji
193 36 09 11 Pgm 09 A nastavení dolní meze
196 91 R/S čekání na horní mez
197 36 09 12 Pgm 09 B nastavení horní meze
200 53 ( • • zamezení uzavření započaté aritmetické operace
201 02 2 • • dvojka...
202 45 yx • • ...umocněná na...
203 53 ( • • •  
204 71 58 SBR Fix • • • ...počet desetinných míst...
206 85 + • • • ...zvětšených...
207 01 1 • • • ...o jedničku...
208 54 ) • • ...dá počet iterací
209 54 )  
210 36 09 13 Pgm 09 C nastavení počtu iterací
213 36 09 14 Pgm 09 D spuštění výpočtu
216 92 RTN (stisk INV SBR)

Před obvyklou částí "Použití programu" je ještě třeba vložit do paměti zkoumanou funkci. Pro jednoduchost postačí sinus.

ADDR CODE COMMENT
000 76 16 Lbl A' povinné návěští funkce pro Pgm 09
002 38 sin jenom sinus...
003 92 RTN ...a nic jiného

Konečně použití programu:
Stisk kláves Činnost Display
Fix 4 nastavení požadované přesnosti zobrazení na 4 místa 0.0000
Rad výpočet v radiánech 0.0000
0 dolní mez 0
SBR = spuštění programu 0.0000
π horní mez 3.1416
R/S pokračování běhu programu končící zobrazením výsledku 2.0000
INV Fix zobrazení výsledku bez omezení 2.000001033