VEX_rev = 1.5;
*    SCHED vers: Release 11.6; April 2020
*    VEX/SCHED:  1.5.87
*    Other versions: Sched:  11.6  Plot: 1.06  JPL-ephem: 0.00
*------------------------------------------------------------------------------
$GLOBAL;
     ref $EXPER = RSO04;
     ref $EOP = EOP162;
*                                                      +------------+
*                         PI revision number:          |    3.0000  |
*                                                      +------------+
*------------------------------------------------------------------------------
$EXPER;
*
def RSO04;
     exper_name = RSO04;
     exper_description = "SRT M-band test";
     PI_name = "Gabor Orosz";
     PI_email = orosz@jive.eu;
*    address:   JIVE
*               Oude Hoogeveensedijk 4
*               Dwingeloo
*               Netherlands
*    phone:     +31 521 596 530
*    during obs: 
*    fax:        
*    notes:     Sr,Jb,Ir/Ib 5cm 128 Mbps
*               J2202+4216, 3 ftp fringe-test transfers
*               masers: W3OH (very strong), G85 (mid-flare)
*               v3 - single Doppler mode
*
*    year, doy: 2025, 165
*    date     : Sat 14 Jun 2025
*    MJD      : 60840
     exper_nominal_start=2025y165d08h00m00s;
     exper_nominal_stop=2025y165d09h00m00s;
*
*-------------------- cover  letter --------------------
*
*This is the schedule for a 5cm FTP-FT on June 14, 2025 for
*SRT M-band test, involving 3 antennas: Sr Jb2 Ir/Ib.
*
*Uses a standard 128 Mbps setup (8BBC/4MHz/dual).
*Scheduled time is 1 hour on 14/06 at 08:00-09:00 UT.
*
*The schedule consists of
*- 4 scans on J2202+4216 at the start/middle/end, a 5 Jy fringe finder
*- 2 scans on W3OH at the start and end, 3000 Jy maser (-44 km/s)
*- 6 scans on G85 padding the schedule, 50 Jy flaring maser (-30 km/s)
*- 2 scans on J2102+4702 to inv phase-reference G85 (100 mJy)
*
*2-sec ftp-fringe segments on J2202+4216 are scheduled as follows:
*08:04:00 (scan  2)
*08:35:00 (scan  8)
*08:53:00 (scan 13)
*
*--
*Mattermost: coms.evlbi.org
*
*------------------------- end -------------------------
*
     target_correlator = JIVE;
*
*    integr_time    :     2.000 s
*    number_channels:     8
*    number_antenna :  3
*    cross_polarize : Yes
*    weight_func    : UNIFORM
*    distrib_medium : FTP
*    distrib_format : FITS
*    source_pos_cat : STANDARD
*    distribute_to  : 
*                     jive
*
enddef;
*------------------------------------------------------------------------------
$MODE;
*
def sess225.M128line;
     ref $PROCEDURES = Mode_01;
     ref $FREQ = 6663.49MHz8x4MHz:Jb:Ir:Ib:Sr;
     ref $IF = LO@7438MHzDPolNoTone:Jb;
     ref $IF = LO@5902MHzDPolNoTone:Ir:Ib;
     ref $IF = LO@6414MHzDPolNoTone:Sr;
     ref $BBC = 8BBCs:Jb;
     ref $BBC = 8BBCs#02:Ir:Ib:Sr;
     ref $TRACKS = VDIF.8Ch2bit1to1:Jb:Ir:Ib:Sr;
     ref $THREADS = IbThreads:Sr:Ir:Ib;
     ref $THREADS = JbThreads:Jb;
*    ref $HEAD_POS = DiskVoid <= obsolete definition
     ref $ROLL = NoRoll:Jb:Ir:Ib:Sr;
*    ref $PASS_ORDER = DiskVoid <= obsolete definition
     ref $PHASE_CAL_DETECT = NoDetect:Jb:Ir:Ib:Sr;
