The Museum of HP Calculators

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

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