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
Download Data Set (.d41) See Note under Data
Sets (below.)
Currently, we know how to transfer the .d41 files to an HP-4C1 with Tony Duell's LIF Utilities for linux. Other users can enter the register listings below by hand. If you determine how DOS users can transfer these files, please let me know. The data should be saved to a magnetic card.
RR000 = -2.047420000E-6 RR001 = +2.060660000E-4 RR002 = -1.233820000E-2 RR003 = +9.924880000E-2 RR004 = +5.605660000E-8 RR005 = -6.633000000E-6 RR006 = +5.402360000E-8 RR007 = -2.885420000E-6 RR008 = +2.715880000E-4 RR009 = -5.928510000E-3 RR010 = +4.311450000E-5 RR011 = +8.042960000E-1 RR012 = -1.140000000E-2 RR013 = -1.734292000E+2 RR014 = +2.496339000E+2 RR015 = +1.433483000E+2 RR016 = -2.184920000E+1 RR017 = -3.309600000E-2 RR018 = +1.425900000E-2 RR019 = -1.700000000E-3 RR020 = +2.765000000E+1 RR021 = +3.405500000E+1 RR022 = +2.000000000E+0 RR023 = +2.183047081E+1 RR024 = +4.545347280E+0 RR025 = +8.931000000E+1
LINE KEYS 01 LBL "STAOU" 02 LBL 10 03 LBL A 04 XEQ 09 05 STO 20 06 STOP 07 LBL 11 08 LBL B 09 XEQ 09 10 STO 21 11 STOP 12 LBL 13 13 LBL D 14 RCL 20 15 ENTER 16 ENTER 17 ENTER 18 100 19 - 20 * 21 4.4 E6- 22 * 23 + 24 STO 22 25 ENTER 26 ENTER 27 ENTER 28 RCL 00 29 * 30 RCL 01 31 + 32 * 33 RCL 02 34 + 35 * 36 RCL 03 37 + 38 * 39 ENTER 40 RCL 04 41 RCL 22 42 * 43 RCL 21 44 RCL 06 45 * 46 + 47 RCL 05 48 + 49 RCL 22 50 * 51 RCL 21 52 RCL 07 53 * 54 + 55 RCL 08 56 + 57 RCL 22 58 * 59 RCL 09 60 + 61 7P<>S 62 RCL 00 63 RCL 21 64 * 65 + 66 RCL 22 67 * 68 RCL 01 69 + 70 RCL 21 71 * 72 + 73 RCL 02 74 + 75 7P<>S 76 STO 23 77 XEQ 09 78 STOP 79 .999975 80 RCL 23 81 * 82 .025 83 - 84 STO 22 85 XEQ 09 86 STOP 87 RCL 22 88 E3 89 / 90 1 91 + 92 XEQ 09 93 STOP 94 LBL 01 95 7P<>S 96 RCL 20 97 273.15 98 + 99 STO 20 100 RCL 03 101 RCL 04 102 RCL 20 103 / 104 100 105 * 106 + 107 RCL 20 108 100 109 / 110 LN 111 RCL 05 112 * 113 + 114 RCL 06 115 RCL 20 116 * 117 100 118 / 119 + 120 RCL 07 121 RCL 08 122 RCL 20 123 * 124 100 125 / 126 + 127 RCL 20 128 100 129 / 130 X^2 131 RCL 09 132 * 133 + 134 RCL 21 135 * 136 + 137 E^X 138 STO 24 139 7P<>S 140 RCL 20 141 273.15 142 - 143 STO 20 144 RCL 24 145 RTN 146 LBL 12 147 LBL C 148 XEQ 09 149 STO 22 150 XEQ 01 151 RCL 22 152 - 153 RCL 25 154 * 155 XEQ 09 156 STOP 157 LBL 14 158 LBL E 159 ENTER 160 RCL 25 161 / 162 STO 22 163 XEQ 01 164 RCL 22 165 - 166 STOP 167 LBL 17 168 LBL c 169 RCL 25 170 / 171 STOP 172 LBL 19 173 LBL e 174 43.5 175 / 176 STOP 177 LBL 15 178 LBL a 179 FS? 00 180 GTO 00 181 SF 00 182 1 183 RTN 184 LBL 00 185 CF 00 186 0 187 RTN 188 LBL 09 189 FS? 00 190 7PRTX 191 RTN 192 STOP 193 END
Go back to the HP-41 software library
Go back to the general software library
Go
back to the main exhibit hall