enddef;
*
def Doppler@G85;
     ref $PROCEDURES = Mode_02;
     ref $FREQ = 6663.87MHz8x4MHz:Jb:Ir:Ib:Sr;
     ref $IF = LO@7438MHzDPolNoTone:Jb;
     ref $IF = LO@5902MHzDPolNoTone:Ir:Ib;
     ref $IF = LO@6414MHzDPolNoTone:Sr;
     ref $BBC = 8BBCs:Jb;
     ref $BBC = 8BBCs#02:Ir:Ib:Sr;
     ref $TRACKS = VDIF.8Ch2bit1to1:Jb:Ir:Ib:Sr;
     ref $THREADS = IbThreads:Ib:Sr:Ir;
     ref $THREADS = JbThreads:Jb;
*    ref $HEAD_POS = DiskVoid <= obsolete definition
     ref $ROLL = NoRoll:Jb:Ir:Ib:Sr;
*    ref $PASS_ORDER = DiskVoid <= obsolete definition
     ref $PHASE_CAL_DETECT = NoDetect:Jb:Ir:Ib:Sr;
enddef;
*------------------------------------------------------------------------------
$STATION;
*
def Jb;
     ref $SITE = JODRELL2;
     ref $ANTENNA = JODRELL2;
     ref $DAS = 2DBBC+NONE<;
     ref $TAPELOG_OBS = JB;
     ref $CLOCK = JB;
enddef;
*
def Ir;
     ref $SITE = IRBENE;
     ref $ANTENNA = IRBENE;
     ref $DAS = 2DBBC+NONE<;
     ref $TAPELOG_OBS = IR;
     ref $CLOCK = IR;
enddef;
*
def Ib;
     ref $SITE = IRBENE16;
     ref $ANTENNA = IRBENE16;
     ref $DAS = 2DBBC+NONE<;
     ref $TAPELOG_OBS = IB;
     ref $CLOCK = IB;
enddef;
*
def Sr;
     ref $SITE = SARDINIA;
     ref $ANTENNA = SARDINIA;
     ref $DAS = 2DBBC+NONE<;
     ref $TAPELOG_OBS = SR;
     ref $CLOCK = SR;
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;
*
def Mode_02;
     procedure_name_prefix =  "02";
     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 JODRELL2;
     site_type = fixed;
     site_name = JODRELL2;
     site_ID = Jb;
*    elev=  143.77 long= 002:18:14. lat= 53:14:02.3
*    site_position = 3822846.76000 m: -153802.28000 m: 5086285.90000 m;
     site_position = 3822846.42714 m: -153801.79521 m: 5086286.16487 m;
*    First line below is VEX standard format.  Use only when readers are ready.
enddef;
*
def IRBENE;
     site_type = fixed;
     site_name = IRBENE;
     site_ID = Ir;
*    elev=   59.51 long=-021:51:17. lat= 57:33:12.2
*    site_position = 3183649.34100 m: 1276902.98500 m: 5359264.71500 m;
     site_position = 3183649.18161 m: 1276903.10587 m: 5359264.78088 m;
*    First line below is VEX standard format.  Use only when readers are ready.
enddef;
*
def IRBENE16;
     site_type = fixed;
     site_name = IRBENE16;
     site_ID = Ib;
*    elev=   50.12 long=-021:50:50. lat= 57:33:33.5
*    site_position = 3183295.00000 m: 1276276.00000 m: 5359611.00000 m;
     site_position = 3183295.00000 m: 1276276.00000 m: 5359611.00000 m;
*    First line below is VEX standard format.  Use only when readers are ready.
enddef;
*
def SARDINIA;
     site_type = fixed;
     site_name = SARDINIA;
     site_ID = Sr;
*    elev=  671.47 long=-009:14:42. lat= 39:29:35.0
*    site_position = 4865183.54200 m:  791922.25500 m: 4035136.02400 m;
     site_position = 4865183.23276 m:  791922.74597 m: 4035136.30041 m;
*    First line below is VEX standard format.  Use only when readers are ready.
enddef;
*------------------------------------------------------------------------------
$ANTENNA;
*
def JODRELL2;
     axis_type = az : el;
     antenna_motion = el :  20.0 deg/min :  2 sec;  *    0.022 deg/sec/sec
     antenna_motion = az :  20.0 deg/min :  2 sec;  *    0.016 deg/sec/sec
     pointing_sector = &ccw  : az : -90.00 deg: -30.00 deg: el :  1.00 deg: 90.00 deg; * CWZ 1
     pointing_sector = &n    : az : -30.00 deg: 270.00 deg: el :  1.00 deg: 90.00 deg; * CWZ 2
     pointing_sector = &cw   : az : 270.00 deg: 330.00 deg: el :  1.00 deg: 90.00 deg; * CWZ 3
     axis_offset = 0.45800 m;
