! shift_and_add.init
! ==================
!
! Identification of shared memory (Dont touch at this !) 
!
TASK\INTEGER   "Data    shared memory identifier" DATA_SHMID$ DATA_SHMID
!
! General parameters (Dont touch at this !)
!
TASK\INTEGER   "Number of subscans" NSUBSCAN$        nsubscan
TASK\INTEGER   "Number of records" NRECORD$          nrecord
TASK\INTEGER   "Selected scan number" SCAN_NUMBER$   scan
TASK\INTEGER   "Type of selected scan" SCAN_TYPE$    scan_type
TASK\INTEGER   "Number of available channels" NCHAN$ nchan
TASK\LOGICAL   "Jansky flag" JANSKY_FLAG$  jansky_flag
TASK\REAL      "Effective observing frequency" FREQUENCY$  frequency
!
! Shift_and_add parameters
!
TASK\CHARACTER "Name of the source" SNAM$     'source'
TASK\REAL      "Source lambda position (deg)"       SLAM$  lambda
TASK\REAL      "Source beta position (deg)"         SBET$  beta
TASK\REAL      "Epoch"  EPOCH$ epoch
TASK\REAL      "Latitude"  SITE_LATITUDE$     site_latitude
TASK\REAL      "Offset start position in Azimuth (deg)"   OAZM$   oazm
TASK\REAL      "Offset start position in Elevation (deg)" OELV$   oelv
TASK\REAL      "Spacing in Azimuth (arcsec)"              XINC$   map_cell[1]
TASK\REAL      "Spacing in Elevation (arcsec)"            YINC$   map_cell[2] 
TASK\REAL      "Intersubscan spacing in Elevation (arcsec)" SINT$ sint 
TASK\REAL      "Zigzag offset (arcsec)"                   ZIGZAG$ zigzag
TASK\LOGICAL   "Flip image (true/false)"                  FLIP$   flip
TASK\LOGICAL   "Smooth in elevation (true/false)"       SMOOTH_EL$ smooth_el
TASK\INTEGER   "Taper (Parabolic=0, Gaussian=1, Linear=2)" FUNCTION$ taper
TASK\REAL      "Beam separation (in arcseconds)" BEAMSEP$   beamsep
TASK\REAL      "Unbalanced factor (between 2 beams)" UNBAL$   unbal
TASK\REAL      "Position Angle" PA$   pa
TASK\REAL      "Offset (x coordinate) " OFFX$  offset[1]
TASK\REAL      "Offset (y coordinate) " OFFY$  offset[2]
TASK\LOGICAL   "Shift and add with mask " SAA_MASK$  'saa_mask'
TASK\CHARACTER "Name of the telescope" TELESCOPE$     'telescope'
TASK\INTEGER   "Reference channel" REF_CHAN$ ref_chan
TASK\INTEGER   "Field rotation (+1, -1, 0)" FIELD_ROTATION$ field_rotation
!
TASK\GO