! SKYDIP: For Skydips observations. No associated data.
integer(kind=4), parameter :: class_sec_sky_id=-16
integer(kind=4), parameter :: msky=10
integer(kind=4), parameter :: class_sec_sky_len=10+4*msky
type skydip
sequence
integer(kind=4) :: line(3) ! [ ] Line name
real(kind=8) :: restf ! [MHz] Rest frequency
real(kind=8) :: image ! [MHz] Image frequency
integer(kind=4) :: nsky ! [ ] Number of points on sky
integer(kind=4) :: nchop ! [ ] - - - - chopper
integer(kind=4) :: ncold ! [ ] - - - - cold load
real(kind=4) :: elev(msky) ! [rad] Elevations
real(kind=4) :: emiss(msky) ! [ ?] Power on sky
real(kind=4) :: chopp(msky) ! [ ?] Power on chopper
real(kind=4) :: cold(msky) ! [ ?] Power on cold load
end type skydip