HEADING:300-2545-00 (P20469.01) THICK S&R 25'S 3-5-96 SH STEP 1 GOTO STEP 9 2 GOTO STEP 178 3 GOTO STEP 158 4 PRIN "NO DRIFT TEST ROUTINE -- DO MANUAL DRIFT TEST" 5 GOTO STEP 9 6 GOTO STEP 130 7 GOTO STEP 224 8 IF DUM 807 = 00 THEN LET DUM 807 = 01 9 IF DUM 801 = 00 THEN GOTO STEP 224 10 MOVE POS 300 SPD 0 11 GOSU STEP 108 12 LET DLTA 900 = POS 900 - POS 899 13 DISP DLTA 900 14 MOVE POS 899 SPD 0 16 IF BIT 4 = 01 THEN GOTO STEP 35 17 REM " *** DIELECTRIC SHORT TEST ***" 18 FOR I = 5.01000E+02 TO 5.12000E+02 19 TEST UNK 500 CODE 8 TOL 500 ACC 0 REJ 23 REG 0 20 TEST UNK 500 CODE 1 TOL 500 ACC 0 REJ 23 REG 0 21 PRIN "SHORT REJECT # " I 22 LET REG 3 = 01 23 NEXT I 24 IF REG 3 # 00 THEN GOTO STEP 105 25 LET M = DUM 811 26 FOR I = 01 TO M 27 IF NOM I < - 01 THEN LET I = - NOM I 28 TEST UNK 1 CODE 2 TOL I ACC 30 REJ 0 REG 0 29 TEST UNK 1 CODE 1 TOL I ACC 0 REJ 31 REG 1 30 IF BIT 8 = 01 THEN GOTO STEP 32 31 PRIN "R" I " = " DUM I "%" 32 NEXT I 33 IF DUM 4 < - 2.00000E+00 THEN GOSU STEP 143 34 IF REG 1 # 00 THEN GOTO STEP 103 35 FOR I = 01 TO 1.14000E+02 36 IF NOM I < - 01 THEN LET I = - NOM I 37 IF MASK I = 00 THEN GOTO STEP 88 38 IF MASK I # - 01 THEN GOTO STEP 44 39 IF BIT 4 = 01 THEN GOTO STEP 58 40 REM "** CALCULATE NOMINAL FOR 2-PLUNGE L-TRIM ROUTINE **" 41 LET L = I - 1.00000E+02 42 IF I = 1.50000E+01 THEN LET L = 1.50000E+01 43 LET NOM 300 = NOM L + ( NOM L * DUM L * TURN I / 1.00000E+04 ) 44 LET J = I * 2.00000E+00 45 LET K = J + 1.00000E+00 46 LET L = I + 1.00000E+02 47 IF BIT 4 = 01 THEN GOTO STEP 85 48 MOVE POS J SPD 0 49 LET J = 02 50 IF DUM I > - 4.50000E+01 THEN LET J = 03 51 IF DUM I > - 2.00000E+01 THEN LET J = 04 52 IF DUM I > - 1.00000E+01 THEN LET J = 05 53 IF DUM I > - 5.00000E+00 THEN LET J = 06 54 LET N = 01 55 IF NOM I < 2.00000E+02 THEN LET N = 02 56 IF MASK I # - 01 THEN GOTO STEP 84 57 REM "***BEGIN '2-PLUNGE L-TRIM ROUTINE***" 58 IF I = 1.07000E+02 THEN TEST UNK 6 CODE 16 TOL 6 ACC 0 REJ 0 REG 0 59 IF I = 1.13000E+02 THEN TEST UNK 9 CODE 16 TOL 9 ACC 0 REJ 0 REG 0 60 IF BIT 4 = 01 THEN GOTO STEP 79 61 LET N = I 62 IF I = 1.50000E+01 THEN LET N = 1.15000E+02 63 LET M = 04 64 IF I = 1.13000E+02 THEN LET M = 05 65 IF I = 1.50000E+01 THEN LET M = 05 66 LET L = I - 1.00000E+02 67 IF I = 1.50000E+01 THEN LET L = 1.50000E+01 68 TRIM UNK 300 CODE 104 CUT 215 MODE 215 POS K DENS M BRAN 0 69 TRIM UNK 300 CODE 105 CUT 115 MODE N POS K DENS M BRAN 0 70 LET J = J + 1.00000E+01 71 LET M = 1.04000E+02 72 LET N = N - 1.00000E+02 73 IF I = 1.13000E+02 THEN LET M = 1.05000E+02 74 IF I = 1.50000E+01 THEN LET M = 1.05000E+02 75 TRIM UNK I CODE J CUT N MODE N POS K DENS M BRAN 0 76 IF I = 07 THEN GOTO STEP 79 77 IF I = 1.13000E+02 THEN GOTO STEP 79 78 GOSU STEP 199 79 LET L = I + 1.00000E+02 80 IF I = 1.50000E+01 THEN LET L = 1.15000E+02 81 TEST UNK I CODE 16 TOL L ACC 0 REJ 0 REG 2 82 GOTO STEP 86 83 REM "END" 84 TRIM UNK 1 CODE J CUT I MODE I POS K DENS N BRAN 0 85 TEST UNK 1 CODE 5 TOL L ACC 0 REJ 87 REG 2 86 IF BIT 8 = 01 THEN GOTO STEP 88 87 PRIN "R" I " = " DUM I "%" 88 NEXT I 89 IF REG 2 # 00 THEN GOTO STEP 103 90 PRIN "GOOD PART" 91 REM "*** TRIM LOT #, SUB # AND CIRCUIT # ON GOOD PART ***" 92 MOVE POS 800 SPD 0 93 LET J = 02 94 LET K = 03 95 LET L = 01 96 LET M = 04 97 LET DUM 805 = DUM 799 / 1.00000E+04 98 LET STRG 11 = %4.4 DUM 805 99 LET STRG 10 = %1.0 DUM 807 100 LET STRG 12 = J J STRG 333 + K M STRG 11 + J L STRG 10 101 PRIN "LOT/SERIAL CODE IS: " STRG 12 102 CGEN DENS 3 SCAL 1 POS 801 STRG 12 103 IF REG 1 # 00 THEN PRIN "INITIAL REJECT" 104 IF REG 2 # 00 THEN PRIN "TRIM REJECT" 105 MOVE POS 899 SPD 0 106 HAND 107 EXIT 108 IF DUM 807 = 00 THEN GOTO STEP 115 109 PRIN STRG 3 110 PRIN "PROGRAM STOPPED AT PART # " DUM 807 111 PRIN STRG 3 112 PRIN "ENTER PART # YOU WANT TO START ON >" STRG 1 113 READ TTY:;DUM 808 %1.0 THEN QUIT 114 LET DUM 807 = 00 115 SHOM REG 30 116 SHOM REG 0 117 REM "ALIG THETA" 118 ALIN POS 998 REF 999 REG 998 119 REM "ALIGN X-Y" 120 ALIN POS 0 REF 0 REG 0 121 LET DLTA 998 = POS 997 - POS 999 122 GOTO STEP 125 123 LET J = 9.99000E+02 124 LET DLTA 998 = DLTA 998 + DLTA J 125 GOSU STEP 134 126 IF DUM 807 < DUM 999 THEN GOTO STEP 123 127 LET DUM 807 = 00 128 LET DUM 808 = 00 129 LET DUM 799 = DUM 799 + 01 130 SHOM REG 30 131 SHOM REG 0 132 SHOM REG 32 133 QUIT 134 LET DUM 807 = DUM 807 + 01 135 IF DUM 808 > DUM 807 THEN EXIT 136 SMOV DLTA 998 SPD 0 REG 0 137 SMOV DLTA 0 SPD 0 REG 0 138 LET DLTA 998 = 00 139 PRIN "" 140 PRIN "PART # " DUM 807 141 GOSU STEP 12 142 EXIT 143 LET M = DUM 811 144 FOR N = 01 TO M 145 GOSU STEP 193 146 IF DUM I > DUM 810 THEN IF DUM I < DUM 809 THEN GOTO STEP 149 147 PRIN "DID NOT LOG" 148 EXIT 149 NEXT N 150 PRIN "DATA LOGGING" 151 LET DUM 800 = DUM 800 + 01 152 FOR N = 01 TO M 153 GOSU STEP 193 154 LET DUM J = DUM J + DUM I 155 LET DUM K = DUM K + ( DUM I * DUM I ) 156 NEXT N 157 EXIT 158 GOSU STEP 171 159 LET M = DUM 811 160 FOR N = 01 TO M 161 GOSU STEP 193 162 LET DUM 804 = DUM J / DUM 800 163 LET DUM 805 = ( DUM K - ( DUM J * DUM J / DUM 800 ) ) 164 LET DUM 805 = SQRT ( DUM 805 * DUM 805 ) 165 LET DUM 805 = SQRT ( DUM 805 / ( DUM 800 - 01 ) ) 166 LET DUM 806 = ( 1.00000E+02 + DUM 804 ) * NOM I / 1.00000E+02 167 PRIN "R" I " " %5.3 DUM 804 %8.3 DUM 805 STRG 1 168 PRIN %15.3 DUM 806 %15.3 NOM I 169 NEXT N 170 QUIT 171 PRIN STRG 2 " LOT " STRG 333 STRG 1 172 PRIN " RESISTOR PRETRIM DATA BASED ON" DUM 800 " PARTS" 173 PRIN " DATE: " STRG 340 174 PRIN " AVE DEV STD DEV AVERAGE OHMS" STRG 1 175 PRIN " NOMINAL" 176 PRIN " " 177 EXIT 178 LET M = DUM 811 179 FOR N = 01 TO M 180 GOSU STEP 193 181 LET DUM I = 00 182 LET DUM J = 00 183 LET DUM K = 00 184 NEXT N 185 FOR I = 8.00000E+02 TO 8.08000E+02 186 LET DUM I = 00 187 NEXT I 188 PRIN STRG 3 "READY TO SAVE PROGRAM NOW ?" STRG 1 189 READ TTY:;"_" STRG 1000 %1.0 THEN QUIT 190 IF STRG 1000 # "Y" THEN LET DUM 801 = 01 191 PRIN "DUMMIES ZEROED" STRG 3 192 QUIT 193 IF NOM N < 00 THEN LET N = - NOM N 194 LET I = N 195 LET J = I + 3.00000E+02 196 LET K = I + 6.00000E+02 197 LET L = I + 1.00000E+02 198 EXIT 199 REM "** MULTIPLE BOX TRIM ROUTINE, USE GOSU AFTER L-TRIM **" 200 LET J = I * 02 201 IF I = 1.50000E+01 THEN GOTO STEP 208 202 NIBL DLTA 800 POS J DENS 800 BRAN 0 203 NIBL DLTA 801 POS J DENS 800 BRAN 207 204 NIBL DLTA 802 POS J DENS 800 BRAN 214 205 NIBL DLTA 803 POS K DENS 1 BRAN 0 206 GOTO STEP 203 207 EXIT 208 NIBL DLTA 804 POS J DENS 800 BRAN 0 209 NIBL DLTA 805 POS J DENS 800 BRAN 213 210 NIBL DLTA 806 POS J DENS 800 BRAN 218 211 NIBL DLTA 807 POS K DENS 1 BRAN 0 212 GOTO STEP 209 213 EXIT 214 NIBL DLTA 808 POS J DENS 800 BRAN 221 215 NIBL DLTA 809 POS J DENS 1 BRAN 0 216 GOTO STEP 203 217 EXIT 218 NIBL DLTA 810 POS J DENS 800 BRAN 221 219 NIBL DLTA 811 POS J DENS 1 BRAN 0 220 GOTO STEP 209 221 PRIN STRG 3 "CANNOT DO BOX TRIM !! CHECK POSITIONS!" 222 PRIN STRG 3 "PROGRAM STOPPED ON R" I ", FIX OR GET HELP!" 223 QUIT 224 PRIN STRG 3 "ENTER LOT NUMBER >" STRG 1 225 READ TTY:;"_" STRG 333 %1.0 THEN QUIT 226 PRIN STRG 3 "ENTER TODAY'S DATE >" STRG 1 227 READ TTY:;"_" STRG 340 %1.0 THEN QUIT 228 PRIN  "LOT NUMBER IS: " STRG 333 229 PRIN "TODAY'S DATE IS: " STRG 340 230 PRIN STRG 3 231 LET DUM 801 = 01 232 QUIT MODE 1 TURN 1 CROS 0 INC 0 2 TURN 2 CROS 0 INC 0 3 TURN 3 CROS 0 INC 0 4 TURN 4 CROS 0 INC 0 5 TURN 5 CROS 0 INC 0 6 TURN 0 CROS 6 INC 6 7 TURN 0 CROS 7 INC 7 8 TURN 8 CROS 0 INC 0 9 TURN 0 CROS 9 INC 9 10 TURN 10 CROS 0 INC 0 11 TURN 11 CROS 0 INC 0 12 TURN 12 CROS 0 INC 0 13 TURN 0 CROS 13 INC 13 14 TURN 0 CROS 14 INC 14 15 TURN 0 CROS 15 INC 15 16 TURN 16 CROS 0 INC 0 17 TURN 17 CROS 0 INC 0 18 TURN 18 CROS 0 INC 0 19 TURN 19 CROS 0 INC 0 20 TURN 20 CROS 0 INC 0 21 TURN 21 CROS 0 INC 0 22 TURN 22 CROS 0 INC 0 23 TURN 23 CROS 0 INC 0 24 TURN 24 CROS 0 INC 0 106 TURN 0 CROS 106 INC 106 107 TURN 0 CROS 107 INC 107 109 TURN 0 CROS 115 INC 109 113 TURN 0 CROS 115 INC 113 114 TURN 0 CROS 114 INC 114 115 TURN 0 CROS 115 INC 115 215 TURN 0 CROS 215 INC 0 DENS 1 SPD 1 PWR 1 2 SPD 2 PWR 1 3 SPD 3 PWR 1 4 SPD 4 PWR 1 5 SPD 5 PWR 1 104 SPD 104 PWR 1 105 SPD 105 PWR 1 800 SPD 800 PWR 0 UNK 1 NOM I SCAN I MAT 0 FUNC 0 DUM I 6 NOM 6 SCAN 6 MAT 0 FUNC 0 DUM 6 9 NOM 9 SCAN 9 MAT 0 FUNC 0 DUM 9 15 NOM 15 SCAN 15 MAT 0 FUNC 0 DUM 15 106 NOM 6 SCAN 6 MAT 15 FUNC 0 DUM 106 107 NOM 7 SCAN 7 MAT 6 FUNC 0 DUM 107 109 NOM 9 SCAN 9 MAT 15 FUNC 0 DUM 109 113 NOM 13 SCAN 13 MAT 9 FUNC 0 DUM 113 114 NOM 14 SCAN 14 MAT 15 FUNC 0 DUM 114 300 NOM 300 SCAN L MAT 0 FUNC 0 DUM 300 500 NOM 500 SCAN I MAT 0 FUNC 0 DUM 0 REG 1 00 2 00 3 00 4 00 30 03 32 04 50 00 990 03 991 04 998 -01 999 00 MASK 1 01 2 01 3 01 4 01 5 01 6 00 7 00 8 01 9 00 10 01 11 01 12 01 13 00 14 00 15 -01 16 01 17 01 18 01 19 01 20 01 21 01 22 01 23 01 24 01 106 -01 107 -01 109 -01 113 -01 114 -01 POS 2 12739, 3650 3 12117, 4244 4 10290, -1563 5 10671, -2603 6 -5379, 958 7 -5702, 1570 8 8650, 1200 9 7566, 830 10 6625, 500 11 6936, -893 16 5300, 1110 17 5750, 461 20 3510, 1150 21 2452, 908 22 -1125, 565 23 -921, 1571 24 1895, 1291 25 1765, 630 30 -3136, -850 31 -3647, 369 32 500, 190 33 939, -1156 34 -5695, -250 35 -6142, -59 36 -3553, -1209 37 -4394, -1691 38 -5252, 2435 39 -5777, 2576 40 -10210, 2231 41 -9797, 2561 42 -10925, 2244 43 -10520, 2560 44 -8640, -2242 45 -8263, -1882 46 -7760, -3480 47 -8335, -3290 48 -9960, -4051 49 -10783, -4361 212 7010, -1240 213 5850, -1750 214 7950, 3332 215 7792, 2743 218 1907, -1317 219 613, -1784 226 310, 1100 227 -71, 3340 228 -2780, -1100 229 -2935, -1835 300 -2150, -906 800 10810, 4250 801 9210, 4250 899 1700, 425 900 2373, 643 997 2390, -5515 998 7796, 14689 999 7796, -5628 REF 999 POS 999 NOM 1 4.40000E+01 2 1.00000E+06 3 1.00000E+02 4 1.50000E+02 5 2.10000E+02 6 9.00000E+05 7 1.11110E+05 8 1.12000E+02 9 9.90000E+05 10 1.50000E+02 11 1.20000E+01 12 8.00000E+02 13 1.01010E+04 14 1.00000E+05 15 9.00000E+05 16 1.75000E+02 17 2.50000E+01 18 5.00000E+05 19 1.00000E+03 20 6.50000E+01 21 6.50000E+01 22 2.74000E+03 23 1.30000E+05 24 1.20000E+02 25 -1.06000E+02 106 9.00000E+05 107 1.11110E+05 108 -1.09000E+02 109 9.90000E+05 110 -1.13000E+02 113 1.01010E+04 114 1.00000E+05 300 9.21542E+04 500 2.00000E+00 SCAN 1 15, 14, 0, 0 2 2, 17, 0, 0 3 22, 18, 0, 0 4 13, 13, 0, 0 5 17, 13, 0, 0 6 9, 13, 0, 0 7 9, 12, 0, 0 8 9, 9, 0, 0 9 20, 7, 0, 0 10 11, 7, 0, 0 11 20, 19, 0, 0 12 12, 7, 0, 0 13 19, 20, 0, 0 14 4, 4, 0, 0 15 4, 21, 0, 0 16 5, 20, 0, 0 17 0, 21, 0, 0 18 4, 3, 0, 0 19 22, 11, 0, 0 20 23, 22, 0, 0 21 23, 23, 0, 0 22 3, 0, 0, 0 23 3, 3, 0, 0 24 1, 1, 0, 0 501 13, 15, 0, 0 502 9, 8, 0, 0 503 10, 9, 0, 0 504 18, 9, 0, 0 505 11, 16, 0, 0 506 8, 5, 0, 0 507 5, 6, 0, 0 508 22, 21, 0, 0 509 21, 18, 0, 0 510 3, 2, 0, 0 511 1, 6, 0, 0 512 23, 10, 0, 0 CODE 1 3, 1, 75, 0 2 3, 2, 75, 0 3 3, 3, 75, 0 4 3, 4, 75, 0 5 3, 5, 75, 0 6 3, 6, 75, 0 8 8, 2, 0, 0 10 3, 8, 200, 0 12 3, 2, 125, 0 13 3, 3, 125, 0 14 3, 4, 125, 0 15 3, 5, 125, 0 16 3, 6, 125, 0 104 3, 7, 50, 0 105 3, 7, 150, 0 700 3, 1, 0, 0 TOL 1 -5.00000E+01, 1.50000E+00 2 -5.00000E+01, 4.50000E+00 3 -5.00000E+01, 4.50000E+00 4 -5.50000E+01, 1.50000E+00 5 -5.00000E+01, 1.50000E+00 6 -5.00000E+01, 2.00000E-01 7 -5.00000E+01, 4.00000E-01 8 -5.00000E+01, 1.50000E+00 9 -5.00000E+01, 2.00000E-01 10 -5.00000E+01, 1.50000E+00 11 -5.00000E+01, 1.50000E+00 12 -5.00000E+01, 1.50000E+00 13 -5.00000E+01, 4.00000E-01 14 -5.00000E+01, 2.00000E-01 15 -5.00000E+01, 0.00000E+00 16 -5.00000E+01, 1.50000E+00 17 -5.00000E+01, 4.50000E+00 18 -5.00000E+01, 4.50000E+00 19 -5.00000E+01, 4.50000E+00 20 -5.00000E+01, 7.50000E-01 21 -5.00000E+01, 7.50000E-01 22 -5.00000E+01, 7.50000E-01 23 -5.00000E+01, 7.50000E-01 24 -5.00000E+01, 7.50000E-01 101 -1.00000E+00, 1.00000E+00 102 -4.00000E+00, 4.00000E+00 103 -4.00000E+00, 4.00000E+00 104 -1.00000E+00, 1.00000E+00 105 -1.00000E+00, 1.00000E+00 106 -5.00000E+01, 2.00000E-01 107 -5.00000E+01, 4.00000E-01 108 -1.00000E+00, 1.00000E+00 109 -5.00000E+01, 2.00000E-01 110 -1.00000E+00, 1.00000E+00 111 -1.00000E+00, 1.00000E+00 112 -1.00000E+00, 1.00000E+00 113 -5.00000E+01, 4.00000E-01 114 -5.00000E+01, 2.00000E-01 115 -3.80000E-01, 0.00000E+00 116 -1.00000E+00, 1.00000E+00 117 -4.00000E+00, 4.00000E+00 118 -4.00000E+00, 4.00000E+00 119 -4.00000E+00, 4.00000E+00 120 -5.00000E-01, 5.00000E-01 121 -5.00000E-01, 5.00000E-01 122 -5.00000E-01, 5.00000E-01 123 -5.00000E-01, 5.00000E-01 124 -5.00000E-01, 5.00000E-01 206 -2.00000E-01, 2.00000E-01 207 -2.00000E-01, 2.00000E-01 209 -2.00000E-01, 2.00000E-01 213 -2.00000E-01, 2.00000E-01 214 -2.00000E-01, 2.00000E-01 500 -1.50000E+02, 1.50000E+02 DUM 1 -6.03693E-01 2 -4.86400E-01 3 -5.66406E-01 4 -5.26042E-01 5 -6.32440E-01 6 -3.53778E-01 7 -3.39033E+01 8 -5.68499E-01 9 -2.69899E-01 10 -7.34375E-01 11 -6.18490E-01 12 -6.99219E-01 13 -3.11355E+01 14 -3.01760E+01 15 -2.73778E-01 16 -7.09821E-01 17 -5.54687E-01 18 -5.53600E-01 19 -5.96875E-01 20 -2.10336E-01 21 -1.68269E-01 22 -9.58029E-02 23 -2.46154E-01 24 -2.50651E-01 106 -8.37849E-02 107 -2.43018E-02 109 6.58368E-04 113 -4.20532E-02 114 -9.84884E-02 300 0.00000E+00 301 -7.18822E+02 302 -5.98643E+02 303 -6.61688E+02 304 -8.77375E+02 305 -7.08007E+02 306 -5.31563E+02 307 -7.04920E+02 308 -6.89733E+02 309 -6.40650E+02 310 -7.22251E+02 311 -6.39649E+02 312 -8.80656E+02 313 -6.21187E+02 314 -7.22241E+02 315 -5.23115E+02 316 -6.57286E+02 317 -5.19031E+02 318 -5.50900E+02 319 -7.69851E+02 320 -7.09520E+02 321 -6.51827E+02 322 -6.90730E+02 323 -7.38831E+02 324 -6.98828E+02 601 2.35404E+04 602 1.66220E+04 603 1.99554E+04 604 3.50934E+04 605 2.28127E+04 606 1.31267E+04 607 2.27616E+04 608 2.16881E+04 609 1.89346E+04 610 2.37372E+04 611 1.86600E+04 612 3.55892E+04 613 1.77565E+04 614 2.39835E+04 615 1.28568E+04 616 1.96789E+04 617 1.23131E+04 618 1.40160E+04 619 2.71197E+04 620 2.29704E+04 621 1.93816E+04 622 2.19188E+04 623 2.53584E+04 624 2.22884E+04 799 8.00000E+00 800 2.20000E+01 801 1.00000E+00 802 0.00000E+00 803 0.00000E+00 804 -3.17649E+01 805 2.07163E+00 806 8.18820E+01 807 0.00000E+00 808 0.00000E+00 809 1.30000E+02 810 -8.00000E+01 811 2.40000E+01 812 2.80000E+01 813 2.80000E+01 814 1.60000E+02 998 0.00000E+00 999 3.00000E+00 CUT 1 -5.00000E-01 2 -5.00000E-01 3 -5.00000E-01 4 -4.00000E-01 5 -5.00000E-01 6 -1.00000E-01 7 -1.10000E-01 8 -5.00000E-01 9 -5.00000E-02 10 -5.00000E-01 11 -5.00000E-01 12 -5.00000E-01 13 -8.00000E-02 14 -1.10000E-01 15 -3.00000E-01 16 -5.00000E-01 17 -5.00000E-01 18 -5.00000E-01 19 -5.00000E-01 20 -2.00000E-02 21 -2.00000E-02 22 -1.00000E-01 23 -2.00000E-01 24 -2.00000E-01 115 0.00000E+00 215 1.00000E+00 TURN 1 6.00000E+01 2 8.70000E+01 3 8.50000E+01 4 9.00000E+01 5 9.20000E+01 8 8.50000E+01 10 8.70000E+01 11 2.40000E+01 12 2.50000E+01 15 8.80000E+01 16 9.00000E+01 17 4.50000E+01 18 7.80000E+01 19 3.50000E+01 20 7.00000E+01 21 7.20000E+01 22 7.20000E+01 23 4.00000E+01 24 8.50000E+01 106 8.70000E+01 107 2.60000E+01 109 8.80000E+01 113 9.20000E+01 114 2.60000E+01 CROS 6 -1.00000E+00 7 -1.00000E+00 9 -1.00000E+00 13 -5.00000E-01 14 -1.30000E+00 15 -9.00000E-01 106 -1.50000E+00 107 -1.40000E+00 114 -1.40000E+00 115 -1.20000E+00 215 -1.00000E-01 INC 6 10 7 1 9 15 13 25 14 1 15 15 106 4 107 1 109 4 113 3 114 1 115 3 SPD 1 1.10000E+01, 1.10000E+01 2 8.00000E+00, 8.00000E+00 3 4.00000E+00, 4.00000E+00 4 0.00000E+00, 1.10000E+01 5 1.10000E+01, 0.00000E+00 104 1.10000E+01, 0.00000E+00 105 0.00000E+00, 1.10000E+01 800 3.00000E+02, 3.00000E+02 PWR 1 100, 100 STRG 1 _ 2 300-2545-00 3  10 3 11 .0007 12 1600073 20 0 333 L16 340 19 MARCH 96 1000 Y DLTA 800 0, 8 801 150, 0 802 0, 250 803 0, -250 804 8, 0 805 0, -150 806 200, 0 807 -200, 0 808 0, 150 809 0, -150 810 100, 0 811 -100, 0 900 673, 218 993 0, 1 994 -1, 0 995 0, 1 996 0, 0 997 0, 0 998 0, 0 999 0, 10164 SCAL 1 1.05000E+01