The Museum of HP Calculators

Gamma Function for the HP-41C/CV/CX

This program is supplied without representation or warranty of any kind. Tony Duell, Hewlett Packard and The Museum of HP Calculators therefore assume no responsibility and shall have no liability, consequential or otherwise, of any kind arising from the use of this program material or any part thereof.

Documentation Information (CD or source code)
How to get this Program to your Calculator (via HP-IL, disk, wand, and fingers)
Download Binary (.raw) program for disk or PC HP-IL Card download
Download Hexadecimal (.dat) program for Serial Port download

Program Listing

LINE  KEYS
 01 LBL "GAMMA"
 02 FIX 02
 03 "X?"
 04 PROMPT
 05 1
 06 -
 07 "ILLEGAL X"
 08 X<0?
 09 PROMPT
 10 INT
 11 LASTX
 12 X=Y?
 13 GTO 16
 14 1
 15 STO 00
 16 X<>Y
 17 LBL 09
 18 X<=Y?
 19 GTO 00
 20 ST* 00
 21 1
 22 -
 23 GTO 09
 24 LBL 00
 25 ENTER
 26 ENTER
 27 ENTER
 28 .035868343
 29 *
 30 -.193527818
 31 +
 32 *
 33 .482199394
 34 +
 35 *
 36 -.756704078
 37 +
 38 *
 39 .918206857
 40 +
 41 *
 42 -.897056937
 43 +
 44 *
 45 .988205891
 46 +
 47 *
 48 -.577191652
 49 +
 50 *
 51 1
 52 +
 53 RCL 00
 54 *
 55 "GAMMA="
 56 ARCL X
 57 AVIEW
 58 STOP
 59 LBL 16
 60 FACT
 61 "GAMMA="
 62 ARCL X
 63 AVIEW
 64 STOP
 65 END

Go back to the HP-41 software library
Go back to the general software library
Go back to the main exhibit hall