HEADING:307-1272-00 (P20090.R1) RES TRIM S&R 25'S 7-3-97 GF STEP 1 GOTO STEP 9 2 GOTO STEP 209 3 GOTO STEP 233 4 GOSU STEP 143 5 GOTO STEP 9 6 GOTO STEP 132 7 GOTO STEP 270 8 IF DUM 807 = 00 THEN LET DUM 807 = 01 9 IF DUM 801 = 00 THEN GOTO STEP 270 10 IF DUM 807 = 00 THEN GOSU STEP 93 11 GOTO STEP 15 12 GOTO STEP 99 13 REM "> TYPE 12^T TO PRINT INIT & TRIM VALUES FOR LAST STRIP <" 14 REM "> IF REG 333 = 01 PROGRAM SKIPS PART # TRIM,FOR REWORKS <" 15 GOSU STEP 111 16 LET DLTA 900 = POS 900 - POS 899 17 DISP DLTA 900 18 MOVE POS 899 SPD 0 19 TEST UNK 1 CODE 3 TOL 1 ACC 21 REJ 0 REG 0 20 TEST UNK 1 CODE 2 TOL 1 ACC 0 REJ 0 REG 1 21 IF BIT 4 = 01 THEN GOTO STEP 27 22 LET N = DUM 807 + 1.00000E+03 23 LET DUM N = DUM 1 24 LET DUM 101 = DUM 1 25 IF REG 1 # 00 THEN GOTO STEP 75 26 REM " TRIM ROUTINE " 27 LET NOM 101 = NOM 1 28 IF BIT 4 = 01 THEN GOTO STEP 54 29 IF DUM 1 > DUM 56 THEN GOTO STEP 55 30 FOR I = 5.00000E+00 TO 9.00000E+00 31 IF DUM 1 > DUM I THEN LET L = I 32 NEXT I 33 IF DUM 1 > DUM 78 THEN GOTO STEP 37 34 FOR I = 1.00000E+00 TO 5.00000E+00 35 LET M = I + 7.00000E+02 36 GOTO STEP 39 37 FOR I = 1.00000E+00 TO 5.00000E+00 02 38 LET M = I + 7.10000E+02 39 LET K = I * 02 40 LET NOM 101 = DUM M * DUM 1 * NOM 1 / 1.00000E+02 + NOM 1 41 LET NOM 77 = NOM 101 42 TEST UNK 77 CODE 75 TOL 77 ACC 0 REJ 0 REG 0 43 LET NOM 77 = NOM 77 + ( NOM 77 * DUM 77 * TURN L / 1.00000E+04 ) 44 LET J = K - 1.00000E+00 45 MOVE POS J SPD 0 46 TRIM UNK 77 CODE 77 CUT 77 MODE 77 POS K DENS 77 BRAN 0 47 TRIM UNK 77 CODE 78 CUT 78 MODE 78 POS K DENS 77 BRAN 0 48 TRIM UNK 101 CODE 88 CUT 1 MODE 88 POS K DENS 101 BRAN 0 49 IF I < 5.00000E+00 THEN GOSU STEP 84 50 NEXT I 51 TRIM UNK 101 CODE 100 CUT 1 MODE 1 POS 10 DENS 101 BRAN 0 52 TRIM UNK 101 CODE 101 CUT 1 MODE 1 POS 10 DENS 101 BRAN 0 53 GOSU STEP 84 54 TEST UNK 101 CODE 10 TOL 1 ACC 0 REJ 69 REG 2 55 IF DUM 101 > TOL 101 THEN GOTO STEP 71 56 FOR I = 1.10000E+01 TO 1.30000E+01 02 57 LET M = 1.00000E+02 58 IF I = 1.30000E+01 THEN LET M = 1.01000E+02 59 LET J = I + 01 60 MOVE POS I SPD 0 61 IF DUM 101 > CUT M THEN GOTO STEP 67 62 NIBL DLTA 201 POS J DENS 1 BRAN 0 63 TRIM UNK 101 CODE 100 CUT M MODE M POS J DENS 1 BRAN 0 64 TRIM UNK 101 CODE 101 CUT M MODE M POS J DENS 1 BRAN 0 65 TRIM UNK 101 CODE 99 CUT 99 MODE 99 POS I DENS 200 BRAN 0 66 TEST UNK 101 CODE 10 TOL 1 ACC 0 REJ 69 REG 2 67 NEXT I 68 TEST UNK 101 CODE 10 TOL 101 ACC 71 REJ 0 REG 2 69 IF DUM 101 < 1.00000E+03 THEN GOTO STEP 71 70 TEST UNK 101 CODE 2 TOL 101 ACC 0 REJ 0 REG 0 71 IF REG 50 = 01 THEN GOSU STEP 146 72 IF REG 2 = 00 THEN GOTO STEP 77 73 REM "REJECT MARK" 74 PRIN STRG 3 75 MOVE POS 97 SPD 0 76 NIBL DLTA 777 POS 98 DENS 1 BRAN 0 77 MOVE POS 899 SPD 0 78 LET N = DUM 807 + 1.10000E+03 79 LET DUM N = DUM 101 80 IF BIT 0 = 00 THEN GOSU STEP 185 81 IF DUM 807 = DUM 999 THEN GOSU STEP 87 82 HAND 83 EXIT 84 TRIM UNK 101 CODE 99 CUT 99 MODE 99 POS J DENS 201 BRAN 0 85 TRIM UNK 101 CODE 99 CUT 99 MODE 99 POS J DENS 202 BRAN 0 86 EXIT 87 IF REG 333 = 01 THEN EXIT 88 FOR I = 1.00000E+00 TO 2.00000E+00 89 MOVE POS 99 SPD 0 90 CGEN DENS 300 SCAL 300 POS 100 STRG 300 91 NEXT I 92 EXIT 93 FOR I = 1.00100E+03 TO 1.05000E+03 94 LET J = I + 1.00000E+02 95 LET DUM I = 00 96 LET DUM J = 00 97 NEXT I 98 EXIT 99 PRIN "PART INIT DEV TRIM DEV" 100 FOR I = 1.00000E+00 TO 5.00000E+01 101 IF DUM 999 < I THEN QUIT 102 LET J = I + 1.00000E+03 103 LET K = I + 1.10000E+03 104 IF I < 1.00000E+01 THEN PRIN " " STRG 1 105 PRIN I " " DUM J " " DUM K STRG 1 106 IF DUM K > ! TOL 101 THEN PRIN "<< REJ-HI" STRG 1 107 IF DUM K < TOL 101 THEN PRIN "<< REJ-LO" STRG 1 108 PRIN " " 109 NEXT I 110 QUIT 111 IF DUM 807 = 00 THEN GOTO STEP 118 112 PRIN STRG 3 113 PRIN "PROGRAM STOPPED AT PART # " DUM 807 114 PRIN STRG 3 115 PRIN "ENTER PART # YOU WANT TO START ON >" STRG 1 116 READ TTY:;DUM 808 %1.0 THEN QUIT 117 LET DUM 807 = 00 118 MOVE POS 990 SPD 0 119 SHOM REG 30 120 SHOM REG 0 121 PRIN "ALIGN THETA" STRG 3 122 ALIN POS 998 REF 999 REG 998 123 PRIN "ALIGN X-Y" STRG 3 124 ALIN POS 0 REF 0 REG 0 125 LET DLTA 998 = POS 997 - POS 999 126 GOTO STEP 128 127 LET DLTA 998 = DLTA 998 + DLTA 999 128 GOSU STEP 136 129 IF DUM 807 < DUM 999 THEN GOTO STEP 127 130 LET DUM 807 = 00 131 LET DUM 808 = 00 132 SHOM REG 30 133 SHOM REG 31 134 SHOM REG 32 135 QUIT 136 LET DUM 807 = DUM 807 + 01 137 IF DUM 808 > DUM 807 THEN EXIT 138 SMOV DLTA 998 SPD 0 REG 0 139 LET DLTA 998 = 00 140 PRIN "PART # " DUM 807 141 GOSU STEP 16 142 EXIT 143 LET REG 50 = 01 144 PRIN STRG 3 "DRIFT TEST ON" STRG 3 145 EXIT 146 GOSU STEP 175 01 147 LET I = 1.00000E+00 148 TEST UNK 1 CODE 2 TOL I ACC 0 REJ 0 REG 0 149 LET J = I + 3.00000E+02 150 LET NOM J = NOM I + ( DUM I / 1.00000E+02 * NOM I ) 151 TEST UNK 300 CODE 10 TOL I ACC 0 REJ 0 REG 0 152 LET NOM J = NOM J + ( DUM I / 1.00000E+02 * NOM J ) 153 PRIN BIT 11 "R" I " NOM" J "=" NOM J 154 LET M = DUM 811 155 GOSU STEP 174 1.20000E+02 156 GOSU STEP 166 01 157 GOSU STEP 162 02 158 PRIN "COMPLETE" STRG 3 159 LET REG 50 = 00 160 GOSU STEP 175 05 161 EXIT 162 PRIN STRG 3 "HIT PAGE THEN RETURN" STRG 1 163 READ TTY:;%1.0 THEN QUIT 164 PRIN "DRIFT TEST FOR " STRG 2 " LOT #" STRG 333  " " 165 PRIN "DRIFT IS BASED ON 120 SECONDS" 166 LET I = M 167 LET J = I + 3.00000E+02 168 IF VALU 1 = 02 THEN GOTO STEP 172 169 GOSU STEP 175 DUM 805 170 PRIN BIT 11 "TESTING R" I 171 TEST UNK 300 CODE 10 TOL I ACC 173 REJ 173 REG 0 172 PRIN "R" I " CHANGE =" %6.3 DUM I "%" 173 EXIT 174 PRIN "WAITING " VALU 1 " SECOND(S)" STRG 3 175 LET L = VALU 1 * 2.50000E+03 176 FOR K = 01 TO L 177 NEXT K 178 EXIT 179 IF NOM N < 00 THEN LET N = - NOM N 180 LET I = N 181 LET J = I + 3.00000E+02 182 LET K = I + 5.00000E+02 183 LET L = I + 1.00000E+02 184 EXIT 185 FOR N = 1.00000E+00 TO 1.01000E+02 186 GOSU STEP 179 187 IF DUM I > DUM 810 THEN IF DUM I < DUM 809 THEN GOTO STEP 190 188 PRIN "DID NOT LOG" 189 EXIT 190 NEXT N 191 PRIN "DATA LOGGING" 192 LET DUM 800 = DUM 800 + 01 193 FOR N = 1.00000E+00 TO 1.01000E+02 194 GOSU STEP 179 195 LET DUM J = DUM J + DUM I 196 LET DUM K = DUM K + ( DUM I * DUM I ) 197 NEXT N 198 GOSU STEP 201 1.00000E+00 1.80100E+03 1.82400E+03 199 GOSU STEP 201 1.01000E+02 1.82800E+03 1.88300E+03 200 EXIT 201 LET I = VALU 1 202 LET J = VALU 2 203 LET K = VALU 3 204 FOR L = J TO K 205 LET M = L + 01 206 IF DUM I > DUM L THEN IF DUM I < DUM M THEN LET REG L = REG L + 01 207 NEXT L 208 EXIT 209 FOR N = 1.00000E+00 TO 1.01000E+02 210 GOSU STEP 179 211 LET DUM I = 00 212 LET DUM J = 00 213 LET DUM K = 00 214 LET DUM L = 00 215 NEXT N 216 FOR I = 8.00000E+02 TO 8.08000E+02 217 LET DUM I = 00 218 NEXT I 219 GOSU STEP 93 220 GOSU STEP 226 1.80100E+03 1.88300E+03 221 PRIN STRG 3 "ARE YOU SAVING PROGRAM ?" STRG 1 222 READ TTY:;"_" STRG 1000 %1.0 THEN QUIT 223 IF STRG 1000 # "Y" THEN LET DUM 801 = 01 224 PRIN "DUMS ARE ZEROED" STRG 3 225 QUIT 226 LET M = VALU 1 227 LET N = VALU 2 228 FOR I = M TO N 229 LET REG I = 00 230 NEXT I 231 PRIN "DISTRIBUTION DUMS ARE ZEROED" STRG 3 232 EXIT 233 GOSU STEP 253 234 FOR N = 01 TO 1.01000E+02 235 GOSU STEP 179 236 LET DUM 804 = DUM J / DUM 800 237 LET DUM 805 = ( DUM K - ( DUM J * DUM J / DUM 800 ) ) 238 LET DUM 805 = SQRT ( DUM 805 * DUM 805 ) 239 LET DUM 805 = SQRT ( DUM 805 / ( DUM 800 - 01 ) ) 240 LET DUM 806 = ( 1.00000E+02 + DUM 804 ) * NOM I / 1.00000E+02 241 LET DUM 803 = I 242 PRIN "R" %3.0 DUM 803 " " %7.4 DUM 804 " " %7.4 DUM 805 STRG 1 243 PRIN " " %14.4 DUM 806 " " %14.4 NOM I 244 NEXT N 245 GOSU STEP 260 1.00000E+00 1.80100E+03 1.82400E+03 246 GOSU STEP 250 247 GOSU STEP 260 1.01000E+02 1.82800E+03 1.88300E+03 248 PRIN "END OF DATA, " STRG 350 249 QUIT 250 PRIN STRG 3 "HIT PAGE THEN RETURN FOR NEXT PAGE. ." STRG 1 251 READ TTY:;"_" STRG 1000 %1.0 THEN QUIT 252 EXIT 253 PRIN STRG 2 " LOT # " STRG 333 " DATA ON" DUM 800 " PARTS" STRG 1 254 PRIN " DATE: " STRG 350 255 PRIN " " 256 PRIN " AVE % DEV STD % DEV AVERAGE OHMS" STRG 1 257 PRIN " NOMINAL" 258 PRIN " " 259 EXIT 260 PRIN " " 261 PRIN "DISTRIBUTION DATA FOR R" %3.0 VALU 1 " DATE:" STRG 350 262 LET M = VALU 2 263 LET N = VALU 3 264 FOR I = M TO N 265 LET J = I + 01 266 IF I = 1.85600E+03 THEN GOSU STEP 250 267 PRIN "# BETWEEN " %8.3 DUM I " AND " %8.3 DUM J " =" %6.0 REG I 268 NEXT I 269 EXIT 270 PRIN STRG 3 "ENTER LOT NUMBER >" STRG 1 271 READ TTY:;"_" STRG 333 %1.0 THEN QUIT 272 PRIN "LOT NUMBER IS " STRG 333 273 PRIN STRG 3 274 PRIN STRG 3 "ENTER TODAY'S DATE >" STRG 1 275 READ TTY:;"_" STRG 350 %1.0 THEN QUIT 276 PRIN "DATE IS " STRG 350 277 PRIN "POSITIONS SET FOR 16 PHASE, NO 4-16 PHASE ROUTINE." STRG 3 278 LET DUM 801 = 01 279 QUIT MODE 1 TURN 0 CROS 1 INC 1 5 TURN 5 CROS 5 INC 5 6 TURN 6 CROS 6 INC 6 7 TURN 7 CROS 7 INC 7 8 TURN 8 CROS 8 INC 8 9 TURN 9 CROS 9 INC 9 77 TURN 0 CROS 77 INC 0 78 TURN 0 CROS 78 INC 78 88 TURN 0 CROS L INC L 99 TURN 0 CROS 0 INC 0 100 TURN 0 CROS 100 INC 100 101 TURN 0 CROS 101 INC 101 DENS 1 SPD 1 PWR 1 5 SPD 5 PWR 1 77 SPD 77 PWR 1 101 SPD 101 PWR 1 200 SPD 200 PWR 1 201 SPD 201 PWR 1 202 SPD 202 PWR 1 300 SPD 5 PWR 1 UNK 1 NOM 1 SCAN 1 MAT 0 FUNC 0 DUM 1 77 NOM 77 SCAN 1 MAT 0 FUNC 0 DUM 77 101 NOM 101 SCAN 1 MAT 0 FUNC 0 DUM 101 300 NOM J SCAN I MAT 0 FUNC 0 DUM I REG 1 00 2 00 3 00 4 00 5 00 6 00 30 03 31 00 32 04 50 00 333 00 998 -01 999 00 1801 00 1802 00 1803 00 1804 00 1805 00 1806 01 1807 013 1808 0165 1809 0622 1810 01175 1811 01167 1812 0442 1813 0150 1814 013 1815 00 1816 00 1817 00 1818 00 1819 00 1820 010 1821 013 1822 00 1823 00 1824 00 1825 00 1826 00 1827 00 1828 00 1829 00 1830 00 1831 00 1832 00 1833 00 1834 00 1835 00 1836 00 1837 00 1838 00 1839 00 1840 00 1841 01 1842 00 1843 00 1844 02 1845 00 1846 02 1847 02 1848 01 1849 022 1850 076 1851 0250 1852 0465 1853 0642 1854 0645 1855 0452 1856 0347 1857 0202 1858 065 1859 045 1860 023 1861 07 1862 02 1863 02 1864 00 1865 00 1866 00 1867 00 1868 00 1869 00 1870 00 1871 00 1872 00 1873 00 1874 00 1875 00 1876 00 1877 00 1878 00 1879 00 1880 00 1881 03 1882 03 1883 03 POS 1 -520, 1750 2 -260, 1250 3 -520, 1110 4 -260, 510 5 -520, 270 6 -260, -230 7 -520, -370 8 -260, -970 9 -520, -1110 10 -260, -1850 11 -480, 400 12 -260, 400 13 -480, 1880 14 -260, 1880 97 -450, -2276 98 -450, -2532 99 650, -900 100 650, 1400 101 600, 0 102 600, 800 200 -60, -1850 201 -220, -1500 202 -145, -1800 899 -440, -2000 900 -1100, -6999 990 -1252, -2429 997 14836, -3886 998 -15368, 683 999 14381, 683 REF 999 POS 999 NOM 1 9.00000E+06 2 -1.01000E+02 77 8.55675E+06 101 9.00000E+06 301 8.99737E+06 SCAN 1 6, 20, 0, 0 CODE 2 3, 2, 75, 0 3 3, 3, 75, 0 5 3, 5, 75, 0 6 3, 6, 75, 0 7 3, 7, 75, 0 8 3, 7, 75, 0 9 3, 7, 75, 0 10 3, 8, 200, 0 28 2, 0, 0, 0 75 3, 4, 25, 0 77 2, 6, 50, 0 78 2, 6, 30, 0 88 2, 6, 50, 0 99 1, 1, 5, 0 100 3, 7, 25, 0 101 3, 7, 75, 0 TOL 1 -4.50000E+01, 1.00000E-01 77 -1.00000E+02, 1.00000E+02 101 -1.50000E-01, 1.00000E-01 DUM 1 -2.65678E+01 5 -4.50000E+01 6 -2.00000E+01 7 -1.20000E+01 8 -9.00000E+00 9 -4.00000E+00 56 -1.00000E-01 77 -6.15609E+00 78 -1.00000E+01 101 1.84889E-02 201 0.00000E+00 301 -5.56197E+04 401 -5.96288E+01 501 1.42406E+06 601 8.63594E+02 701 7.70000E-01 702 5.80000E-01 703 3.90000E-01 704 2.00000E-01 705 0.00000E+00 711 6.00000E-01 713 3.00000E-01 715 0.00000E+00 777 1.05000E+00 800 2.22300E+03 801 1.00000E+00 802 0.00000E+00 803 1.01000E+02 804 -2.68236E-02 805 6.22845E-01 806 8.99758E+06 807 0.00000E+00 808 0.00000E+00 809 3.00000E+01 810 -7.00000E+01 811 1.00000E+00 812 1.00000E+00 813 5.00000E+00 814 4.90000E+01 820 0.00000E+00 998 5.08000E+02 999 4.90000E+01 1001 -2.92757E+01 1002 -2.80014E+01 1003 -2.62037E+01 1004 -2.69547E+01 1005 -2.58169E+01 1006 -2.57031E+01 1007 -2.49749E+01 1008 -2.47246E+01 1009 -2.46336E+01 1010 -2.48612E+01 1011 -2.63403E+01 1012 -2.48384E+01 1013 -2.57941E+01 1014 -2.51342E+01 1015 -2.68864E+01 1016 -2.72050E+01 1017 -2.83883E+01 1018 -2.78421E+01 1019 -2.80014E+01 1020 -2.83655E+01 1021 -2.83883E+01 1022 -2.83883E+01 1023 -2.95033E+01 1024 -2.76828E+01 1025 -2.65678E+01 1026 -2.77284E+01 1027 -2.78876E+01 1028 -2.59307E+01 1029 -2.81380E+01 1030 -2.68409E+01 1031 -2.57714E+01 1032 -2.70457E+01 1033 -2.67726E+01 1034 -2.59534E+01 1035 -2.42468E+01 1036 -2.60217E+01 1037 -2.53390E+01 1038 -2.12885E+01 1039 -2.38599E+01 1040 -2.24036E+01 1041 -2.24946E+01 1042 -2.00825E+01 1043 -2.16754E+01 1044 -2.28587E+01 1045 -2.27221E+01 1046 -2.32228E+01 1047 -2.21760E+01 1048 -2.50887E+01 1049 -2.65678E+01 1050 0.00000E+00 1101 2.91556E-02 1102 -1.49333E-02 1103 -3.12889E-02 1104 -1.42222E-03 1105 -4.62222E-02 1106 3.05778E-02 1107 -3.41333E-02 1108 -4.33778E-02 1109 2.13333E-03 1110 -3.76889E-02 1111 7.11111E-03 1112 -8.53333E-03 1113 -3.41333E-02 1114 -9.24444E-03 1115 -1.28000E-02 1116 4.26667E-03 1117 2.20444E-02 1118 -1.42222E-03 1119 -7.82222E-03 1120 -1.70667E-02 1121 3.12889E-02 1122 8.53333E-03 1123 1.28000E-02 1124 -2.20444E-02 1125 -2.56000E-02 1126 1.13778E-02 1127 2.63111E-02 1128 -3.20000E-02 1129 -2.27556E-02 1130 -2.48889E-02 1131 -1.56444E-02 1132 -1.70667E-02 1133 7.82222E-03 1134 -7.11111E-03 1135 2.84444E-03 1136 -3.69778E-02 1137 -2.63111E-02 1138 7.82222E-03 1139 -4.62222E-02 1140 -2.84444E-02 1141 -3.27111E-02 1142 -2.77333E-02 1143 -3.91111E-02 1144 -5.04889E-02 1145 -9.24444E-03 1146 3.55555E-03 1147 -1.84889E-02 1148 -1.92000E-02 1149 1.84889E-02 1150 0.00000E+00 1801 -5.00000E+01 1802 -4.75000E+01 1803 -4.50000E+01 1804 -4.25000E+01 1805 -4.00000E+01 1806 -3.75000E+01 1807 -3.50000E+01 1808 -3.25000E+01 1809 -3.00000E+01 1810 -2.75000E+01 1811 -2.50000E+01 1812 -2.25000E+01 1813 -2.00000E+01 1814 -1.75000E+01 1815 -1.50000E+01 1816 -1.25000E+01 1817 -1.00000E+01 1818 -7.50000E+00 1819 -5.00000E+00 1820 -2.50000E+00 1821 0.00000E+00 1822 2.50000E+00 1823 5.00000E+00 1824 7.50000E+00 1825 1.00000E+01 1828 -1.00000E+00 1829 -7.00000E-01 1830 -4.00000E-01 1831 -2.50000E-01 1832 -2.40000E-01 1833 -2.30000E-01 1834 -2.20000E-01 1835 -2.10000E-01 1836 -2.00000E-01 1837 -1.90000E-01 1838 -1.80000E-01 1839 -1.70000E-01 1840 -1.60000E-01 1841 -1.50000E-01 1842 -1.40000E-01 1843 -1.30000E-01 1844 -1.20000E-01 1845 -1.10000E-01 1846 -1.00000E-01 1847 -9.00002E-02 1848 -8.00002E-02 1849 -7.00002E-02 1850 -6.00002E-02 1851 -5.00002E-02 1852 -4.00002E-02 1853 -3.00002E-02 1854 -2.00002E-02 1855 -1.00002E-02 1856 0.00000E+00 1857 1.00000E-02 1858 2.00000E-02 1859 3.00000E-02 1860 4.00000E-02 1861 5.00000E-02 1862 6.00000E-02 1863 7.00000E-02 1864 8.00000E-02 1865 9.00000E-02 1866 1.00000E-01 1867 1.10000E-01 1868 1.20000E-01 1869 1.30000E-01 1870 1.40000E-01 1871 1.50000E-01 1872 1.60000E-01 1873 1.70000E-01 1874 1.80000E-01 1875 1.90000E-01 1876 2.00000E-01 1877 2.10000E-01 1878 2.20000E-01 1879 2.30000E-01 1880 2.40000E-01 1881 2.50000E-01 1882 4.00000E-01 1883 6.00000E-01 1884 1.00000E+00 CUT 1 -1.40000E-01 5 0.00000E+00 6 0.00000E+00 7 0.00000E+00 8 -2.50000E-01 9 -2.50000E-01 77 2.00000E+00 78 -1.00000E-01 99 5.00000E+01 100 -3.00000E-01 101 -1.20000E-01 TURN 5 8.00000E+01 6 7.50000E+01 7 7.00000E+01 8 6.00000E+01 9 5.50000E+01 CROS 1 -3.30000E+00 5 -4.00000E-01 6 -4.00000E-01 7 -4.00000E-01 8 -2.00000E+00 9 -2.00000E+00 77 -3.00000E-01 78 -7.50000E-01 100 -1.20000E+00 101 -3.15000E+00 INC 1 10 5 0 6 0 7 0 8 30 9 30 78 30 100 8 101 5 SPD 1 8.00000E+00, 8.00000E+00 5 5.00000E+00, 5.00000E+00 77 1.00000E+01, 0.00000E+00 101 0.00000E+00, 1.00000E+01 200 2.00000E+01, 0.00000E+00 201 0.00000E+00, 8.00000E+00 202 3.00000E+01, 0.00000E+00 PWR 1 100, 100 STRG 1 _ 2 307-1272-00 3  300 1272 333 M53E 350 2/7/06 444 COARSE & FINE 1000 DLTA 201 100, 0 777 0, -240 900 -660, -4999 997 550, -2166 998 0, 0 999 -620, 0 SCAL 300 1.60000E+01