# Test04

## Table of Contents

## Description #

The program is an implementation of the [[wikipedia:Gamma_function|Γ 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 [[Office/FX-602P/Diff#Test_Program_4|speed test 4]].

Register | Simulator | Real FX-602P |
---|---|---|

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 |