This program is Copyright © HP and is used here by permission. It was originally printed in the HP-67 Earth Sciences Solution Book. This program was ported to the HP-41C by reading with the HP-41C card reader and the card reader may be required for operation of this program. This program was entered and uploaded by Tony Duell.
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
LINE KEYS 01 LBL "SEAWTR" 02 LBL 15 03 LBL a 04 7CLREG 05 7P<>S 06 7CLREG 07 5.5286 E3- 08 STO 00 09 3.4025 E7- 10 STO 01 11 1.8364 E5- 12 STO 02 13 3.3058- E9- 14 STO 03 15 0.0137- 16 STO 04 17 .05199- 18 STO 05 19 7.225- E5- 20 STO 06 21 7.58- E4- 22 STO 07 23 75.64 24 STO 08 25 .144- 26 STO 09 27 .0221 28 STO 25 29 0 30 STOP 31 LBL 16 32 LBL b 33 FS? 00 34 GTO 00 35 SF 00 36 1 37 RTN 38 LBL 00 39 CF 00 40 0 41 RTN 42 STOP 43 LBL 10 44 LBL A 45 7FIX 46 FS? 00 47 7PRTX 48 STO 20 49 STOP 50 LBL 11 51 LBL B 52 7FIX 53 FS? 00 54 7PRTX 55 STO 21 56 STOP 57 LBL 12 58 LBL C 59 7FIX 60 FS? 00 61 7PRTX 62 STO 22 63 STOP 64 LBL 13 65 LBL D 66 7FIX 67 FS? 00 68 7PRTX 69 STO 23 70 STOP 71 LBL 14 72 LBL E 73 RCL 21 74 ENTER 75 X^2 76 RCL 06 77 * 78 X<>Y 79 RCL 05 80 * 81 + 82 RCL 04 83 + 84 RCL 07 85 RCL 23 86 * 87 + 88 7FIX 89 FS? 00 90 7PRTX 91 STOP 92 LBL 17 93 LBL c 94 RCL 20 95 ENTER 96 ENTER 97 3 98 Y^X 99 RCL 03 100 * 101 X<>Y 102 RCL 02 103 * 104 + 105 RCL 01 106 RCL 22 107 * 108 + 109 RCL 00 110 + 111 7SCI 112 FS? 00 113 7PRTX 114 STOP 115 LBL 19 116 LBL e 117 RCL 08 118 RCL 09 119 RCL 20 120 * 121 + 122 RCL 25 123 RCL 21 124 * 125 + 126 E3 127 / 128 7SCI 129 FS? 00 130 7PRTX 131 STOP 132 END
Go back to the HP-41 software library
Go back to the general software library
Go
back to the main exhibit hall