VEX_rev = 1.5;
*    SCHED vers: Release Jan. 13, 2011.
*    VEX/SCHED:  1.5.87
*    Other versions: Sched:   9.4  Plot: 1.06  JPL-ephem: 1.01
*    log2vex vers: 3.0.7, Release 12 may 2010
*    Run by jops at 09:40:58  08 Jul 2011
*------------------------------------------------------------------------------
$GLOBAL;
     ref $EXPER = FR008;
     ref $EOP = EOP187;
*                                                      +------------+
*                         PI revision number:          |    1.0000  |
*                                                      +------------+
*------------------------------------------------------------------------------
$EXPER;
*
def FR008;
     exper_name = FR008;
     exper_description = "Irbene DBBC fringe test (512)";
     PI_name = tester;
     PI_email = jops@jive.nl;
*    address:   JIVE
*               Postbus 2
*               7990 AA Dwingeloo
*               The Netherlands
*    phone:     +31-521-596548
*    during obs:+31-521-596548
*    fax:        
*    notes:     test
*
*    year, doy: 2011, 198
*    date     : Thu 7 Jul 2011
*    MJD      : 55749
     exper_nominal_start=2011y188d13h00m00s;
     exper_nominal_stop=2011y188d13h30m00s;
*
     target_correlator = JIVE;
*
*    integr_time    :     2.000 s
*    number_channels:    16
*    number_antenna : 2
*    cross_polarize : Yes
*    weight_func    : UNIFORM
*    distrib_medium : DAT
*    source_pos_cat : STANDARD
*    distribute_to  : 
*                     JIVE
*
enddef;
*------------------------------------------------------------------------------
$MODE;
*
def sess211.C512;
     ref $PROCEDURES = Mode_01;
     ref $FREQ = 4966.49MHz16x8MHz:Tr;
     ref $FREQ = 4966.49MHz16x8MHz#02:Ir;
     ref $IF = LO@4200MHzDPolTone/1:Tr;
     ref $IF = LO@4600MHzDPolTone/1:Ir;
     ref $BBC = 16BBCs:Tr;
     ref $BBC = 16BBCs#02:Ir;
     ref $TRACKS = MKIV.16Ch2bit1to2:Tr:Ir;
     ref $BITSTREAMS = irBTSM32:Ir;
*    ref $HEAD_POS = DiskVoid <= obsolete definition
     ref $ROLL = NoRoll:Tr:Ir;
*    ref $PASS_ORDER = DiskVoid <= obsolete definition
     ref $PHASE_CAL_DETECT = DsbDetect:Tr:Ir;
enddef;
*------------------------------------------------------------------------------
$STATION;
*
def Tr;
     ref $TAPELOG_OBS = TR;
     ref $CLOCK = TR;
     ref $SITE = TORUN;
     ref $ANTENNA = TORUN;
     ref $DAS = 2VLBA4+NONE<Mark5A;
enddef;
*
def Ir;
     ref $TAPELOG_OBS = IR;
     ref $CLOCK = IR;
     ref $SITE = IRBENE;
     ref $ANTENNA = IRBENE;
     ref $DAS = 2NONE<;
enddef;
*------------------------------------------------------------------------------
$PROCEDURES;
*
def Mode_01;
     procedure_name_prefix =  "01";
     tape_change =  420 sec;
     headstack_motion =    6 sec;
     new_source_command =    5 sec;
     new_tape_setup =   20 sec;
     setup_always = on :  20 sec;
     parity_check = off : 100 sec;
     tape_prepass = off : 600 sec;
     preob_cal  = on :  10 sec : preob;
     midob_cal  = on :  15 sec : midob;
     postob_cal = on :   0 sec : postob;
enddef;
*------------------------------------------------------------------------------
$SITE;
*
def TORUN;
     site_type = fixed;
     site_name = TORUN;
     site_ID = Tr;
*    elev=  133.61 long=-018:33:50. lat= 53:05:43.7
**   site_position = 3638558.5100    m: 1221969.7200    m: 5077036.7600    m;
     site_position = 3638558.2777    m: 1221969.9587    m: 5077036.8691    m;
*    First line below is VEX standard format.  Use only when readers are ready.
*    site_position_epoch = 1997y001d;
     horizon_map_az =  0.0 deg:360.0;
     horizon_map_el =  2.0 deg:  2.0;
