! Column kind of the uv tables integer(kind=4), parameter :: code_type_r4 = 1 ! Real number integer(kind=4), parameter :: code_type_r8 = 2 ! Doubleprecision number ! integer(kind=4), parameter :: code_follow = -1 ! Column is a follower of the previous one integer(kind=4), parameter :: code_uvt_u = 1 ! u integer(kind=4), parameter :: code_uvt_v = 2 ! v integer(kind=4), parameter :: code_uvt_w = 3 ! w integer(kind=4), parameter :: code_uvt_date = 4 ! Date integer(kind=4), parameter :: code_uvt_time = 5 ! Time integer(kind=4), parameter :: code_uvt_anti = 6 ! Antenna i integer(kind=4), parameter :: code_uvt_antj = 7 ! Antenna j integer(kind=4), parameter :: code_uvt_scan = 8 ! Scan number integer(kind=4), parameter :: code_uvt_fobs = 9 ! Observatory frequency integer(kind=4), parameter :: code_uvt_loff = 10 ! Phase center offset integer(kind=4), parameter :: code_uvt_moff = 11 ! Phase center offset integer(kind=4), parameter :: code_uvt_xoff = 12 ! X Pointing Offset integer(kind=4), parameter :: code_uvt_yoff = 13 ! Y Pointing Offset integer(kind=4), parameter :: code_uvt_stok = 14 ! Polarization state integer(kind=4), parameter :: code_uvt_el = 15 ! Elevation integer(kind=4), parameter :: code_uvt_ha = 16 ! Hour angle integer(kind=4), parameter :: code_uvt_para = 17 ! Parallactic angle integer(kind=4), parameter :: code_uvt_int = 18 ! Integration time integer(kind=4), parameter :: code_uvt_weig = 19 ! Weight column for SD integer(kind=4), parameter :: code_uvt_xofi = 20 ! Pointing error Ant I integer(kind=4), parameter :: code_uvt_yofi = 21 ! Pointing error Ant I integer(kind=4), parameter :: code_uvt_xofj = 22 ! Pointing error Ant J integer(kind=4), parameter :: code_uvt_yofj = 23 ! Pointing error Ant J integer(kind=4), parameter :: code_uvt_ra = 24 ! RA of reference integer(kind=4), parameter :: code_uvt_dec = 25 ! DEC of reference integer(kind=4), parameter :: code_uvt_last = 25 ! Last uvt code ! currently up to 25 simultaneously present codes can fit in a single block