The Museum of HP Calculators


Parallel and Counter Flow Heat Exchangers for the HP-41C/CV/CX

This program is Copyright © HP and is used here by permission. It was originally printed in the HP-67 M.E. Pac 1. 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

Program Listing

LINE  KEYS
 01 LBL "HXPC67"
 02 LBL 15
 03 LBL a
 04 STO 02
 05 RTN
 06 LBL 16
 07 LBL b
 08 *
 09 STO 03
 10 RTN
 11 LBL 17
 12 LBL c
 13 STO 01
 14 RTN
 15 LBL 18
 16 LBL d
 17 *
 18 STO 04
 19 RTN
 20 LBL 19
 21 LBL e
 22 FS? 01
 23 GTO 00
 24 0
 25 SF 01
 26 RTN
 27 LBL 00
 28 1
 29 CF 01
 30 RTN
 31 LBL 10
 32 LBL A
 33 STO 05
 34 XEQ 01
 35 XEQ 00
 36 STO 08
 37 RTN
 38 LBL 11
 39 LBL B
 40 STO 08
 41 XEQ 01
 42 XEQ 02
 43 RCL 07
 44 *
 45 RCL 01
 46 RCL 02
 47 -
 48 *
 49 STO 06
 50 RTN
 51 LBL 12
 52 LBL C
 53 STO 06
 54 RCL 03
 55 /
 56 RCL 02
 57 +
 58 RTN
 59 LBL 13
 60 LBL D
 61 RCL 02
 62 -
 63 RCL 03
 64 *
 65 RCL 04
 66 /
 67 RCL 01
 68 -
 69 CHS
 70 RTN
 71 LBL 14
 72 LBL E
 73 STO 05
 74 XEQ 01
 75 RCL 04
 76 RCL 07
 77 /
 78 RCL 01
 79 RCL 05
 80 -
 81 *
 82 RCL 01
 83 RCL 02
 84 -
 85 /
 86 STO 05
 87 RTN
 88 LBL 00
 89 X#0?
 90 GTO 00
 91 1
 92 RCL 05
 93 -
 94 LN
 95 CHS
 96 RTN
 97 LBL 02
 98 X#0?
 99 GTO 02
100 1
101 RCL 08
102 CHS
103 E^X
104 -
105 RTN
106 LBL 01
107 RCL 03
108 RCL 04
109 X>Y?
110 X<>Y
111 STO 07
112 X<>Y
113 /
114 STO 00
115 RTN
116 STOP
117 STOP
118 STOP
119 STOP
120 STOP
121 STOP
122 STOP
123 STOP
124 LBL 00
125 FS? 01
126 GTO 08
127 RCL 05
128 1/X
129 -
130 1
131 LASTX
132 -
133 /
134 LN
135 1
136 RCL 00
137 -
138 X=0?
139 GTO 07
140 /
141 RCL 07
142 *
143 RTN
144 LBL 07
145 RCL 05
146 1
147 RCL 05
148 -
149 /
150 RCL 07
151 *
152 RTN
153 LBL 08
154 RCL 00
155 1
156 +
157 RCL 05
158 *
159 CHS
160 1
161 +
162 LN
163 CHS
164 1
165 RCL 00
166 +
167 /
168 RCL 07
169 *
170 RTN
171 LBL 02
172 FS? 01
173 GTO 08
174 1
175 -
176 RCL 08
177 RCL 07
178 /
179 *
180 E^X
181 1
182 X<>Y
183 -
184 LASTX
185 RCL 00
186 *
187 1
188 X<>Y
189 -
190 X=0?
191 GTO 09
192 /
193 RTN
194 LBL 09
195 RCL 08
196 RCL 07
197 /
198 ENTER
199 ENTER
200 1
201 +
202 /
203 RTN
204 LBL 08
205 1
206 +
207 RCL 08
208 RCL 07
209 /
210 *
211 CHS
212 E^X
213 CHS
214 1
215 +
216 1
217 RCL 00
218 +
219 /
220 RTN
221 STOP
222 END

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