enddef;
*
def IRBENE;
     site_type = fixed;
     site_name = IRBENE;
     site_ID = Ir;
*    elev=   87.30 long=-021:51:17. lat= 57:33:12.3
     site_position = 3183661.00000 m: 1276902.00000 m: 5359291.00000 m;
     site_velocity =  0.000000   m/yr:  0.000000   m/yr:  0.000000  m/yr;
*    First line below is VEX standard format.  Use only when readers are ready.
*    site_position_epoch = 1997y001d;
     site_position_epoch =   50449;
enddef;
*------------------------------------------------------------------------------
$ANTENNA;
*
def TORUN;
     axis_type = az : el;
     antenna_motion = el :  16.0 deg/min :  5 sec;  *    0.030 deg/sec/sec
     antenna_motion = az :  30.0 deg/min :  5 sec;  *    0.050 deg/sec/sec
     axis_offset =    0.00000 m;
enddef;
*
def IRBENE;
     axis_type = az : el;
     antenna_motion = el :  9.0 deg/min :  2 sec;  * 0.030 deg/sec/sec
     antenna_motion = az :  9.0 deg/min :  2 sec;  * 0.030 deg/sec/sec
     axis_offset =    0.00000 m;
enddef;
*------------------------------------------------------------------------------
$DAS;
*
def 2VLBA4+NONE<Mark5A;
     record_transport_type = Mark5A;
     electronics_rack_type = VLBA4;
     number_drives = 2;
     headstack = 1 :            : 0 ;
     headstack = 2 :            : 1 ;
     tape_motion = adaptive : 0 min: 0 min: 10 sec;
enddef;
*
def 2NONE<;
     record_transport_type = Mark5B;
     electronics_rack_type = DBBC;
     number_drives = 2;
     headstack = 1 :            : 0 ;
     headstack = 2 :            : 1 ;
     tape_motion = adaptive : 0 min: 0 min: 10 sec;
enddef;
*------------------------------------------------------------------------------
$SOURCE;
*
def 2007+777;
     source_name = 2007+777;
*    this source had calibrator code: V
*    alternate source name: J2005+7752
*    alternate source name: J2005+77
*    GSFC 2010a astro solution     15626 Observations
     ra = 20h05m30.9985300s; dec =  77d52'43.247560"; ref_coord_frame = J2000;
*    ra = 20h07m20.4302015s; dec =  77d43'58.123028"; ref_coord_frame = B1950;
*    ra = 20h05m10.7636138s; dec =  77d54'46.443401"; ref_coord_frame = Date;
enddef;
*------------------------------------------------------------------------------
$FREQ;
*
def 4966.49MHz16x8MHz;
* mode =  1    stations =Tr
     sample_rate =  16.000 Ms/sec;  * (2bits/sample)
     chan_def = :  4966.49 MHz : L :   8.00 MHz : &CH01 : &BBC01 : &L_Cal; *Rcp
     chan_def = :  4966.49 MHz : L :   8.00 MHz : &CH02 : &BBC02 : &L_Cal; *Lcp
     chan_def = :  4966.49 MHz : U :   8.00 MHz : &CH03 : &BBC01 : &L_Cal; *Rcp
     chan_def = :  4966.49 MHz : U :   8.00 MHz : &CH04 : &BBC02 : &L_Cal; *Lcp
     chan_def = :  4982.49 MHz : L :   8.00 MHz : &CH05 : &BBC03 : &L_Cal; *Rcp
     chan_def = :  4982.49 MHz : L :   8.00 MHz : &CH06 : &BBC04 : &L_Cal; *Lcp
     chan_def = :  4982.49 MHz : U :   8.00 MHz : &CH07 : &BBC03 : &L_Cal; *Rcp
     chan_def = :  4982.49 MHz : U :   8.00 MHz : &CH08 : &BBC04 : &L_Cal; *Lcp
     chan_def = :  4998.49 MHz : L :   8.00 MHz : &CH09 : &BBC05 : &L_Cal; *Rcp
     chan_def = :  4998.49 MHz : L :   8.00 MHz : &CH10 : &BBC06 : &L_Cal; *Lcp
     chan_def = :  4998.49 MHz : U :   8.00 MHz : &CH11 : &BBC05 : &L_Cal; *Rcp
     chan_def = :  4998.49 MHz : U :   8.00 MHz : &CH12 : &BBC06 : &L_Cal; *Lcp
     chan_def = :  5014.49 MHz : L :   8.00 MHz : &CH13 : &BBC07 : &L_Cal; *Rcp
     chan_def = :  5014.49 MHz : L :   8.00 MHz : &CH14 : &BBC08 : &L_Cal; *Lcp
     chan_def = :  5014.49 MHz : U :   8.00 MHz : &CH15 : &BBC07 : &L_Cal; *Rcp
     chan_def = :  5014.49 MHz : U :   8.00 MHz : &CH16 : &BBC08 : &L_Cal; *Lcp
