!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!
! ASTRO specific definitions
!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!
! Observatory and time initialization
!
astro\set dut1 -0.6    ! November 2008 Bulletin D 101 of IERS
astro\set dtdt 66.184  ! January 2009  Bulletin C 36 of IERS
		       ! UTC-TAI = -34 sec 
		       ! TDT-TAI = 32.184 sec 
!
astro\observatory      ! Select default observatory
astro\time 	       ! Use current system time
!
astro\catalog gag_data:molecules.dat /line
if (observatory.eq."BURE".or.observatory.eq."NOEMA") then
   astro\set azimuth south
   astro\catalog gag_data:phase-pdb
   sic\message i site "Plateau de Bure defaults selected"
else if (observatory.eq."PICOVELETA") then
   astro\set azimuth north
   sic\message i site "Pico Veleta defaults selected"
else
   sic\message i site "No known defaults for this observatory"
endif
!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