enddef;
*
def IRBENE;
     axis_type = az : el;
     antenna_motion = el : 100.0 deg/min :  3 sec;  *    0.900 deg/sec/sec
     antenna_motion = az : 120.0 deg/min :  3 sec;  *    1.400 deg/sec/sec
     pointing_sector = &ccw  : az :-320.00 deg: -40.00 deg: el :  5.00 deg: 90.00 deg; * CWZ 1
     pointing_sector = &n    : az : -40.00 deg:  40.00 deg: el :  5.00 deg: 90.00 deg; * CWZ 2
     pointing_sector = &cw   : az :  40.00 deg: 320.00 deg: el :  5.00 deg: 90.00 deg; * CWZ 3
     axis_offset = 0.00000 m;
enddef;
*
def IRBENE16;
     axis_type = az : el;
     antenna_motion = el : 100.0 deg/min :  3 sec;  *    1.300 deg/sec/sec
     antenna_motion = az : 120.0 deg/min :  3 sec;  *    1.500 deg/sec/sec
     pointing_sector = &ccw  : az :-320.00 deg: -40.00 deg: el :  3.00 deg: 90.00 deg; * CWZ 1
     pointing_sector = &n    : az : -40.00 deg:  40.00 deg: el :  3.00 deg: 90.00 deg; * CWZ 2
     pointing_sector = &cw   : az :  40.00 deg: 320.00 deg: el :  3.00 deg: 90.00 deg; * CWZ 3
     axis_offset = 0.00000 m;
enddef;
*
def SARDINIA;
     axis_type = az : el;
     antenna_motion = el :  30.0 deg/min :  3 sec;  *    0.180 deg/sec/sec
     antenna_motion = az :  51.0 deg/min :  3 sec;  *    0.300 deg/sec/sec
     pointing_sector = &ccw  : az : -90.00 deg:  90.00 deg: el :  6.00 deg: 87.00 deg; * CWZ 1
     pointing_sector = &n    : az :  90.00 deg: 270.00 deg: el :  6.00 deg: 87.00 deg; * CWZ 2
     pointing_sector = &cw   : az : 270.00 deg: 450.00 deg: el :  6.00 deg: 87.00 deg; * CWZ 3
     axis_offset = 0.03100 m;
enddef;
*------------------------------------------------------------------------------
$DAS;
*
def 2DBBC+NONE<;
     record_transport_type = Mark5C;
     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 G85;
     source_name = G85;
*    this source had calibrator code:  
     ra = 20h54m13.6890000s; dec =  44d54'07.686000"; ref_coord_frame = J2000;
*    ra = 20h52m28.1615420s; dec =  44d42'40.037765"; ref_coord_frame = B1950;
*    ra = 20h55m08.3106839s; dec =  44d59'42.733815"; ref_coord_frame = Date;
*    velocity_wrt_LSR =     -30.00 km/sec; * warning, only given here for 1st channel
*    calculations used radio definition 
enddef;
*
def W3OH;
     source_name = W3OH;
*    this source had calibrator code:  
     ra = 02h27m03.8190000s; dec =  61d52'25.390000"; ref_coord_frame = J2000;
*    ra = 02h23m16.4424912s; dec =  61d38'57.918857"; ref_coord_frame = B1950;
*    ra = 02h28m57.8321108s; dec =  61d59'05.066131"; ref_coord_frame = Date;
*    velocity_wrt_LSR =     -44.00 km/sec; * warning, only given here for 1st channel
*    calculations used radio definition 
enddef;
*
def J2102+4702;
     source_name = J2102+4702;
*    this source had calibrator code: V
*    alternate source name: 2100+468
*    alternate source name: J2102+47
*    GSFC 2016a X/S astro solution,     41 observations.
     ra = 21h02m17.0560741s; dec =  47d02'16.253377"; ref_coord_frame = J2000;
*    ra = 21h00m33.5001665s; dec =  46d50'23.376406"; ref_coord_frame = B1950;
*    ra = 21h03m10.6244935s; dec =  47d08'03.564322"; ref_coord_frame = Date;
enddef;
*
def J2202+4216;
     source_name = J2202+4216;