enddef;
*
def 4966.49MHz16x8MHz#02;
* mode =  1    stations =Ir
     sample_rate =  16.000 Ms/sec;  * (2bits/sample)
     chan_def = :  4966.49 MHz : L :   8.00 MHz : &CH01 : &BBC01 : &L_Cal; *Lcp
     chan_def = :  4966.49 MHz : L :   8.00 MHz : &CH02 : &BBC05 : &L_Cal; *Lcp
     chan_def = :  4966.49 MHz : U :   8.00 MHz : &CH03 : &BBC01 : &L_Cal; *Lcp
     chan_def = :  4966.49 MHz : U :   8.00 MHz : &CH04 : &BBC05 : &L_Cal; *Lcp
     chan_def = :  4982.49 MHz : L :   8.00 MHz : &CH05 : &BBC02 : &L_Cal; *Lcp
     chan_def = :  4982.49 MHz : L :   8.00 MHz : &CH06 : &BBC06 : &L_Cal; *Lcp
     chan_def = :  4982.49 MHz : U :   8.00 MHz : &CH07 : &BBC02 : &L_Cal; *Lcp
     chan_def = :  4982.49 MHz : U :   8.00 MHz : &CH08 : &BBC06 : &L_Cal; *Lcp
     chan_def = :  4998.49 MHz : L :   8.00 MHz : &CH09 : &BBC03 : &L_Cal; *Lcp
     chan_def = :  4998.49 MHz : L :   8.00 MHz : &CH10 : &BBC07 : &L_Cal; *Lcp
     chan_def = :  4998.49 MHz : U :   8.00 MHz : &CH11 : &BBC03 : &L_Cal; *Lcp
     chan_def = :  4998.49 MHz : U :   8.00 MHz : &CH12 : &BBC07 : &L_Cal; *Lcp
     chan_def = :  5014.49 MHz : L :   8.00 MHz : &CH13 : &BBC04 : &L_Cal; *Lcp
     chan_def = :  5014.49 MHz : L :   8.00 MHz : &CH14 : &BBC08 : &L_Cal; *Lcp
     chan_def = :  5014.49 MHz : U :   8.00 MHz : &CH15 : &BBC04 : &L_Cal; *Lcp
     chan_def = :  5014.49 MHz : U :   8.00 MHz : &CH16 : &BBC08 : &L_Cal; *Lcp
enddef;
$IF;
*
def LO@4200MHzDPolTone/1;
* mode =  1    stations =Tr
     if_def = &IF_C : C : R :  4200.0 MHz : U : 1 MHz ;
     if_def = &IF_A : A : L :  4200.0 MHz : U : 1 MHz ;
enddef;
*
def LO@4600MHzDPolTone/1;
* mode =  1    stations =Ir
     if_def = &IF_A : A : R :  4600.0 MHz : U : 1 MHz ;
     if_def = &IF_B : B : L :  4600.0 MHz : U : 1 MHz ;
enddef;
*------------------------------------------------------------------------------
$BBC;
*
def 16BBCs;
* mode =  1    stations =Tr
     BBC_assign = &BBC01 :  1 : &IF_C;
     BBC_assign = &BBC02 :  2 : &IF_A;
     BBC_assign = &BBC03 :  3 : &IF_C;
     BBC_assign = &BBC04 :  4 : &IF_A;
     BBC_assign = &BBC05 :  5 : &IF_C;
     BBC_assign = &BBC06 :  6 : &IF_A;
     BBC_assign = &BBC07 :  7 : &IF_C;
     BBC_assign = &BBC08 :  8 : &IF_A;
