**********************************************************************
*
*     JOB 1 OF 2                  PREPARED BY ERIC FIELDING
*
*      READS SP FILES, SETS UP GEOM, AND GENERATES CDP GATHERS
*
*     INCLUDES SPECIAL INPUT FORMAT OF CGG SP TAPES
*
**********************************************************************
JOBNEFG3
/JOB A 'COALINGA 3 GATHER TAPEGEN'
/INPUT
   FORMAT IBM
   FILELOC 5 4 TRLOC 65 4
   HEADER 80 2
   LABEL 256 257
   BSDI 16
      DATA 1 20000 8 48 0
      REEL COA004
      SN 1      BI 01 EI 86
/GEOM
 BCDP 101
(DIAGRAM)
(XSECTION)
(MAP)
 SCALE 609.6
 SURVEY
   SPLIST
    D1,86,1
 XYBASE -195869 -072152
  STATION
         1,   195869.,    72152.     2,   195874.,    72283.
         3,   195912.,    72410.     4,   195984.,    72522.
         5,   196061.,    72629.     6,   196127.,    72743.
         7,   196233.,    72817.     8,   196335.,    72906.
         9,   196410.,    73013.    10,   196498.,    73114.
        11,   196583.,    73216.    12,   196690.,    73276.
        13,   196691.,    73408.    14,   196700.,    73542.
        15,   196690.,    73674.    16,   196689.,    73804.
        17,   196694.,    73939.    18,   196696.,    74072.
        19,   196695.,    74205.    20,   196697.,    74335.
        21,   196700.,    74466.    22,   196704.,    74599.
        23,   196705.,    74732.    24,   196708.,    74863.
        25,   196709.,    74996.    26,   196711.,    75127.
        27,   196712.,    75259.    28,   196712.,    75390.
        29,   196711.,    75522.    30,   196713.,    75656.
        31,   196713.,    75789.    32,   196715.,    75922.
        33,   196716.,    76055.    34,   196718.,    76188.
        35,   196718.,    76320.    36,   196718.,    76451.
        37,   196720.,    76585.    38,   196721.,    76717.
        39,   196721.,    76851.    40,   196727.,    76985.
        41,   196726.,    77119.    42,   196727.,    77252.
        43,   196730.,    77386.    44,   196746.,    77517.
        45,   196737.,    77647.    46,   196742.,    77779.
        47,   196752.,    77909.    48,   196742.,    78042.
        49,   196746.,    78174.    50,   196759.,    78306.
        51,   196758.,    78438.    52,   196758.,    78570.
        53,   196750.,    78702.    54,   196743.,    78835.
        55,   196745.,    78968.    56,   196746.,    79102.
        57,   196748.,    79236.    58,   196750.,    79370.
        59,   196751.,    79502.    60,   196749.,    79635.
        61,   196749.,    79768.    62,   196757.,    79899.
        63,   196757.,    80032.    64,   196762.,    80165.
        65,   196748.,    80298.    66,   196747.,    80432.
        67,   196749.,    80564.    68,   196751.,    80698.
        69,   196753.,    80831.    70,   196755.,    80965.
        71,   196756.,    81100.    72,   196755.,    81233.
        73,   196756.,    81366.    74,   196756.,    81500.
        75,   196757.,    81634.    76,   196758.,    81767.
        77,   196760.,    81900.    78,   196763.,    82033.
        79,   196766.,    82164.    80,   196770.,    82298.
        81,   196774.,    82432.    82,   196778.,    82564.
        83,   196783.,    82698.    84,   196787.,    82832.
        85,   196795.,    82965.    86,   196797.,    83095.
        87,   196801.,    83230.    88,   196804.,    83362.
        89,   196806.,    83495.    90,   196806.,    83628.
        91,   196807.,    83761.    92,   196808.,    83895.
        93,   196809.,    84028.    94,   196810.,    84161.
        95,   196811.,    84294.    96,   196812.,    84427.
        97,   196813.,    84561.    98,   196814.,    84694.
        99,   196814.,    84827.   100,   196815.,    84961.
       101,   196817.,    85095.   102,   196818.,    85228.
       103,   196819.,    85362.   104,   196820.,    85495.
       105,   196822.,    85628.   106,   196823.,    85762.
       107,   196824.,    85897.   108,   196826.,    86030.
       109,   196827.,    86164.   110,   196828.,    86298.
       111,   196829.,    86432.   112,   196830.,    86567.
       113,   196832.,    86700.   114,   196833.,    86834.
       115,   196834.,    86968.   116,   196835.,    87102.
       117,   196837.,    87236.   118,   196838.,    87370.
       119,   196839.,    87504.   120,   196840.,    87638.
       121,   196842.,    87772.   122,   196843.,    87906.
       123,   196844.,    88039.   124,   196845.,    88173.
       125,   196847.,    88307.   126,   196848.,    88440.
       127,   196849.,    88574.   128,   196850.,    88708.
       129,   196852.,    88841.   130,   196853.,    88973.
       131,   196854.,    89107.   132,   196855.,    89241.
       133,   196857.,    89375.   134,   196858.,    89509.
       135,   196859.,    89640.   136,   196860.,    89774.
       137,   196862.,    89908.   138,   196909.,    90030.
     SHOT 1 AT 1.5 INTO D6,53,1
         INC 1 TO SHOT 86
  PROFILE
  GPELX
        1 +   322.5     2 +   316.7     3 +   311.8     4 +   307.8
        5 +   305.1     6 +   303.6     7 +   299.6     8 +   298.1
        9 +   296.3    10 +   294.1    11 +   289.9    12 +   289.9
       13 +   288.6    14 +   283.8    15 +   285.0    16 +   284.1
       17 +   280.7    18 +   280.4    19 +   279.5    20 +   277.7
       21 +   276.1    22 +   274.6    23 +   273.1    24 +   271.3
       25 +   269.7    26 +   268.2    27 +   266.7    28 +   265.2
       29 +   263.3    30 +   261.8    31 +   260.3    32 +   258.5
       33 +   256.6    34 +   255.1    35 +   253.6    36 +   252.1
       37 +   250.5    38 +   249.6    39 +   249.0    40 +   248.4
       41 +   247.5    42 +   246.3    43 +   245.4    44 +   244.4
       45 +   243.5    46 +   240.2    47 +   239.3    48 +   240.2
       49 +   236.8    50 +   236.2    51 +   235.9    52 +   235.6
       53 +   235.0    54 +   233.8    55 +   232.9    56 +   232.0
       57 +   231.0    58 +   230.1    59 +   229.5    60 +   228.9
       61 +   228.0    62 +   226.2    63 +   225.2    64 +   224.3
       65 +   222.8    66 +   221.6    67 +   220.7    68 +   219.8
       69 +   218.8    70 +   218.2    71 +   217.6    72 +   217.3
       73 +   216.4    74 +   215.2    75 +   214.3    76 +   214.0
       77 +   214.3    78 +   214.9    79 +   215.8    80 +   216.4
       81 +   216.7    82 +   216.7    83 +   216.7    84 +   217.3
       85 +   217.6    86 +   218.8    87 +   220.4    88 +   222.8
       89 +   223.1    90 +   221.6    91 +   220.7    92 +   219.8
       93 +   218.8    94 +   217.0    95 +   213.4    96 +   210.0
       97 +   206.7    98 +   203.6    99 +   201.8   100 +   199.6
      101 +   199.6   102 +   198.7   103 +   197.2   104 +   194.2
      105 +   192.0   106 +   189.0   107 +   186.8   108 +   184.4
      109 +   182.3   110 +   180.1   111 +   178.9   112 +   177.7
      113 +   176.5   114 +   175.6   115 +   174.3   116 +   173.4
      117 +   172.5   118 +   171.9   119 +   171.0   120 +   170.1
      121 +   169.8   122 +   169.5   123 +   168.9   124 +   167.9
      125 +   166.1   126 +   167.0   127 +   167.6   128 +   170.1
      129 +   173.4   130 +   175.3   131 +   175.6   132 +   176.2
      133 +   176.2   134 +   176.2   135 +   175.6   136 +   175.0
      137 +   173.4   138 +   170.1
 DATUM 170
 SPD R0,86
 EVELX 1+1400
 TUH R0,86
