The program is an implementation of the Γ function? from [http://www.rskey.org/detail.asp?manufacturer=Casio&model=FX-602P Viktor T. Toth Calculator Page].
***P0 Min00 1 Min01 5 Min0F LBL1 MR00 x≥F GOTO2 MR00 × MR01 = Min01 1 M+00 GOTO1 LBL2 MR00 × ln - MR00 + (2 × π ÷ MR00 ) √ ln + ((((99 1/x ÷ MR00 x² - 140 1/x ) ÷ MR00 x² + 105 1/x ) ÷ MR00 x² - 30 1/x ) ÷ MR00 x² + 1 ) ÷ 12 ÷ MR00 - MR01 ln = ***P1 AC MAC 1 GSBP0 e^x Min10 π GSBP0 e^x Min11 1 e^x GSBP0 e^x Min12 5 GSBP0 e^x Min13 - 4 x! = Min03 10 GSBP0 e^x Min14 - 9 x! = Min04 50 GSBP0 e^x Min15 - 49 x! = Min05
The test is started with P1 which calculates a few samples and stores the result in memory register. The time to calculate is used in .
{| border="1" cellpadding="5" cellspacing="0" style="font-size:80%" |+ Expected Result
style=background:WhiteSmoke; | Register
style=background:WhiteSmoke; | Real FX-602P
style=background:WhiteSmoke; | Simulator
|- | M03 || 0 || 8.353467E-10 |- | M04 || 0 || 6.69E-09 |- | M05 || -1.39E54 || -3.47696E-50 |- | M10 || 1 || 1 |- | M11 || 2.288037796 || 2.288037807 |- | M12 || 1.567468256 || 1.567468291 |- | M13 || 24 || 24 |- | M14 || 362880 || 362880 |- | M15 || 6.082818626E62 || 6.08281864E62 |}