*    this source had calibrator code: V
*    alternate source name: VR422201
*    alternate source name: BLLAC
*    alternate source name: 2200+420
*    alternate source name: J2202+42
*    GSFC 2016a X/S astro solution,  52189 observations.
     ra = 22h02m43.2913710s; dec =  42d16'39.979885"; ref_coord_frame = J2000;
*    ra = 22h00m39.3625044s; dec =  42d02'08.590749"; ref_coord_frame = B1950;
*    ra = 22h03m46.7966091s; dec =  42d23'48.629254"; ref_coord_frame = Date;
enddef;
*------------------------------------------------------------------------------
$FREQ;
*
def 6663.49MHz8x4MHz;
* mode =  1    stations =Jb:Ir:Ib:Sr
     sample_rate =     8.000 Ms/sec;  * (2bits/sample)
     chan_def = :  6663.49 MHz : L :   4.00 MHz : &CH01 : &BBC01 : &NoCal; *Rcp
     chan_def = :  6663.49 MHz : L :   4.00 MHz : &CH02 : &BBC09 : &NoCal; *Lcp
     chan_def = :  6663.49 MHz : U :   4.00 MHz : &CH03 : &BBC01 : &NoCal; *Rcp
     chan_def = :  6663.49 MHz : U :   4.00 MHz : &CH04 : &BBC09 : &NoCal; *Lcp
     chan_def = :  6671.49 MHz : L :   4.00 MHz : &CH05 : &BBC02 : &NoCal; *Rcp
     chan_def = :  6671.49 MHz : L :   4.00 MHz : &CH06 : &BBC10 : &NoCal; *Lcp
     chan_def = :  6671.49 MHz : U :   4.00 MHz : &CH07 : &BBC02 : &NoCal; *Rcp
     chan_def = :  6671.49 MHz : U :   4.00 MHz : &CH08 : &BBC10 : &NoCal; *Lcp
enddef;
*
def 6663.87MHz8x4MHz;
* mode =  2    stations =Jb:Ir:Ib:Sr
     sample_rate =     8.000 Ms/sec;  * (2bits/sample)
     chan_def = :  6663.88 MHz : L :   4.00 MHz : &CH01 : &BBC01 : &NoCal; *Rcp
     chan_def = :  6663.88 MHz : L :   4.00 MHz : &CH02 : &BBC09 : &NoCal; *Lcp
     chan_def = :  6663.88 MHz : U :   4.00 MHz : &CH03 : &BBC01 : &NoCal; *Rcp
     chan_def = :  6663.88 MHz : U :   4.00 MHz : &CH04 : &BBC09 : &NoCal; *Lcp
     chan_def = :  6671.88 MHz : L :   4.00 MHz : &CH05 : &BBC02 : &NoCal; *Rcp
     chan_def = :  6671.88 MHz : L :   4.00 MHz : &CH06 : &BBC10 : &NoCal; *Lcp
     chan_def = :  6671.88 MHz : U :   4.00 MHz : &CH07 : &BBC02 : &NoCal; *Rcp
     chan_def = :  6671.88 MHz : U :   4.00 MHz : &CH08 : &BBC10 : &NoCal; *Lcp
enddef;
*------------------------------------------------------------------------------
$IF;
*
def LO@7438MHzDPolNoTone;
* mode =  1    stations =Jb
* mode =  2    stations =Jb
     if_def = &IF_A2 : A2 : R :  7438.00 MHz : L ; * PCall off!   0.0   0.0  NA     0 NA
     if_def = &IF_B2 : B2 : L :  7438.00 MHz : L ; * PCall off!   0.0   0.0  NA     0 NA
enddef;
*
def LO@6414MHzDPolNoTone;
* mode =  1    stations =Sr
* mode =  2    stations =Sr
     if_def = &IF_A1 : A1 : R :  6414.00 MHz : U ; * PCall off!   0.0   0.0  NA     0 NA
     if_def = &IF_C1 : C1 : L :  6414.00 MHz : U ; * PCall off!   0.0   0.0  NA     0 NA
enddef;
*
def LO@5902MHzDPolNoTone;
* mode =  1    stations =Ir:Ib
* mode =  2    stations =Ir:Ib
     if_def = &IF_A1 : A1 : R :  5902.00 MHz : U ; * PCall off!   0.0   0.0  NA     0 NA
     if_def = &IF_C1 : C1 : L :  5902.00 MHz : U ; * PCall off!   0.0   0.0  NA     0 NA