/GATH
/OUTPUT
*********************************************************************
*
*    JOB 2 OF 2
*
*     STACK CDP GATHERS AND DISPLAY RESULT
*
*********************************************************************
JOBNEFS3
/JOB A 'COALINGA 3 STACK VEL1.2'
/INPUT
     FORMAT SEGY
     DATA 2 20000 8 26 0    (MAX FOLD IS 26)  (TWO PLOT WIDTH)
     DENS HI
        REEL 0493
        REEL 1175
            BI 106 EI 322
/MUTE FMUTE 120,  526+200, 1495+400, 6743+2900 (PRE-NMO)
   TAPER 128
/STATICS
/TAB AVGAMP 1
     WINDOW 500
     PCT 100
/VELOCITY VEL 5 111 5  600+2600    (VEL 1.2--83/4/7)
                      1300+3000
                      1980+3700
                      2540+6000
                     10000+8000    (MANTLE)
        VEL 27 155 8   800+2400
                      1850+3000
                      2000+3200
                      2350+3600
                      3300+4000
                      4000+4500
                      4550+5000
                      5700+7000
        VEL 52 205 8  1300+2600
                      2100+3000
                      2460+3300
                      2700+3600
                      3800+4000
                      4900+4500
                      6460+5000
                     10000+8000  (MANTLE)
        VEL 102 305 4 1300+2600
                      2100+3000
                      7000+6000
                     12000+8000  (MANTLE)
/NMO
/MUTE FMUTE 111,  526+150, 1290+620     (POST-NMO VER 2.1-STRONG)
      FMUTE 155,  794+200, 1586+350
                 2642+1140, 3434+1730, 4496+2000, 5286+2530, 6686+2880
      FMUTE 205,  666+250, 1460+920, 2252+1180,
                 3313+1980, 3847+2250, 4913+2560, 5712+2750, 6511+3080
      FMUTE 250,  666+250, 1460+920, 2252+1180, (COPY OF 205)
                 3313+1980, 3847+2250, 4913+2560, 5712+2750, 6511+3080
      FMUTE 305  4800+1820, 5862+2200, 6662+2600
      TAPER 128
/STACK
/DISPLAY MODE VAW
   HORZ 20 VERT 1.5     (1:1 AT 4 KM/SEC)
   TRLIST D121,221,1
   LISTN D10,110,1
   ANNOTATE CDP ANY 10
   TIMELINE 200,1000,5000
   DESC 'COAL. LINE 3 VAR. VEL. STACK   --VEL VER 1.2  MUTE VER 2.1'
   TIE 351 (BEYOND END OF LINE)
   LINETIE '1'
   SP '134'
/OUTPUT