enddef;
*
def 16BBCs#02;
* mode =  1    stations =Ir
     BBC_assign = &BBC01 :  1 : &IF_A;
     BBC_assign = &BBC05 :  5 : &IF_B;
     BBC_assign = &BBC02 :  2 : &IF_A;
     BBC_assign = &BBC06 :  6 : &IF_B;
     BBC_assign = &BBC03 :  3 : &IF_A;
     BBC_assign = &BBC07 :  7 : &IF_B;
     BBC_assign = &BBC04 :  4 : &IF_A;
     BBC_assign = &BBC08 :  8 : &IF_B;
enddef;
*------------------------------------------------------------------------------
$PHASE_CAL_DETECT;
*
def DsbDetect;
* mode =  1    stations =Tr:Ir
     phase_cal_detect = &L_Cal : 1;
enddef;
*------------------------------------------------------------------------------
$BITSTREAMS;

def irBTSM32;
*   Stations = Ir
     stream_def = &CH01 : sign : 16:  16;
     stream_def = &CH01 :  mag : 17:  17;
     stream_def = &CH02 : sign : 24:  24;
     stream_def = &CH02 :  mag : 25:  25;
     stream_def = &CH03 : sign :  0:   0;
     stream_def = &CH03 :  mag :  1:   1;
     stream_def = &CH04 : sign :  8:   8;
     stream_def = &CH04 :  mag :  9:   9;
     stream_def = &CH05 : sign : 18:  18;
     stream_def = &CH05 :  mag : 19:  19;
     stream_def = &CH06 : sign : 26:  26;
     stream_def = &CH06 :  mag : 27:  27;
     stream_def = &CH07 : sign :  2:   2;
     stream_def = &CH07 :  mag :  3:   3;
     stream_def = &CH08 : sign : 10:  10;
     stream_def = &CH08 :  mag : 11:  11;
     stream_def = &CH09 : sign : 20:  20;
     stream_def = &CH09 :  mag : 21:  21;
     stream_def = &CH10 : sign : 28:  28;
     stream_def = &CH10 :  mag : 29:  29;
     stream_def = &CH11 : sign :  4:   4;
     stream_def = &CH11 :  mag :  5:   5;
     stream_def = &CH12 : sign : 12:  12;
     stream_def = &CH12 :  mag : 13:  13;
     stream_def = &CH13 : sign : 22:  22;
     stream_def = &CH13 :  mag : 23:  23;
     stream_def = &CH14 : sign : 30:  30;
     stream_def = &CH14 :  mag : 31:  31;
     stream_def = &CH15 : sign :  6:   6;
     stream_def = &CH15 :  mag :  7:   7;
     stream_def = &CH16 : sign : 14:  14;
     stream_def = &CH16 :  mag : 15:  15;
enddef;
*------------------------------------------------------------------------------
$TRACKS;
*
def MKIV.16Ch2bit1to2;
* mode =  1    stations =Tr:Ir
*    format = MKIV1:2, and fan-out = 2
*    mode requires   8.00Mb/s/tr; stations using disks
     track_frame_format = Mark4;
     data_modulation = off;
     fanout_def =   : &CH01 : sign : 1:  2:  4;
     fanout_def =   : &CH01 :  mag : 1:  6:  8;
     fanout_def =   : &CH02 : sign : 1: 10: 12;
     fanout_def =   : &CH02 :  mag : 1: 14: 16;
     fanout_def =   : &CH03 : sign : 1: 18: 20;
     fanout_def =   : &CH03 :  mag : 1: 22: 24;
     fanout_def =   : &CH04 : sign : 1: 26: 28;
     fanout_def =   : &CH04 :  mag : 1: 30: 32;
     fanout_def =   : &CH05 : sign : 1:  3:  5;
     fanout_def =   : &CH05 :  mag : 1:  7:  9;
     fanout_def =   : &CH06 : sign : 1: 11: 13;
     fanout_def =   : &CH06 :  mag : 1: 15: 17;
     fanout_def =   : &CH07 : sign : 1: 19: 21;
     fanout_def =   : &CH07 :  mag : 1: 23: 25;
     fanout_def =   : &CH08 : sign : 1: 27: 29;
     fanout_def =   : &CH08 :  mag : 1: 31: 33;
     fanout_def =   : &CH09 : sign : 2:  2:  4;
     fanout_def =   : &CH09 :  mag : 2:  6:  8;
     fanout_def =   : &CH10 : sign : 2: 10: 12;
     fanout_def =   : &CH10 :  mag : 2: 14: 16;
     fanout_def =   : &CH11 : sign : 2: 18: 20;
     fanout_def =   : &CH11 :  mag : 2: 22: 24;
     fanout_def =   : &CH12 : sign : 2: 26: 28;
     fanout_def =   : &CH12 :  mag : 2: 30: 32;
     fanout_def =   : &CH13 : sign : 2:  3:  5;
     fanout_def =   : &CH13 :  mag : 2:  7:  9;
     fanout_def =   : &CH14 : sign : 2: 11: 13;
     fanout_def =   : &CH14 :  mag : 2: 15: 17;
     fanout_def =   : &CH15 : sign : 2: 19: 21;
     fanout_def =   : &CH15 :  mag : 2: 23: 25;
     fanout_def =   : &CH16 : sign : 2: 27: 29;
     fanout_def =   : &CH16 :  mag : 2: 31: 33;