enddef;
*------------------------------------------------------------------------------
$BBC;
*
def 8BBCs;
* mode =  1    stations =Jb
* mode =  2    stations =Jb
     BBC_assign = &BBC01 :  1 : &IF_A2;
     BBC_assign = &BBC09 :  9 : &IF_B2;
     BBC_assign = &BBC02 :  2 : &IF_A2;
     BBC_assign = &BBC10 : 10 : &IF_B2;
enddef;
*
def 8BBCs#02;
* mode =  1    stations =Ir:Ib:Sr
* mode =  2    stations =Ir:Ib:Sr
     BBC_assign = &BBC01 :  1 : &IF_A1;
     BBC_assign = &BBC09 :  9 : &IF_C1;
     BBC_assign = &BBC02 :  2 : &IF_A1;
     BBC_assign = &BBC10 : 10 : &IF_C1;
enddef;
*------------------------------------------------------------------------------
$PHASE_CAL_DETECT;
*
def NoDetect;
* mode =  1    stations =Jb:Ir:Ib:Sr
* mode =  2    stations =Jb:Ir:Ib:Sr
     phase_cal_detect = &NoCal;
enddef;
*------------------------------------------------------------------------------
$TRACKS;
*
def VDIF.8Ch2bit1to1;
* mode =  1    stations =Jb:Ir:Ib:Sr
* mode =  2    stations =Jb:Ir:Ib:Sr
*    firmware_type = DBBC_DDC;
*    format = VDIF, and fan-out = 1
*    mode requires   8.00Mb/s/tr; stations using disks
     track_frame_format = VDIF5032;
     fanout_def =   : &CH01 : sign : 1:  1;
     fanout_def =   : &CH01 :  mag : 1:  1;
     fanout_def =   : &CH02 : sign : 1:  2;
     fanout_def =   : &CH02 :  mag : 1:  2;
     fanout_def =   : &CH03 : sign : 1:  3;
     fanout_def =   : &CH03 :  mag : 1:  3;
     fanout_def =   : &CH04 : sign : 1:  4;
     fanout_def =   : &CH04 :  mag : 1:  4;
     fanout_def =   : &CH05 : sign : 1:  5;
     fanout_def =   : &CH05 :  mag : 1:  5;
     fanout_def =   : &CH06 : sign : 1:  6;
     fanout_def =   : &CH06 :  mag : 1:  6;
     fanout_def =   : &CH07 : sign : 1:  7;
     fanout_def =   : &CH07 :  mag : 1:  7;
     fanout_def =   : &CH08 : sign : 1:  8;
     fanout_def =   : &CH08 :  mag : 1:  8;
enddef;
*------------------------------------------------------------------------------
*$BITSTREAMS;
*
*------------------------------------------------------------------------------
$THREADS;
*
def JbThreads;
*   Stations = Jb
*   Modes = Doppler@G85, sess225.M128line
  format = VDIF : : 128;
  thread = 0 : 1 : 1 : 128 : 8 : 2 : : : 8000;
  channel = &CH01 : 0 : 0;
  channel = &CH02 : 0 : 2;
  channel = &CH03 : 0 : 4;
  channel = &CH04 : 0 : 6;
  channel = &CH05 : 0 : 1;
  channel = &CH06 : 0 : 3;
  channel = &CH07 : 0 : 5;
  channel = &CH08 : 0 : 7;
enddef;
*
def IbThreads;
*   Stations = Ib:Ir:Sr
*   Modes = Doppler@G85, sess225.M128line
  format = VDIF : : 128;
  thread = 0 : 1 : 1 : 128 : 8 : 2 : : : 8000;
  channel = &CH01 : 0 : 4;
  channel = &CH02 : 0 : 6;
  channel = &CH03 : 0 : 0;
  channel = &CH04 : 0 : 2;
  channel = &CH05 : 0 : 5;
  channel = &CH06 : 0 : 7;
  channel = &CH07 : 0 : 1;
  channel = &CH08 : 0 : 3;
