HEADING:307-1328-00 (P20100.FT) "FINAL TEST" S&R 25'S 02FEB99 BOB STEP 1 GOTO STEP 9 2 GOTO STEP 127 3 GOTO STEP 151 4 PRIN STRG 3 "NO DRIFT TEST" 5 QUIT 6 GOTO STEP 229 7 GOTO STEP 261 8 IF DUM 807 = 00 THEN LET DUM 807 = 01 9 IF DUM 801 = 00 THEN GOTO STEP 261 10 GOTO STEP 13 11 REM "====" 12 GOTO STEP 61 13 IF DUM 807 = 00 THEN GOSU STEP 126 14 GOSU STEP 193 3.00000E+00 4.90000E+01 5.31000E+03 6.20000E+02 15 LET DLTA 900 = POS 900 - POS 899 16 DISP DLTA 900 17 MOVE POS 899 SPD 0 18 LET N = DUM 807 + 1.00000E+03 19 IF DUM 444 = 01 THEN TEST UNK 101 CODE 10 TOL 101 ACC 0 REJ 0 REG 0 20 LET DUM 444 = 00 21 TEST UNK 101 CODE 10 TOL 101 ACC 0 REJ 0 REG 2 22 LET DUM N = DUM 101 23 LET DUM 1 = DUM 101 24 LET REG 12 = REG 2 25 SMOV DLTA 1000 SPD 0 REG 0 26 GOSU STEP 245 1.00000E+00 27 LET N = DUM 807 + 1.50000E+03 28 LET DUM N = DUM 701 29 LET REG 13 = REG 3 30 REM " MOVE S&R TABLE BACK TO RES " 31 SMOV DLTA 1001 SPD 0 REG 0 32 DISP DLTA 900 33 IF REG 13 = 00 THEN GOTO STEP 40 34 PRIN STRG 3 ">> CAP REJECT <<" 35 FOR I = 01 TO 02 36 MOVE POS 800 SPD 0 37 CGEN DENS 333 SCAL 335 POS 801 "C" 38 NEXT I 39 GOTO STEP 49 40 IF REG 12 = 00 THEN GOTO STEP 43 41 PRIN STRG 3 "> RESISTOR REJECT <" 42 GOTO STEP 49 43 FOR I = 01 TO 02 44 MOVE POS 96 SPD 0 45 CGEN DENS 333 SCAL 333 POS 97 STRG 300 46 MOVE POS 98 SPD 0 47 CGEN DENS 333 SCAL 333 POS 99 STRG 333 48 NEXT I 49 MOVE POS 899 SPD 0 50 REM "** GOSUB DATALOG ROUTINE **" 51 GOSU STEP 104 52 HAND 53 EXIT 54 FOR I = 1.00000E+00 TO 1.47000E+02 55 LET J = I + 1.00000E+03 56 LET K = I + 1.50000E+03 57 LET DUM J = 00 58 LET DUM K = 00 59 NEXT I 60 EXIT 61 FOR I = 01 TO 02 62 PRIN "PART R1 DEV C1 DEV " STRG 1 63 NEXT I 64 PRIN "PART R1 DEV C1 DEV" 65 FOR I = 7.95000E+02 TO 7.98000E+02 66 LET DUM I = 00 67 NEXT I 68 FOR N = 1.00000E+00 TO 4.90000E+01 69 FOR M = 00 TO 9.80000E+01 4.90000E+01 70 LET I = M + N 71 GOSU STEP 81 1.01000E+02 1.00000E+03 72 GOSU STEP 84 7.01000E+02 1.50000E+03 73 NEXT M 74 PRIN " " 75 NEXT N 76 PRIN STRG 3 "TOTAL LOW RESISTORS = " DUM 795 77 PRIN "TOTAL HIGH RESISTORS = " DUM 796 78 PRIN "TOTAL LOW CAPS = " DUM 797 79 PRIN "TOTAL HIGH CAPS = " DUM 798 80 QUIT 81 IF I < 1.00000E+02 THEN PRIN " " STRG 1 82 IF I < 1.00000E+01 THEN PRIN " " STRG 1 83 PRIN I " " STRG 1 84 LET J = VALU 1 85 LET K = I + VALU 2 86 IF J = 1.01000E+02 THEN PRIN %5.3 DUM K STRG 1 87 IF J # 1.01000E+02 THEN PRIN %4.2 DUM K STRG 1 88 IF DUM K > TOL J THEN GOTO STEP 92 89 IF J = 1.01000E+02 THEN LET DUM 795 = DUM 795 + 1.00000E+00 90 IF J = 7.01000E+02 THEN LET DUM 797 = DUM 797 + 1.00000E+00 91 GOTO STEP 95 92 IF DUM K < ! TOL J THEN GOTO STEP 97 93 IF J = 1.01000E+02 THEN LET DUM 796 = DUM 796 + 1.00000E+00 94 IF J = 7.01000E+02 THEN LET DUM 798 = DUM 798 + 1.00000E+00 95 PRIN "* " STRG 1 96 EXIT 97 PRIN " " STRG 1 98 EXIT 99 LET I = N 100 LET J = I + 3.00000E+01 101 LET K = I + 6.00000E+01 102 LET L = I + 1.00000E+02 103 EXIT 104 FOR N = 1.01000E+02 TO 7.01000E+02 6.00000E+02 105 GOSU STEP 99 106 IF DUM I > DUM 810 THEN IF DUM I < DUM 809 THEN GOTO STEP 109 107 PRIN "DID NOT LOG" 108 EXIT 109 NEXT N 110 LET DUM 800 = DUM 800 + 01 111 FOR N = 1.01000E+02 TO 7.01000E+02 6.00000E+02 112 GOSU STEP 99 113 LET DUM J = DUM J + DUM I 114 LET DUM K = DUM K + ( DUM I * DUM I ) 115 NEXT N 116 GOSU STEP 119 1.01000E+02 1.85100E+03 1.87400E+03 117 GOSU STEP 119 7.01000E+02 1.90300E+03 1.93100E+03 118 EXIT 119 LET I = VALU 1 120 LET J = VALU 2 121 LET K = VALU 3 122 FOR L = J TO K 123 LET M = L + 01 124 IF DUM I > DUM L THEN IF DUM I < DUM M THEN LET REG L = REG L + 01 125 NEXT L 126 EXIT 127 FOR N = 1.01000E+02 TO 7.01000E+02 6.00000E+02 128 GOSU STEP 99 129 LET DUM I = 00 130 LET DUM J = 00 131 LET DUM K = 00 132 NEXT N 133 FOR I = 7.95000E+02 TO 8.08000E+02 134 LET DUM I = 00 135 NEXT I 136 GOSU STEP 54 137 GOSU STEP 144 1.85100E+03 1.87400E+03 138 GOSU STEP 144 1.90300E+03 1.93100E+03 139 PRIN STRG 3 "ARE YOU SAVING PROGRAM ?" STRG 1 140 READ TTY:;"_" STRG 1000 %1.0 THEN QUIT 141 IF STRG 1000 # "Y" THEN LET DUM 801 = 01 142 PRIN "DUMS ARE ZEROED" STRG 3 143 QUIT 144 LET M = VALU 1 145 LET N = VALU 2 146 FOR I = M TO N 147 LET REG I = 00 148 NEXT I 149 PRIN "DISTRIBUTION DUMS ARE ZEROED" STRG 3 150 EXIT 151 GOSU STEP 168 152 FOR N = 1.01000E+02 TO 7.01000E+02 6.00000E+02 153 GOSU STEP 99 154 LET DUM 804 = DUM J / DUM 800 155 LET DUM 805 = ( DUM K - ( DUM J * DUM J / DUM 800 ) ) 156 LET DUM 805 = SQRT ( DUM 805 * DUM 805 ) 157 IF DUM 800 = 00 THEN LET DUM 805 = 00 158 LET DUM 805 = SQRT ( DUM 805 / ( DUM 800 - 01 ) ) 159 LET DUM 806 = ( 1.00000E+02 + DUM 804 ) * NOM I / 1.00000E+02 160 LET DUM 803 = I 161 PRIN "R" %3.0 DUM 803 " " %7.4 DUM 804 " " %7.4 DUM 805 STRG 1 162 PRIN " " %14.4 DUM 806 " " %14.4 NOM I 163 NEXT N 164 PRIN " " 165 GOSU STEP 175 1.01000E+02 1.85100E+03 1.87400E+03 166 GOSU STEP 175 7.01000E+02 1.90300E+03 1.93000E+03 167 QUIT 168 PRIN STRG 2 " LOT # " STRG 333 " FINAL TEST DATA ON " STRG 1 169 PRIN DUM 800 "PARTS. " STRG 350 170 PRIN " " 171 PRIN " AVE DEV STD DEV AVERAGE VALUE" STRG 1 172 PRIN " NOMINAL" 173 PRIN " " 174 EXIT 175 PRIN "DISTRIBUTION DATA FOR TEST#" %3.0 VALU 1 " DATE:" STRG 350 176 LET K = VALU 1 177 LET M = VALU 2 178 LET N = VALU 3 179 FOR I = M TO N 180 LET J = I + 01 181 IF K = 7.01000E+02 THEN GOTO STEP 187 182 LET DUM 805 = NOM K + ( NOM K * DUM I / 1.00000E+02 ) 183 LET DUM 806 = NOM K + ( NOM K * DUM J / 1.00000E+02 ) 184 PRIN "# BETWEEN " %6.3 DUM I "% & " %6.3 DUM J STRG 1 185 PRIN "% (" %8.0 DUM 805 "&" %8.0 DUM 806 "OHMS ) =" %6.0 REG I 186 GOTO STEP 191 187 LET DUM 805 = NOM K + DUM I 188 LET DUM 806 = NOM K + DUM J 189 PRIN "# BETWEEN " %5.2 DUM I "PF & " %5.2 DUM J STRG 1 190 PRIN "PF (" %7.2 DUM 805 "&" %7.2 DUM 806 "PF ) =" %6.0 REG I 191 NEXT I 192 EXIT 193 IF DUM 807 = 00 THEN GOTO STEP 200 194 PRIN STRG 3 195 PRIN "PROGRAM STOPPED AT CIRCUIT # " DUM 807 196 PRIN STRG 3 197 PRIN "WHICH CIRCUIT # DO YOU WANT TO START ON ? " STRG 1 198 READ TTY:;DUM 808 %1.0 THEN QUIT 199 LET DUM 807 = 00 200 MOVE POS 990 SPD 0 201 LET DUM 444 = 01 202 SHOM REG 990 203 SHOM REG 0 204 LET DLTA 999 = DLTA 995 * VALU 4 205 LET DLTA 1000 = DLTA 999 206 LET DLTA 1001 = - DLTA 1000 207 PRIN "ALIGN PART THETA" 208 ALIN POS 998 REF 999 REG 998 209 PRIN "ALIGN X-Y" 210 ALIN POS 0 REF 0 REG 0 211 GOSU STEP 245 00 212 IF REG 3 # 00 THEN PRIN STRG 3 "CAP METER NOT ZEROED! !" 213 IF REG 3 # 00 THEN QUIT 214 LET DLTA 998 = POS 997 - POS 999 215 GOTO STEP 225 216 LET J = VALU 2 217 LET K = VALU 1 * VALU 2 218 FOR M = J TO K J 219 IF DUM 807 = M THEN GOTO STEP 223 220 NEXT M 221 LET DLTA 998 = DLTA 998 + DLTA 999 222 GOTO STEP 225 223 LET DLTA 998 = DLTA 998 + ( VALU 3 * DLTA 994 ) 224 LET DLTA 999 = - DLTA 999 225 GOSU STEP 233 226 IF DUM 807 < ( VALU 1 * VALU 2 ) THEN GOTO STEP 216 227 LET DUM 807 = 00 228 LET DUM 808 = 00 229 SHOM REG 990 230 SHOM REG 0 231 SHOM REG 991 232 QUIT 233 LET DUM 807 = DUM 807 + 01 234 IF DUM 808 > DUM 807 THEN EXIT 235 SMOV DLTA 998 SPD 0 REG 0 236 LET DUM 777 = DUM 777 + 01 237 IF DUM 777 < DUM 778 THEN GOTO STEP 241 238 LET DUM 777 = 00 239 ALIN POS 0 REF 0 REG 0 240 SMOV DLTA 0 SPD 0 REG 0 241 LET DLTA 998 = 00 242 PRIN "CIRCUIT # " DUM 807 243 GOSU STEP 15 244 EXIT 245 REM "CAP TEST ROUTINE" 246 LET I = VALU 1 247 LET J = I + 7.00000E+02 248 LET K = 1.00000E+01 249 IF NOM J > 2.00000E+01 THEN LET K = 1.50000E+01 250 TALK DEV 1 STRG K 251 LISN DEV 2 WAIT 1 "-" 01 STRG 11 0.00000E+00 02 STRG 12  NOM 1000 01 STRG 13 NOM 1001 %1.0 THEN GOTO STEP 259 252 LET DUM J = NOM 1000 * 1.00000E+06 253 PRIN BIT 10 "C" I "=" DUM J 254 LET DUM J = DUM J - NOM J 255 LET K = J 256 IF DUM J > TOL K THEN IF DUM J < ! TOL K THEN EXIT 257 LET REG 3 = 01 258 EXIT 259 PRIN "TIMED OUT" 260 EXIT 261 PRIN STRG 3 "ENTER NEW LOT NUMBER (WAS " STRG 333 " ) " STRG 1 262 READ TTY:;"_" STRG 333 %1.0 THEN QUIT 263 PRIN "LOT NUMBER IS " STRG 333 264 PRIN " "  "ENTER TODAY'S DATE (WAS " STRG 350 " ) " STRG 1 265 READ TTY:;"_" STRG 350 %1.0 THEN QUIT 266 PRIN " NEW DATE IS " STRG 350 267 PRIN "NO 4-16 PHASE CHANGE ROUTINE" STRG 3 268 LET DUM 801 = 01 269 QUIT DENS 333 SPD 333 PWR 1 UNK 101 NOM 101 SCAN 1 MAT 0 FUNC 0 DUM 101 DEV 1 041 2 0101 REG 1 00 2 00 3 00 4 00 12 00 13 00 990 03 991 04 998 -01 1851 01 1852 02 1853 00 1854 04 1855 00 1856 03 1857 07 1858 015 1859 025 1860 0110 1861 0215 1862 0331 1863 0766 1864 01072 1865 0354 1866 030 1867 010 1868 01 1869 01 1870 02 1871 01 1872 00 1873 00 1874 00 1875 00 1903 00 1904 02 1905 03 1906 011 1907 03 1908 00 1909 04 1910 05 1911 00 1912 05 1913 023 1914 0252 1915 0163 1916 0553 1917 0660 1918 01046 1919 0157 1920 025 1921 013 1922 07 1923 00 1924 00 1925 00 1926 00 1927 00 1928 00 1929 01 1930 00 1931 00 1932 00 POS 96 -800, -200 97 0, -200 98 -800, -400 99 0, -400 800 -4350, -350 801 -200, -350 899 175, 0 900 2754, -5154 990 -2339, -5066 997 7448, -14767 998 7448, 15716 999 7448, -14664 REF 999 POS 999 NOM 101 9.00000E+06 700 0.00000E+00 701 1.18000E+01 1000 1.20500E-05 1001 1.46390E+00 SCAN 1 11, 1, 0, 0 CODE 3 3, 3, 100, 0 10 3, 8, 150, 0 TOL 101 -1.00000E-01, 1.00000E-01 700 -3.00000E-02, 3.00000E-02 701 -3.80000E-01, 3.80000E-01 DUM 1 -3.91111E-02 101 -3.91111E-02 131 2.18692E+01 140 0.00000E+00 161 2.76199E+00 444 0.00000E+00 700 9.99999E-03 701 2.49994E-01 731 2.39998E+01 761 2.34894E+01 777 1.90000E+01 778 2.40000E+01 795 0.00000E+00 796 0.00000E+00 797 0.00000E+00 798 0.00000E+00 799 0.00000E+00 800 1.83600E+03 801 1.00000E+00 802 0.00000E+00 803 0.00000E+00 804 0.00000E+00 805 0.00000E+00 806 0.00000E+00 807 0.00000E+00 808 0.00000E+00 809 6.00000E+01 810 -1.00000E+01 811 1.00000E+00 1001 2.27556E-02 1002 8.53333E-03 1003 2.20444E-02 1004 2.84444E-03 1005 -9.24444E-03 1006 -1.42222E-02 1007 -2.13333E-03 1008 1.49333E-02 1009 3.05778E-02 1010 3.91111E-02 1011 2.91556E-02 1012 -6.40000E-03 1013 1.56444E-02 1014 1.28000E-02 1015 2.27556E-02 1016 3.05778E-02 1017 1.92000E-02 1018 -2.48889E-02 1019 -2.63111E-02 1020 4.12444E-02 1021 2.91556E-02 1022 -5.68889E-03 1023 7.82222E-03 1024 -4.26667E-02 1025 -2.91556E-02 1026 8.53333E-03 1027 1.92000E-02 1028 1.70667E-02 1029 3.55555E-03 1030 -4.26667E-02 1031 -9.24444E-03 1032 -5.90222E-02 1033 2.13333E-03 1034 -3.98222E-02 1035 -1.77778E-02 1036 -3.41333E-02 1037 7.11111E-04 1038 1.35111E-02 1039 2.70222E-02 1040 6.40000E-03 1041 1.84889E-02 1042 -4.19555E-02 1043 -6.40000E-02 1044 -4.69333E-02 1045 -2.98667E-02 1046 -2.70222E-02 1047 -3.41333E-02 1048 -1.99111E-02 1049 -7.75111E-02 1050 -1.35111E-02 1051 -2.84444E-03 1052 -2.84444E-03 1053 7.11111E-03 1054 8.53333E-03 1055 -1.63556E-02 1056 -9.24444E-02 1057 -3.05778E-02 1058 -2.56000E-02 1059 -1.35111E-02 1060 -6.40000E-03 1061 -1.42222E-03 1062 0.00000E+00 1063 1.42222E-03 1064 1.13778E-02 1065 7.82222E-03 1066 2.70222E-02 1067 3.55555E-03 1068 7.82222E-03 1069 8.53333E-03 1070 2.13333E-02 1071 1.92000E-02 1072 1.35111E-02 1073 1.35111E-02 1074 7.11111E-03 1075 8.53333E-03 1076 1.13778E-02 1077 3.05778E-02 1078 2.13333E-02 1079 2.56000E-02 1080 -3.48444E-02 1081 1.06667E-02 1082 1.84889E-02 1083 1.99111E-02 1084 1.92000E-02 1085 1.99111E-02 1086 6.40000E-03 1087 9.95555E-03 1088 1.00978E-01 1089 1.42222E-03 1090 1.63556E-02 1091 1.49333E-02 1092 1.49333E-02 1093 1.99111E-02 1094 9.24444E-03 1095 4.26667E-03 1096 8.53333E-03 1097 -8.53333E-03 1098 -4.97778E-03 1099 -2.06222E-02 1100 2.20444E-02 1101 1.92000E-02 1102 2.91556E-02 1103 6.40000E-03 1104 -5.68889E-02 1105 3.12889E-02 1106 3.12889E-02 1107 2.91556E-02 1108 5.76000E-02 1109 2.48889E-02 1110 0.00000E+00 1111 3.91111E-02 1112 1.77778E-02 1113 2.48889E-02 1114 2.70222E-02 1115 2.27556E-02 1116 1.13778E-02 1117 2.13333E-02 1118 3.62667E-02 1119 3.76889E-02 1120 5.33333E-02 1121 3.98222E-02 1122 4.19555E-02 1123 5.33333E-02 1124 4.69333E-02 1125 4.33778E-02 1126 5.76000E-02 1127 6.18667E-02 1128 4.76444E-02 1129 3.27111E-02 1130 5.12000E-02 1131 3.27111E-02 1132 3.48444E-02 1133 3.48444E-02 1134 3.91111E-02 1135 2.84444E-02 1136 4.40889E-02 1137 4.05333E-02 1138 2.63111E-02 1139 1.77778E-02 1140 7.11111E-03 1141 -2.91556E-02 1142 -1.13778E-02 1143 -1.63556E-02 1144 -4.26667E-02 1145 -5.40444E-02 1146 -4.90667E-02 1147 -3.91111E-02 1501 2.19992E-01 1502 8.99963E-02 1503 -1.20005E-01 1504 9.99641E-03 1505 1.09993E-01 1506 1.99966E-02 1507 2.99931E-02 1508 -1.00040E-02 1509 -1.20005E-01 1510 3.99971E-02 1511 7.99942E-02 1512 1.29995E-01 1513 9.99947E-02 1514 3.99971E-02 1515 9.99947E-02 1516 9.99947E-02 1517 9.99947E-02 1518 9.99947E-02 1519 9.99641E-03 1520 5.99957E-02 1521 9.99947E-02 1522 9.99947E-02 1523 6.99940E-02 1524 1.99966E-02 1525 -1.00040E-02 1526 5.99957E-02 1527 7.99942E-02 1528 -1.00006E-01 1529 9.99947E-02 1530 9.99947E-02 1531 6.99940E-02 1532 -2.00062E-02 1533 9.99641E-03 1534 8.99963E-02 1535 -1.00006E-01 1536 1.09993E-01 1537 -1.00006E-01 1538 -1.20005E-01 1539 -1.00040E-02 1540 1.99966E-02 1541 -5.72205E-06 1542 4.99935E-02 1543 -1.10004E-01 1544 8.99963E-02 1545 9.99947E-02 1546 8.99963E-02 1547 1.19993E-01 1548 8.99963E-02 1549 6.99940E-02 1550 -2.00062E-02 1551 -5.60009E-01 1552 -3.40004E-01 1553 3.99971E-02 1554 1.39992E-01 1555 -2.20007E-01 1556 -3.70007E-01 1557 -3.40004E-01 1558 -1.80004E-01 1559 -3.20007E-01 1560 -2.30005E-01 1561 -6.00004E-01 1562 -8.50004E-01 1563 -1.02001E+00 1564 -9.70007E-01 1565 -2.40005E-01 1566 -3.40004E-01 1567 -1.20005E-01 1568 -3.80007E-01 1569 -4.70007E-01 1570 -1.00040E-02 1571 -3.00045E-02 1572 9.99641E-03 1573 -4.70007E-01 1574 -1.08001E+00 1575 -6.70008E-01 1576 -2.00062E-02 1577 3.99971E-02 1578 -5.72205E-06 1579 1.99966E-02 1580 -6.00052E-02 1581 9.99641E-03 1582 -2.00062E-02 1583 -1.00040E-02 1584 -4.00047E-02 1585 1.99966E-02 1586 8.99963E-02 1587 -3.00045E-02 1588 -3.00045E-02 1589 -7.00073E-02 1590 -2.00062E-02 1591 -2.00062E-02 1592 1.99966E-02 1593 9.99641E-03 1594 1.99966E-02 1595 9.99641E-03 1596 1.99966E-02 1597 8.99963E-02 1598 1.59998E-01 1599 9.99641E-03 1600 9.99947E-02 1601 6.99940E-02 1602 -2.00062E-02 1603 -5.72205E-06 1604 6.99940E-02 1605 7.99942E-02 1606 1.99966E-02 1607 5.99957E-02 1608 3.99971E-02 1609 2.99931E-02 1610 9.99641E-03 1611 -2.00062E-02 1612 -1.30005E-01 1613 9.99641E-03 1614 -1.00006E-01 1615 -1.30005E-01 1616 9.99641E-03 1617 9.99641E-03 1618 -2.00062E-02 1619 -4.00047E-02 1620 7.99942E-02 1621 -8.00037E-02 1622 -1.40009E-01 1623 9.99641E-03 1624 -2.00062E-02 1625 9.99641E-03 1626 1.99966E-02 1627 5.99957E-02 1628 -1.00006E-01 1629 1.09993E-01 1630 5.99957E-02 1631 9.99641E-03 1632 4.99935E-02 1633 2.99931E-02 1634 1.09993E-01 1635 -1.00006E-01 1636 9.99947E-02 1637 6.99940E-02 1638 6.99940E-02 1639 9.99641E-03 1640 9.99641E-03 1641 5.99957E-02 1642 -1.10004E-01 1643 -5.72205E-06 1644 2.99931E-02 1645 9.99947E-02 1646 1.39992E-01 1647 2.49994E-01 1851 -5.00000E+01 1852 -5.00000E-01 1853 -2.00000E-01 1854 -1.50000E-01 1855 -1.20000E-01 1856 -1.00000E-01 1857 -9.00000E-02 1858 -8.00000E-02 1859 -7.00000E-02 1860 -6.00000E-02 1861 -4.00000E-02 1862 -2.00000E-02 1863 0.00000E+00 1864 2.00000E-02 1865 4.00000E-02 1866 6.00000E-02 1867 7.00000E-02 1868 8.00000E-02 1869 9.00000E-02 1870 1.00000E-01 1871 1.20000E-01 1872 1.50000E-01 1873 2.00000E-01 1874 5.00000E-01 1875 5.00000E+01 1903 -1.00000E+01 1904 -3.00000E+00 1905 -1.00000E+00 1906 -7.50000E-01 1907 -5.00000E-01 1908 -4.50000E-01 1909 -4.00000E-01 1910 -3.50000E-01 1911 -3.00000E-01 1912 -2.50000E-01 1913 -2.00000E-01 1914 -1.50000E-01 1915 -1.00000E-01 1916 -5.00000E-02 1917 0.00000E+00 1918 5.00000E-02 1919 1.00000E-01 1920 1.50000E-01 1921 2.00000E-01 1922 2.50000E-01 1923 3.00000E-01 1924 3.50000E-01 1925 4.00000E-01 1926 4.50000E-01 1927 5.00000E-01 1928 7.50000E-01 1929 1.00000E+00 1930 3.00000E+00 1931 1.00000E+01 1932 1.00000E+02 SPD 1 6.00000E+00, 6.00000E+00 333 5.00000E+00, 5.00000E+00 PWR 1 100, 100 WAIT 1 2000, 0 STRG 1 _ 2 307-1328-00 3  10 R20XPCXDFX*XG 11 N 12 P+ 13 D 15 R200XPCXDFX*XG 300 1328 333 M52G 350 06/25/04 807 RES 1000 Y DLTA 900 2579, -5154 994 -1, 0 995 0, 1 998 0, 0 999 0, 620 1000 0, 620 1001 0, -620 SCAL 333 4.50000E+00 335 1.00000E+01