enddef;
*------------------------------------------------------------------------------
$HEAD_POS;
def DiskVoid;
* mode =  1    stations =Tr:Ir
*     Head positions irrelevant for Disk: empty def
enddef;
*------------------------------------------------------------------------------
$PASS_ORDER;
*
def DiskVoid;
* mode =  1    stations =Tr:Ir
*     Pass orders irrelevant for Disk: empty def
enddef;
*------------------------------------------------------------------------------
$ROLL;
*
def NoRoll;
* mode =  1    stations =Tr:Ir
*    barrel-roll set to 'roll_off', so reverse-roll by  0 (2 head)
     roll = off;
enddef;
*------------------------------------------------------------------------------
$SCHED;                       * Experiment: FR008
*-------------------------------------------------------------------------------
*
scan No0001;
      start=2011y188d13h00m00s; mode=sess211.C512; source=2007+777;
*               : data_good:   data_stop:  goto_startpos     :pass:wrp:drv;
      station=Tr:     0 sec:     600 sec:     0.000000000 GB :    :   : 1 ;
      station=Ir:     0 sec:     600 sec:     0.000000000 GB :    :   : 1 ;
endscan;
scan No0002;
      start=2011y188d13h20m00s; mode=sess211.C512; source=2007+777;
      station=Tr:     0 sec:     600 sec:    38.707000000 GB :    :   : 1 ;
      station=Ir:     0 sec:     600 sec:    38.707000000 GB :    :   : 1 ;
endscan;
*-------------------------------------------------------------------------------
$TAPELOG_OBS;       * Experiment: FR008
*-------------------------------------------------------------------------------
*
*       drive#    VSN             start time            end time
  def TR;
    VSN=  1      :Tr-eVLBI       :2011y188d13h00m00s   :2011y188d13h30m00s;
  enddef;
*
  def IR;
    VSN=  1      :Ir-eVLBI       :2011y188d13h00m00s   :2011y188d13h30m00s;
  enddef;
*
*
*---------------------------------------------------------------------------------------
$CLOCK;                  *  Experiment: FR008
*---------------------------------------------------------------------------------------
*
*                 valid from           clock_early      clock_early_epoch     rate

  def TR;
    clock_early=  2011y188d13h00m00s :  10.358 usec :  2011y188d13h15m00s  :   6.39e-07;
  enddef;
*

*
* No clockinfo available
*
  def IR;
*    clock_early=  2011y188d13h00m00s :   948.000 usec :  2011y188d13h15m00s  :   0.00e+00;
   clock_early=  2011y188d13h00m00s :   0.000 usec :  2011y188d13h15m00s  :   0.00e+00;
  enddef;
*
*-------------------------------------------------------------------------------
$EOP; * (Predicted value's)           Experiment: FR008
*-------------------------------------------------------------------------------
*
 def EOP187;
   TAI-UTC = 34 sec;
   eop_ref_epoch = 2011y187d00h00m00s;
   num_eop_points= 3;
   eop_interval  = 24 hr;
   ut1-utc   = -0.2922102 sec: -0.2929269 sec: -0.2935842 sec;
   x_wobble  =  0.053102 asec:  0.054755 asec:  0.056407 asec;
   y_wobble  =  0.436946 asec:  0.437318 asec:  0.437666 asec;
   delta_psi = -0.072433 asec: -0.072909 asec: -0.073138 asec;
   delta_eps = -0.010667 asec: -0.010583 asec: -0.010571 asec;
 enddef;
*
*-------------------------------------------------------------------------------
ÿ