enddef;
*------------------------------------------------------------------------------
$HEAD_POS;
def DiskVoid;
* mode =  1    stations =Jb:Ir:Ib:Sr
* mode =  2    stations =Jb:Ir:Ib:Sr
*     Head positions irrelevant for Disk: empty def
enddef;
*------------------------------------------------------------------------------
$PASS_ORDER;
*
def DiskVoid;
* mode =  1    stations =Jb:Ir:Ib:Sr
* mode =  2    stations =Jb:Ir:Ib:Sr
*     Pass orders irrelevant for Disk: empty def
enddef;
*------------------------------------------------------------------------------
$ROLL;
*
def NoRoll;
* mode =  1    stations =Jb:Ir:Ib:Sr
* mode =  2    stations =Jb:Ir:Ib:Sr
*    barrel-roll set to 'roll_off', so reverse-roll by  0 (1 head)
     roll = off;
enddef;
*------------------------------------------------------------------------------
$SCHED;
* schedule section for experiment RSO04   
* SRT M-band test                                                         
scan No0001;
     start=2025y165d08h00m00s; mode=Doppler@G85; source=J2202+4216;
*              :data_good:data_stop:goto_foot: pass:  wrap :driv:tape at
     station=Jb:    0 sec:  120 sec:    0.000 GB:   : &ccw  : 1;
     station=Ir:    0 sec:  120 sec:    0.000 GB:   : &ccw  : 1;
     station=Ib:    0 sec:  120 sec:    0.000 GB:   : &ccw  : 1;
     station=Sr:    0 sec:  120 sec:    0.000 GB:   : &ccw  : 1;
endscan;
scan No0002;
     start=2025y165d08h03m00s; mode=Doppler@G85; source=J2202+4216;
* ftp scan
     data_transfer=Jb: disk2file: RSO04_jb_No0002.m5a:   60 sec:   62 sec: ;
     data_transfer=Ir: disk2file: RSO04_ir_No0002.m5a:   60 sec:   62 sec: ;
     data_transfer=Ib: disk2file: RSO04_ib_No0002.m5a:   60 sec:   62 sec: ;
     data_transfer=Sr: disk2file: RSO04_sr_No0002.m5a:   60 sec:   62 sec: ;
     station=Jb:    0 sec:  120 sec:    1.932 GB:   : &ccw  : 1;
     station=Ir:    0 sec:  120 sec:    1.932 GB:   : &ccw  : 1;
     station=Ib:    0 sec:  120 sec:    1.932 GB:   : &ccw  : 1;
     station=Sr:    0 sec:  120 sec:    1.932 GB:   : &ccw  : 1;
endscan;
scan No0003;
     start=2025y165d08h08m00s; mode=Doppler@G85; source=W3OH;
     station=Jb:  207 sec:  300 sec:    3.865 GB:   : &n    : 1;
     station=Ir:    0 sec:  300 sec:    3.865 GB:   : &ccw  : 1;
     station=Ib:    0 sec:  300 sec:    3.865 GB:   : &ccw  : 1;
     station=Sr:    0 sec:  300 sec:    3.865 GB:   : &ccw  : 1;
endscan;
scan No0004;
     start=2025y165d08h18m30s; mode=Doppler@G85; source=G85;
     station=Jb:    5 sec:  225 sec:    8.695 GB:   : &ccw  : 1;
     station=Ir:    0 sec:  225 sec:    8.695 GB:   : &ccw  : 1;
     station=Ib:    0 sec:  225 sec:    8.695 GB:   : &ccw  : 1;
     station=Sr:    0 sec:  225 sec:    8.695 GB:   : &ccw  : 1;
endscan;
scan No0005;
     start=2025y165d08h22m30s; mode=Doppler@G85; source=G85;
     station=Jb:    0 sec:  225 sec:   12.318 GB:   : &ccw  : 1;
     station=Ir:    0 sec:  225 sec:   12.318 GB:   : &ccw  : 1;
     station=Ib:    0 sec:  225 sec:   12.318 GB:   : &ccw  : 1;
     station=Sr:    0 sec:  225 sec:   12.318 GB:   : &ccw  : 1;
endscan;
scan No0006;
     start=2025y165d08h26m30s; mode=Doppler@G85; source=J2102+4702;
     station=Jb:    8 sec:   60 sec:   15.941 GB:   : &ccw  : 1;
     station=Ir:    0 sec:   60 sec:   15.941 GB:   : &ccw  : 1;
     station=Ib:    0 sec:   60 sec:   15.941 GB:   : &ccw  : 1;
     station=Sr:    0 sec:   60 sec:   15.941 GB:   : &ccw  : 1;
