The Museum of HP Calculators


Equations of State for the HP-41C/CV/CX

This program is Copyright © HP and is used here by permission. It was originally printed in the Chemical Engineering Solution Book. 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 "ID"
 02 0
 03 SF 00
 04 GTO 00
 05 LBL "RK"
 06 1
 07 CF 00
 08 "TC?"
 09 PROMPT
 10 STO 13
 11 "PC?"
 12 PROMPT
 13 STO 14
 14 LBL 00
 15 SF 02
 16 CF 01
 17 FIX 02
 18 "P?"
 19 PROMPT
 20 5
 21 XEQ 00
 22 "V?"
 23 PROMPT
 24 6
 25 XEQ 00
 26 "N?"
 27 PROMPT
 28 7
 29 XEQ 00
 30 "R?"
 31 PROMPT
 32 8
 33 XEQ 00
 34 "T?"
 35 PROMPT
 36 CF 02
 37 9
 38 LBL 00
 39 CF 01
 40 STO 01
 41 RDN
 42 STO IND 01
 43 X#0?
 44 GTO 01
 45 R^
 46 STO 10
 47 1
 48 STO IND 01
 49 LBL 01
 50 FS? 02
 51 RTN
 52 GTO IND 10
 53 LBL 05
 54 "P="
 55 GTO 00
 56 LBL 06
 57 "V="
 58 LBL 00
 59 RCL 07
 60 RCL 08
 61 *
 62 RCL 09
 63 *
 64 RCL 05
 65 RCL 06
 66 *
 67 /
 68 STO IND 10
 69 GTO 00
 70 LBL 07
 71 SF 01
 72 "N="
 73 GTO 01
 74 LBL 08
 75 SF 01
 76 "R="
 77 GTO 01
 78 LBL 09
 79 "T="
 80 SF 01
 81 LBL 01
 82 RCL 05
 83 RCL 06
 84 *
 85 RCL 07
 86 /
 87 RCL 08
 88 /
 89 RCL 09
 90 /
 91 STO IND 10
 92 LBL 00
 93 FS? 00
 94 GTO 10
 95 XEQ 01
 96 GTO 00
 97 LBL 02
 98 FS? 01
 99 XEQ 01
100 LBL 00
101 RCL 00
102 RCL 09
103 *
104 RCL 06
105 RCL 12
106 -
107 STO 04
108 /
109 RCL 11
110 RCL 09
111 SQRT
112 /
113 STO 02
114 RCL 06
115 /
116 LASTX
117 RCL 12
118 +
119 STO 03
120 /
121 -
122 RCL 05
123 -
124 XEQ IND 10
125 /
126 ST- IND 10
127 RCL IND 10
128 /
129 ABS
130 1 E-4
131 X<=Y?
132 GTO 02
133 RCL IND 10
134 GTO 10
135 LBL 06
136 RCL 06
137 ENTER
138 +
139 RCL 12
140 +
141 RCL 02
142 *
143 RCL 03
144 RCL 06
145 *
146 X^2
147 /
148 RCL 00
149 RCL 09
150 *
151 RCL 04
152 X^2
153 /
154 -
155 RTN
156 LBL 09
157 RCL 00
158 RCL 04
159 /
160 RCL 02
161 2
162 /
163 RCL 09
164 /
165 RCL 06
166 /
167 RCL 03
168 /
169 +
170 RTN
171 LBL 07
172 LBL 08
173 RCL 09
174 RCL 06
175 *
176 RCL 04
177 X^2
178 /
179 RCL 06
180 ENTER
181 +
182 RCL 12
183 +
184 RCL 00
185 /
186 RCL 06
187 /
188 RCL 03
189 X^2
190 /
191 RCL 02
192 *
193 -
194 RCL 00
195 *
196 RCL IND 10
197 /
198 RTN
199 LBL 05
200 LASTX
201 +
202 STO 05
203 GTO 10
204 LBL 01
205 RCL 07
206 RCL 08
207 *
208 STO 00
209 .0867
210 RCL 14
211 /
212 X<>Y
213 RCL 13
214 *
215 *
216 STO 12
217 LASTX
218 *
219 RCL 13
220 SQRT
221 *
222 4.934
223 *
224 STO 11
225 RTN
226 LBL 10
227 ARCL X
228 AVIEW
229 STOP
230 END

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