HEADING: 300-2587-00 "A PASS" (P20487.A1) S&R 25'S 17-AUG-00 JR STEP 4 GOTO STEP 36 8 GOTO STEP 784 12 GOTO STEP 692 16 GOSU STEP 464 20 GOTO STEP 36 24 GOTO STEP 580 28 GOTO STEP 928 32 IF DUM 807 = 00 THEN LET DUM 807 = 01 36 IF DUM 801 = 00 THEN GOTO STEP 928 40 MOVE POS 300 SPD 0 44 GOSU STEP 496 48 LET DLTA 900 = POS 900 - POS 899 52 DISP DLTA 900 56 MOVE POS 899 SPD 0 60 FOR I = 5.01000E+02 TO 5.04000E+02 64 TEST UNK 500 CODE 8 TOL 500 ACC 0 REJ 80 REG 0 68 TEST UNK 500 CODE 1 TOL 500 ACC 0 REJ 80 REG 0 72 PRIN "SHORT REJECT # " I 76 LET REG 3 = 01 80 NEXT I 84 IF REG 3 # 00 THEN GOTO STEP 444 88 FOR I = 6.01000E+02 TO 6.02000E+02 92 IF BIT 10 = 01 THEN GOTO STEP 100 96 TEST UNK 600 CODE 8 TOL 600 ACC 108 REJ 0 REG 0 100 TEST UNK 600 CODE 2 TOL 600 ACC 108 REJ 0 REG 4 104 PRIN "THRUHOLE REJECT #" I 108 NEXT I 112 IF REG 4 # 00 THEN GOTO STEP 452 116 LET M = DUM 811 120 FOR I = 01 TO M 124 IF NOM I < - 01 THEN LET I = - NOM I 128 LET J = 03 132 IF NOM I > 9.00000E+04 THEN LET J = J + 1.00000E+01 136 IF BIT 4 = 01 THEN IF MASK I # 00 THEN GOTO STEP 156 140 TEST UNK 1 CODE J TOL I ACC 148 REJ 0 REG 0 144 TEST UNK 1 CODE 1 TOL I ACC 0 REJ 152 REG 1 148 IF BIT 8 = 01 THEN GOTO STEP 156 152 PRIN "R" I " = " DUM I "%" 156 NEXT I 160 IF DUM 7 < - 2.00000E+00 THEN GOSU STEP 632 164 IF BIT 4 = 01 THEN GOTO STEP 176 168 IF REG 1 # 00 THEN GOTO STEP 444 172 REM "**************************************" 176 LET M = DUM 811 180 FOR I = 01 TO M 184 IF NOM I < - 01 THEN LET I = - NOM I 188 IF MASK I = 00 THEN GOTO STEP 324 192 IF MASK I # - 01 THEN GOTO STEP 204 196 REM "** CALCULATE NOMINAL FOR 2-PLUNGE L-TRIM ROUTINE **" 200 LET NOM 300 = NOM I + ( NOM I * DUM I * TURN I / 1.00000E+04 ) 204 LET J = I * 02 208 LET K = J + 01 212 LET L = I + 1.00000E+02 216 IF REG 50 = 02 THEN GOSU STEP 480 220 IF REG 50 = 02 THEN GOTO STEP 324 224 IF BIT 4 = 01 THEN GOTO STEP 312 228 IF DUM I > TOL L THEN GOTO STEP 312 232 MOVE POS J SPD 0 236 LET J = 02 240 IF DUM I > - 4.50000E+01 THEN LET J = 03 244 IF DUM I > - 2.00000E+01 THEN LET J = 04 248 IF DUM I > - 1.00000E+01 THEN LET J = 05 252 IF DUM I > - 5.00000E+00 THEN LET J = 06 256 IF NOM I > 2.00000E+04 THEN LET J = J + 1.00000E+01 260 LET N = 01 264 IF NOM I < 1.00000E+03 THEN LET N = 02 268 IF NOM I < 1.00000E+02 THEN LET N = 03 272 IF MASK I # - 01 THEN GOTO STEP 304 276 REM "***BEGIN '2-PLUNGE L-TRIM ROUTINE***" 280 TRIM UNK 300 CODE 104 CUT 207 MODE 207 POS K DENS 4 BRAN 0 284 TRIM UNK 300 CODE 105 CUT 7 MODE I POS K DENS 4 BRAN 0 288 IF N < 1.00000E+01 THEN LET N = N + 1.00000E+01 292 TRIM UNK 1 CODE 6 CUT L MODE L POS K DENS 104 BRAN 0 296 GOTO STEP 308 300 REM "END" 304 TRIM UNK 1 CODE J CUT I MODE I POS K DENS N BRAN 0 308 IF MASK I = - 01 THEN GOSU STEP 868 312 TEST UNK 1 CODE 15 TOL L ACC 0 REJ 320 REG 2 316 IF BIT 8 = 01 THEN GOTO STEP 324 320 PRIN "R" I " = " DUM I "%" 324 NEXT I 328 IF REG 50 = 00 THEN GOTO STEP 380 332 IF REG 50 = 01 THEN GOTO STEP 352 336 LET REG 50 = 00 340 PRIN "END OF DRIFT TEST, HIT RETURN TO CONTINUE.." STRG 1 344 READ TTY:;"_" STRG 1000 %1.0 THEN QUIT 348 GOTO STEP 384 352 PRIN "WAITING 2 MINUTES" STRG 3 356 LET REG 50 = 02 360 LET BIT 8 = 01 364 FOR I = 1.00000E+00 TO 3.00000E+05 368 NEXT I 372 PRIN STRG 2 " SHORT TERM DRIFT TEST RESULTS" 376 GOTO STEP 176 380 IF BIT 4 = 01 THEN GOTO STEP 452 384 IF REG 2 # 00 THEN GOTO STEP 448 388 PRIN "GOOD PART" 392 PRIN " R7 = " DUM 7 "%" 396 PRIN " R16 = " DUM 16 "%" 400 PRIN " R20 = " DUM 20 "%" 404 REM "** TRIM LOT#, SUB# AND CIRCUIT# ON GOOD PARTS **" 408 MOVE POS 800 SPD 0 412 LET J = 02 416 LET K = 03 420 LET L = 05 424 LET DUM 805 = ( ( DUM 799 * 1.00000E+01 ) + DUM 807 ) / 1.00000E+05 428 LET STRG 1000 = %5.5 DUM 805 432 LET STRG 12 = J J STRG 333 + K L STRG 1000 436 PRIN "LOT/SERIAL CODE IS: " STRG 12 440 CGEN DENS 333 SCAL 1 POS 801 STRG 12 444 IF REG 1 # 00 THEN PRIN "INITIAL REJECT" STRG 3 448 IF REG 2 # 00 THEN PRIN "TRIM REJECT" STRG 3 452 MOVE POS 899 SPD 0 456 HAND 460 EXIT 464 PRIN "DRIFT TEST ON" STRG 3 468 LET REG 50 = 01 472 LET BIT 8 = 00 476 EXIT 480 LET NOM 300 = NOM I + ( NOM I * DUM I / 1.00000E+02 ) 484 TEST UNK 300 CODE 15 TOL 1 ACC 0 REJ 0 REG 0 488 PRIN " R" I " CHANGE = " %5.3 DUM 300 "%" 492 EXIT 496 IF DUM 807 = 00 THEN GOTO STEP 524 500 PRIN "" 504 PRIN "PROGRAM STOPPED AT PART # " DUM 807 508 PRIN "" 512 PRIN "ENTER PART # YOU WANT TO START ON >" STRG 1 516 READ TTY:;DUM 808 %1.0 THEN QUIT 520 LET DUM 807 = 00 524 SHOM REG 30 528 SHOM REG 0 532 REM "ALIGN THETA" 536 ALIN POS 998 REF 999 REG 998 540 REM "ALIGN X-Y" 544 ALIN POS 0 REF 0 REG 0 548 LET DLTA 998 = POS 997 - POS 999 552 GOTO STEP 560 556 LET DLTA 998 = DLTA 998 + DLTA 999 560 GOSU STEP 596 564 IF DUM 807 < DUM 999 THEN GOTO STEP 556 568 LET DUM 807 = 00 572 LET DUM 808 = 00 576 LET DUM 799 = DUM 799 + 01 580 SHOM REG 30 584 SHOM REG 0 588 SHOM REG 32 592 QUIT 596 LET DUM 807 = DUM 807 + 01 600 IF DUM 808 > DUM 807 THEN EXIT 604 SMOV DLTA 998 SPD 0 REG 0 608 SMOV DLTA 0 SPD 0 REG 0 612 LET DLTA 998 = 00 616 PRIN "" 620 PRIN "PART # " DUM 807 624 GOSU STEP 48 628 EXIT 632 LET M = DUM 811 636 FOR N = 01 TO M 640 GOSU STEP 844 644 IF DUM I > DUM 810 THEN IF DUM I < DUM 809 THEN GOTO STEP 656 648 PRIN "DID NOT LOG" 652 EXIT 656 NEXT N 660 PRIN "DATA LOGGING" 664 LET DUM 800 = DUM 800 + 01 668 FOR N = 01 TO M 672 GOSU STEP 844 676 LET DUM J = DUM J + DUM I 680 LET DUM K = DUM K + ( DUM I * DUM I ) 684 NEXT N 688 EXIT 692 GOSU STEP 744 696 LET M = DUM 811 700 FOR N = 01 TO M 704 GOSU STEP 844 708 LET DUM 804 = DUM J / DUM 800 712 LET DUM 805 = ( DUM K - ( DUM J * DUM J / DUM 800 ) ) 716 LET DUM 805 = SQRT ( DUM 805 * DUM 805 ) 720 LET DUM 805 = SQRT ( DUM 805 / ( DUM 800 - 01 ) ) 724 LET DUM 806 = ( 1.00000E+02 + DUM 804 ) * NOM I / 1.00000E+02 728 PRIN "R" I " " %5.3 DUM 804 %8.3 DUM 805 STRG 1 732 PRIN %15.3 DUM 806 %15.3 NOM I 736 NEXT N 740 QUIT 744 PRIN STRG 2 " LOT " STRG 333 STRG 1 748 PRIN " RESISTOR PRETRIM DATA BASED ON" DUM 800 " PARTS" 752 PRIN " " 756 PRIN " DATE: " STRG 340 " LAST ARRAY # (DUM 799): " STRG 1 760 LET DUM 805 = DUM 799 - 1.00000E+00 764 PRIN %5.0 DUM 805 768 PRIN " " 772 PRIN " AVE DEV STD DEV AVERAGE OHMS" STRG 1 776 PRIN " NOMINAL" 780 EXIT 784 LET M = DUM 811 788 FOR N = 01 TO M 792 GOSU STEP 844 796 LET DUM I = 00 800 LET DUM J = 00 804 LET DUM K = 00 808 NEXT N 812 FOR I = 8.00000E+02 TO 8.08000E+02 816 LET DUM I = 00 820 NEXT I 824 PRIN STRG 3 "READY TO SAVE PROGRAM NOW ? (Y/N) " STRG 1 828 READ TTY:;"_" STRG 1000 %1.0 THEN QUIT 832 IF STRG 1000 # "Y" THEN LET DUM 801 = 01 836 PRIN "DUMMIES ZEROED" STRG 3 840 QUIT 844 IF NOM N < 00 THEN LET N = - NOM N 848 LET I = N 852 LET J = I + 3.00000E+02 856 LET K = I + 6.00000E+02 860 LET L = I + 1.00000E+02 864 EXIT 868 REM "** MULTIPLE BOX TRIM ROUTINE, USE GOSU AFTER L-TRIM **" 872 LET J = I * 02 876 NIBL DLTA 800 POS J DENS 800 BRAN 0 880 NIBL DLTA 801 POS J DENS 800 BRAN 896 884 NIBL DLTA 802 POS J DENS 800 BRAN 900 888 NIBL DLTA 803 POS K DENS 4 BRAN 0 892 GOTO STEP 880 896 EXIT 900 NIBL DLTA 804 POS J DENS 800 BRAN 916 904 NIBL DLTA 805 POS K DENS 4 BRAN 0 908 GOTO STEP 880 912 EXIT 916 PRIN STRG 3 "CANNOT DO BOX TRIM !! CHECK POSITIONS!" 920 PRIN STRG 3 "PROGRAM STOPPED ON R" I ", FIX OR GET HELP!" 924 QUIT 928 PRIN STRG 3 "ENTER LOT NUMBER >" STRG 1 932 READ TTY:;"_" STRG 333 %1.0 THEN QUIT 936 PRIN STRG 3 "ENTER TODAY'S DATE >" STRG 1 940 READ TTY:;"_" STRG 340 %1.0 THEN QUIT 944 PRIN  "LOT NUMBER IS: " STRG 333 948 PRIN "TODAY'S DATE IS: " STRG 340 952 PRIN STRG 3 956 LET DUM 801 = 01 960 PRIN "POSITIONS SET FOR 16 PHASE ONLY" 964 QUIT MODE 1 TURN 1 CROS 0 INC 0 5 TURN 1 CROS 0 INC 0 6 TURN 6 CROS 0 INC 0 7 TURN 0 CROS 207 INC 7 8 TURN 8 CROS 0 INC 0 9 TURN 9 CROS 0 INC 0 11 TURN 11 CROS 0 INC 0 12 TURN 12 CROS 12 INC 12 13 TURN 13 CROS 0 INC 0 14 TURN 14 CROS 0 INC 0 15 TURN 15 CROS 0 INC 0 16 TURN 0 CROS 207 INC 7 17 TURN 17 CROS 0 INC 0 20 TURN 0 CROS 207 INC 7 23 TURN 23 CROS 0 INC 0 24 TURN 24 CROS 12 INC 12 25 TURN 25 CROS 0 INC 0 26 TURN 26 CROS 12 INC 12 27 TURN 27 CROS 0 INC 0 28 TURN 27 CROS 0 INC 0 29 TURN 29 CROS 0 INC 0 30 TURN 29 CROS 0 INC 0 31 TURN 31 CROS 0 INC 0 32 TURN 32 CROS 0 INC 0 33 TURN 33 CROS 0 INC 0 34 TURN 34 CROS 0 INC 0 35 TURN 35 CROS 0 INC 0 37 TURN 37 CROS 0 INC 0 107 TURN 0 CROS 107 INC 107 116 TURN 0 CROS 107 INC 107 120 TURN 0 CROS 107 INC 107 207 TURN 0 CROS 7 INC 0 DENS 1 SPD 1 PWR 1 2 SPD 2 PWR 1 3 SPD 3 PWR 1 4 SPD 4 PWR 1 104 SPD 104 PWR 1 333 SPD 333 PWR 1 800 SPD 800 PWR 0 UNK 1 NOM I SCAN I MAT 0 FUNC 0 DUM I 300 NOM 300 SCAN I MAT 0 FUNC 0 DUM 300 500 NOM 500 SCAN I MAT 0 FUNC 0 DUM 0 600 NOM 600 SCAN I MAT 0 FUNC 0 DUM 0 REG 1 00 2 00 3 00 4 00 30 03 32 04 50 00 998 -01 MASK 1 01 5 01 6 01 7 -01 8 01 9 01 11 01 12 01 13 01 14 01 15 01 16 -01 17 01 20 -01 23 01 24 01 25 01 26 01 27 01 28 01 29 01 30 01 31 01 32 01 33 01 34 01 35 01 37 01 48 00 POS 2 12890, -1076 3 13074, -724 12 3198, -300 13 3535, -408 14 2818, 1580 15 5207, 2100 16 -4651, 2810 17 -4397, 3180 18 4285, 3777 19 4464, 4500 22 1239, 1738 23 1981, 2083 24 948, 4441 25 1640, 3900 26 1222, -1564 27 1423, -1071 28 -450, -3493 29 236, -3116 30 -4293, -2284 31 -3992, -1919 32 -2200, -1564 33 203, -1046 40 -2300, 1649 41 150, 2025 46 -3662, 1807 47 -3057, 2163 48 -3460, 3324 49 -2702, 2803 50 285, 3643 51 423, 4900 52 632, -2771 53 1381, -3268 54 -10802, -425 55 -10440, -550 56 -10825, 255 57 -10434, 124 58 -11010, -1983 59 -10793, -1613 60 -10971, 1220 61 -10744, 1507 62 -8642, -2317 63 -8321, -2823 64 -9761, -2852 65 -9266, -2548 66 -10914, 1772 67 -10410, 2081 68 -10856, 2408 69 -10341, 2737 70 10221, -2589 71 10903, -2264 74 -6494, 2970 75 -6034, 2813 300 -10378, -2885 800 5914, 4130 801 5914, 2408 899 -2381, -1010 900 -2070, -3531 997 1232, -5799 998 3138, 18561 999 3138, -11012 REF 999 POS 999 NOM 1 1.50000E+01 2 -6.00000E+00 6 1.80000E+01 7 1.80000E+06 8 1.30000E+02 9 7.20000E+01 10 -1.10000E+01 11 2.90000E+02 12 2.22220E+05 13 1.00000E+02 14 4.90000E+01 15 1.62000E+02 16 1.80420E+06 17 -2.00000E+01 20 1.80420E+06 21 -2.30000E+01 23 3.38000E+02 24 1.95800E+05 25 4.50000E+01 26 1.95800E+05 27 1.20000E+01 28 1.20000E+01 29 2.20000E+01 30 2.20000E+01 31 4.00000E+01 32 4.00000E+01 33 4.00000E+01 34 4.00000E+01 35 5.00000E+01 36 -3.70000E+01 37 1.00000E+02 38 -4.80000E+01 48 5.00000E+02 300 1.31715E+06 301 0.00000E+00 305 0.00000E+00 306 0.00000E+00 307 0.00000E+00 308 0.00000E+00 309 0.00000E+00 311 0.00000E+00 312 0.00000E+00 313 0.00000E+00 314 0.00000E+00 315 0.00000E+00 316 0.00000E+00 317 0.00000E+00 320 0.00000E+00 323 0.00000E+00 324 0.00000E+00 325 0.00000E+00 326 0.00000E+00 327 0.00000E+00 328 0.00000E+00 329 0.00000E+00 330 0.00000E+00 331 0.00000E+00 332 0.00000E+00 333 0.00000E+00 334 0.00000E+00 335 0.00000E+00 337 0.00000E+00 500 2.00000E+00 600 3.00000E+00 SCAN 1 11, 12, 0, 0 6 9, 13, 0, 0 7 13, 17, 5, 0 8 21, 19, 0, 0 9 15, 14, 0, 0 11 8, 17, 0, 0 12 14, 17, 0, 0 13 13, 3, 0, 0 14 6, 7, 0, 0 15 5, 4, 0, 0 16 5, 3, 8, 0 20 8, 8, 13, 0 23 4, 8, 0, 0 24 17, 8, 0, 0 25 17, 16, 0, 0 26 7, 7, 0, 0 27 20, 15, 0, 0 28 22, 5, 0, 0 29 18, 15, 0, 0 30 22, 6, 0, 0 31 0, 18, 0, 0 32 12, 2, 0, 0 33 23, 22, 0, 0 34 10, 23, 0, 0 35 11, 10, 0, 0 37 2, 21, 0, 0 48 19, 1, 0, 0 501 3, 4, 0, 0 502 5, 8, 0, 0 503 15, 17, 0, 0 504 13, 17, 0, 0 601 5, 0, 0, 0 602 16, 19, 0, 0 CODE 1 3, 1, 150, 0 2 3, 2, 50, 0 3 3, 3, 50, 0 4 3, 4, 50, 0 5 3, 5, 50, 0 6 3, 6, 200, 0 8 8, 2, 0, 0 10 3, 8, 200, 0 12 3, 2, 100, 0 13 3, 3, 100, 0 14 3, 4, 100, 0 15 3, 5, 150, 0 16 3, 6, 100, 0 104 3, 7, 100, 0 105 3, 7, 200, 0 TOL 1 -6.00000E+01, 4.50000E+00 6 -6.00000E+01, 4.50000E+00 7 -6.00000E+01, 1.00000E+01 8 -6.00000E+01, 4.50000E+00 9 -6.00000E+01, 1.50000E+00 11 -6.00000E+01, 4.50000E+00 12 -6.00000E+01, 0.00000E+00 13 -6.00000E+01, 1.50000E+00 14 -6.00000E+01, 1.50000E+00 15 -6.00000E+01, 1.50000E+00 16 -6.00000E+01, 0.00000E+00 20 -6.00000E+01, 0.00000E+00 23 -6.00000E+01, 1.50000E+00 24 -6.00000E+01, 0.00000E+00 25 -6.00000E+01, 1.50000E+00 26 -6.00000E+01, 0.00000E+00 27 -6.00000E+01, 4.50000E+00 28 -6.00000E+01, 4.50000E+00 29 -6.00000E+01, 4.50000E+00 30 -6.00000E+01, 4.50000E+00 31 -6.00000E+01, 1.50000E+00 32 -6.00000E+01, 1.50000E+00 33 -6.00000E+01, 1.50000E+00 34 -6.00000E+01, 1.50000E+00 35 -6.00000E+01, 4.50000E+00 37 -6.00000E+01, 4.50000E+00 48 -3.30000E+01, 3.30000E+01 101 -4.00000E+00, 4.00000E+00 106 -4.00000E+00, 4.00000E+00 107 -3.30000E-01, 0.00000E+00 108 -4.00000E+00, 4.00000E+00 109 -1.00000E+00, 1.00000E+00 111 -4.00000E+00, 4.00000E+00 112 -3.30000E-01, 0.00000E+00 113 -1.00000E+00, 1.00000E+00 114 -1.00000E+00, 1.00000E+00 115 -1.00000E+00, 1.00000E+00 116 -3.30000E-01, 0.00000E+00 120 -3.30000E-01, 0.00000E+00 123 -1.00000E+00, 1.00000E+00 124 -3.30000E-01, 0.00000E+00 125 -1.00000E+00, 1.00000E+00 126 -3.30000E-01, 0.00000E+00 127 -4.00000E+00, 4.00000E+00 128 -4.00000E+00, 4.00000E+00 129 -4.00000E+00, 4.00000E+00 130 -4.00000E+00, 4.00000E+00 131 -1.00000E+00, 1.00000E+00 132 -1.00000E+00, 1.00000E+00 133 -1.00000E+00, 1.00000E+00 134 -1.00000E+00, 1.00000E+00 135 -4.00000E+00, 4.00000E+00 137 -4.00000E+00, 4.00000E+00 500 -1.50000E+02, 1.50000E+02 600 -1.00000E+02, 1.00000E+02 DUM 1 -1.17187E-01 5 0.00000E+00 6 -1.62760E-02 7 -8.88889E-02 8 -2.76442E-01 9 -5.42535E-02 11 -2.90948E-01 12 -1.49401E-01 13 -2.61719E-01 14 -1.51467E-01 15 -1.83256E-01 16 -2.61168E-01 17 0.00000E+00 20 -7.31626E-02 23 -2.17271E-01 24 -1.55260E-01 25 1.30208E-02 26 -2.16547E-01 27 -4.47591E-02 28 -8.13802E-03 29 -8.43395E-02 30 -1.28729E-01 31 -1.07422E-01 32 -1.46484E-01 33 -1.26953E-01 34 -1.17187E-01 35 -1.75781E-01 37 -7.81250E-03 48 1.32500E+00 300 3.90366E-02 301 -4.18132E+03 305 0.00000E+00 306 -5.35270E+03 307 -8.50762E+03 308 -8.41243E+03 309 -8.64916E+03 311 -8.74305E+03 312 -8.73422E+03 313 -8.83986E+03 314 -6.67772E+03 315 -8.30819E+03 316 -7.97797E+03 317 0.00000E+00 320 -8.28116E+03 323 -8.93269E+03 324 -8.04783E+03 325 -8.84673E+03 326 -8.60184E+03 327 -7.08443E+03 328 -6.65409E+03 329 -6.80998E+03 330 -6.90889E+03 331 -7.57879E+03 332 -6.97714E+03 333 -7.15124E+03 334 -7.19019E+03 335 -6.46907E+03 337 -8.77887E+03 348 -3.25291E+02 365 0.00000E+00 601 6.28162E+04 605 0.00000E+00 606 1.02271E+05 607 2.58112E+05 608 2.51299E+05 609 2.65123E+05 611 2.70790E+05 612 2.73830E+05 613 2.77949E+05 614 1.59002E+05 615 2.45542E+05 616 2.27084E+05 617 0.00000E+00 620 2.45376E+05 623 2.83543E+05 624 2.32555E+05 625 2.78199E+05 626 2.63910E+05 627 1.79483E+05 628 1.58470E+05 629 1.65720E+05 630 1.70260E+05 631 2.04700E+05 632 1.73774E+05 633 1.82199E+05 634 1.84270E+05 635 1.49021E+05 637 2.74250E+05 648 2.01202E+03 799 5.47000E+02 800 2.83000E+02 801 1.00000E+00 802 0.00000E+00 803 0.00000E+00 804 -1.16962E+00 805 5.46300E-02 806 4.94152E+02 807 0.00000E+00 808 0.00000E+00 809 1.30000E+02 810 -8.00000E+01 811 4.80000E+01 812 2.80000E+01 813 2.80000E+01 814 1.60000E+02 999 3.00000E+00 CUT 1 -3.00000E-01 5 -3.00000E-01 6 -3.00000E-01 7 -3.50000E-01 8 -3.00000E-01 9 -1.00000E-01 11 -3.00000E-01 12 -2.50000E-01 13 -3.00000E-01 14 -3.00000E-01 15 -3.00000E-01 16 -3.50000E-01 17 -3.00000E-01 20 -3.50000E-01 23 -3.00000E-01 24 -2.10000E-01 25 -1.00000E-01 26 -2.50000E-01 27 -2.50000E-01 28 -2.50000E-01 29 -3.00000E-01 30 -3.00000E-01 31 -3.00000E-01 32 -3.00000E-01 33 -3.00000E-01 34 -3.00000E-01 35 -3.00000E-01 37 -3.00000E-01 107 -5.90000E-01 116 -6.00000E-01 120 -7.00000E-01 207 1.00000E+00 TURN 1 5.80000E+01 6 5.50000E+01 7 9.40000E+01 8 5.50000E+01 9 3.20000E+01 11 7.70000E+01 12 7.10000E+01 13 4.50000E+01 14 8.50000E+01 15 6.50000E+01 16 9.40000E+01 17 8.00000E+01 20 9.50000E+01 23 8.30000E+01 24 7.10000E+01 25 2.20000E+01 26 7.10000E+01 27 4.50000E+01 29 6.20000E+01 31 8.00000E+01 32 8.00000E+01 33 7.80000E+01 34 7.80000E+01 35 8.50000E+01 37 4.50000E+01 CROS 7 1.50000E-01 12 -1.20000E-01 107 -1.20000E+00 207 -7.00000E-01 INC 7 20 12 10 107 4 SPD 1 1.00000E+01, 1.00000E+01 2 7.00000E+00, 7.00000E+00 3 6.00000E+00, 6.00000E+00 4 0.00000E+00, 1.10000E+01 104 8.00000E+00, 0.00000E+00 333 4.00000E+00, 4.00000E+00 800 3.00000E+02, 3.00000E+02 PWR 1 100, 100 STRG 1 _ 2 H2587E PASS "A" 3  12 7705463 333 L77 340 06/20/01 1000 .05463 DLTA 800 0, -8 801 -200, 0 802 0, -180 803 0, 180 804 0, -150 805 0, 150 900 311, -2521 998 0, 0 999 0, 10160 SCAL 1 1.10000E+01