endscan;
scan No0007;
     start=2025y165d08h27m45s; mode=Doppler@G85; source=G85;
     station=Jb:    8 sec:  225 sec:   16.908 GB:   : &ccw  : 1;
     station=Ir:    0 sec:  225 sec:   16.908 GB:   : &ccw  : 1;
     station=Ib:    0 sec:  225 sec:   16.908 GB:   : &ccw  : 1;
     station=Sr:    0 sec:  225 sec:   16.908 GB:   : &ccw  : 1;
endscan;
scan No0008;
     start=2025y165d08h33m00s; mode=Doppler@G85; source=J2202+4216;
* ftp scan
     data_transfer=Jb: disk2file: RSO04_jb_No0008.m5a:  120 sec:  122 sec: ;
     data_transfer=Ir: disk2file: RSO04_ir_No0008.m5a:  120 sec:  122 sec: ;
     data_transfer=Ib: disk2file: RSO04_ib_No0008.m5a:  120 sec:  122 sec: ;
     data_transfer=Sr: disk2file: RSO04_sr_No0008.m5a:  120 sec:  122 sec: ;
     station=Jb:    0 sec:  180 sec:   20.531 GB:   : &ccw  : 1;
     station=Ir:    0 sec:  180 sec:   20.531 GB:   : &ccw  : 1;
     station=Ib:    0 sec:  180 sec:   20.531 GB:   : &ccw  : 1;
     station=Sr:    0 sec:  180 sec:   20.531 GB:   : &ccw  : 1;
endscan;
scan No0009;
     start=2025y165d08h37m30s; mode=Doppler@G85; source=G85;
     station=Jb:    0 sec:  225 sec:   23.429 GB:   : &ccw  : 1;
     station=Ir:    0 sec:  225 sec:   23.429 GB:   : &ccw  : 1;
     station=Ib:    0 sec:  225 sec:   23.429 GB:   : &ccw  : 1;
     station=Sr:    0 sec:  225 sec:   23.429 GB:   : &ccw  : 1;
endscan;
scan No0010;
     start=2025y165d08h41m30s; mode=Doppler@G85; source=G85;
     station=Jb:    0 sec:  225 sec:   27.052 GB:   : &ccw  : 1;
     station=Ir:    0 sec:  225 sec:   27.052 GB:   : &ccw  : 1;
     station=Ib:    0 sec:  225 sec:   27.052 GB:   : &ccw  : 1;
     station=Sr:    0 sec:  225 sec:   27.052 GB:   : &ccw  : 1;
endscan;
scan No0011;
     start=2025y165d08h45m30s; mode=Doppler@G85; source=J2102+4702;
     station=Jb:    8 sec:   60 sec:   30.675 GB:   : &ccw  : 1;
     station=Ir:    0 sec:   60 sec:   30.675 GB:   : &ccw  : 1;
     station=Ib:    0 sec:   60 sec:   30.675 GB:   : &ccw  : 1;
     station=Sr:    0 sec:   60 sec:   30.675 GB:   : &ccw  : 1;
endscan;
scan No0012;
     start=2025y165d08h46m45s; mode=Doppler@G85; source=G85;
     station=Jb:    8 sec:  225 sec:   31.641 GB:   : &ccw  : 1;
     station=Ir:    0 sec:  225 sec:   31.641 GB:   : &ccw  : 1;
     station=Ib:    0 sec:  225 sec:   31.641 GB:   : &ccw  : 1;
     station=Sr:    0 sec:  225 sec:   31.641 GB:   : &ccw  : 1;
endscan;
scan No0013;
     start=2025y165d08h52m00s; mode=Doppler@G85; source=J2202+4216;
* ftp scan
     data_transfer=Jb: disk2file: RSO04_jb_No0013.m5a:   60 sec:   62 sec: ;
     data_transfer=Ir: disk2file: RSO04_ir_No0013.m5a:   60 sec:   62 sec: ;
     data_transfer=Ib: disk2file: RSO04_ib_No0013.m5a:   60 sec:   62 sec: ;
     data_transfer=Sr: disk2file: RSO04_sr_No0013.m5a:   60 sec:   62 sec: ;
