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