01 LBL "CRVFIT"
 02 LBL a
 03 SF 25
 04 CF IND 00
 05 CLRG
 06 LBL 09
 07 RCL 11
 08 1
 09 +
 10 RTN
 11 LBL E
 12 SREG 06
 13 STO L
 14 S+
 15 XEQ 00
 16 S+
 17 R^
 18 ST+ 05
 19 R^
 20 ST+ 04
 21 GTO 09
 22 LBL e
 23 SREG 06
 24 STO L
 25 S-
 26 XEQ 00
 27 S-
 28 R^
 29 ST- 05
 30 R^
 31 ST- 04
 32 GTO 09
 33 LBL 00
 34 RDN
 35 LASTX
 36 LN
 37 X<>Y
 38 LASTX
 39 X<>Y
 40 LN
 41 X<>Y
 42 LASTX
 43 ST* T
 44 LN
 45 X<>Y
 46 ST* Z
 47 LN
 48 SREG 12
 49 RTN
 50 LBL A
 51 SF 25
 52 CF IND 00
 53 0
 54 STO 03
 55 XEQ 01
 56 XEQ 02
 57 XEQ 03
 58 XEQ 04
 59 GTO 12
 60 LBL B
 61 CF IND 00
 62 STO 00
 63 LBL 12
 64 SF IND 00
 65 SF 07
 66 XEQ IND 00
 67 LBL C
 68 RCL 01
 69 RCL 02
 70 RCL 03
 71 RTN
 72 LBL 01
 73 RCL 07
 74 STO 02
 75 RCL 09
 76 RCL 10
 77 RCL 06
 78 RCL 08
 79 XEQ 05
 80 1
 81 GTO 14
 82 LBL 02
 83 RCL 13
 84 STO 02
 85 RCL 09
 86 RCL 05
 87 RCL 12
 88 RCL 08
 89 XEQ 05
 90 2
 91 GTO 14
 92 LBL 03
 93 RCL 07
 94 STO 02
 95 RCL 15
 96 RCL 04
 97 RCL 06
 98 RCL 14
 99 XEQ 05
100 3
101 GTO 14
102 LBL 04
103 RCL 13
104 STO 02
105 RCL 15
106 RCL 16
107 RCL 12
108 RCL 14
109 XEQ 05
110 4
111 LBL 14
112 FS?C 06
113 STO 00
114 RTN
115 LBL 05
116 STO 01
117 X<>Y
118 STO 17
119 *
120 RCL 11
121 /
122 -
123 X<>Y
124 RCL 01
125 X^2
126 RCL 11
127 /
128 -
129 /
130 *
131 LASTX
132 X<> 02
133 RCL 17
134 X^2
135 RCL 11
136 /
137 -
138 /
139 FS?C 07
140 GTO 06
141 RCL 03
142 X<>Y
143 X<=Y?
144 RTN
145 SF 06
146 LBL 06
147 STO 03
148 RCL 17
149 RCL 01
150 RCL 02
151 *
152 -
153 RCL 11
154 /
155 FS? 02
156 E^X
157 FS? 04
158 E^X
159 STO 01
160 RTN
161 LBL D
162 RCL 01
163 RCL 02
164 RCL Z
165 GTO IND 00
166 LBL 03
167 LN
168 LBL 01
169 *
170 +
171 RTN
172 LBL 02
173 *
174 E^X
175 *
176 RTN
177 LBL 04
178 X<>Y
179 Y^X
180 *
181 RTN
182 END