*              :data_good:data_stop:goto_foot: pass:  wrap :driv:tape at
     station=Jb:    0 sec:  120 sec:   35.264 GB:   : &ccw  : 1;
     station=Ir:    0 sec:  120 sec:   35.264 GB:   : &ccw  : 1;
     station=Ib:    0 sec:  120 sec:   35.264 GB:   : &ccw  : 1;
     station=Sr:    0 sec:  120 sec:   35.264 GB:   : &ccw  : 1;
endscan;
scan No0014;
     start=2025y165d08h57m00s; mode=Doppler@G85; source=W3OH;
     station=Jb:   96 sec:  180 sec:   37.197 GB:   : &n    : 1;
     station=Ir:    0 sec:  180 sec:   37.197 GB:   : &ccw  : 1;
     station=Ib:    0 sec:  180 sec:   37.197 GB:   : &ccw  : 1;
     station=Sr:    0 sec:  180 sec:   37.197 GB:   : &ccw  : 1;
endscan;
*-------------------------------------------------------------------------------
$TAPELOG_OBS;       * Experiment: RSO04
*-------------------------------------------------------------------------------
*
*       drive#    VSN             start time          end time
  def IB;
    VSN = 1     : Ib-eVLBI : 2025y165d08h00m00s : 2025y165d09h00m00s;
  enddef;
*
  def IR;
    VSN = 1     : Ir-eVLBI : 2025y165d08h00m00s : 2025y165d09h00m00s;
  enddef;
*
  def JB;
    VSN = 1     : Jb-eVLBI : 2025y165d08h00m00s : 2025y165d09h00m00s;
  enddef;
*
  def SR;
    VSN = 1     : Sr-eVLBI : 2025y165d08h00m00s : 2025y165d09h00m00s;
  enddef;
*
*-------------------------------------------------------------------------------
$CLOCK;             * Experiment: RSO04
*-------------------------------------------------------------------------------
*
*                  valid from           clock_early    clock_early_epoch        rate
  def IB;
    clock_early = 2025y165d08h00m00s :  14.326 usec : 2025y165d08h30m00s : 2.04e-07 usec/sec;
  enddef;
*
  def IR;
    clock_early = 2025y165d08h00m00s :  14.348 usec : 2025y165d08h30m00s : 2.18e-07 usec/sec;
  enddef;
*
  def JB;
    clock_early =  2025y165d08h00m00s :  32.8523 usec :  2025y165d08h30m00s  :  2.520e-07 usec/sec; * Modified on 2025-06-14 10:13:32
*     clock_early = 2025y165d08h00m00s :  22.388 usec : 2025y165d08h30m00s : 2.52e-07 usec/sec;
  enddef;
*
  def SR;
    clock_early =  2025y165d08h00m00s :  0.7000 usec :  2025y165d08h30m00s  :  3.400e-08 usec/sec; * Modified on 2025-06-14 10:13:32
*     clock_early = 2025y165d08h00m00s :   0.700 usec : 2025y165d08h30m00s : 3.40e-08 usec/sec;
  enddef;
*-------------------------------------------------------------------------------
$EOP; * (Includes predicted values 3 days in advance) Experiment: RSO04
*-------------------------------------------------------------------------------
*
 def EOP162;
   TAI-UTC = 37 sec;
   eop_ref_epoch = 2025y162d00h00m00s;
   num_eop_points= 5;
   eop_interval  = 24 hr;
   ut1-utc   =  0.0308291 sec: 0.0317030 sec: 0.0326341 sec: 0.0335236 sec: 0.0342688 sec;
   x_wobble  =  0.127570 asec: 0.129029 asec: 0.130459 asec: 0.131996 asec: 0.133520 asec;
   y_wobble  =  0.442563 asec: 0.442867 asec: 0.443201 asec: 0.443315 asec: 0.443396 asec;
   num_nut_points= 5;
   delta_psi = -0.113485 asec:-0.113594 asec:-0.113601 asec:-0.113589 asec:-0.113636 asec;
   delta_eps = -0.011450 asec:-0.011346 asec:-0.011101 asec:-0.010904 asec:-0.010840 asec;
 enddef;
*-------------------------------------------------------------------------------