Observation version 2 since 10-mar-2023 (added parallactic angle):
! GENERAL: General parameters, always present. integer(kind=4), parameter :: class_sec_gen_id=-2 integer(kind=4), parameter :: class_sec_gen_len=11 type general sequence ! Written in the index on disk integer(kind=4) :: num ! [ ] Observation number integer(kind=4) :: ver ! [ ] Version number integer(kind=4) :: teles(3)! [ ] Telescope name integer(kind=4) :: dobs ! [MJD-60549] Date of observation integer(kind=4) :: dred ! [MJD-60549] Date of reduction integer(kind=4) :: kind ! [ code] Type of data integer(kind=4) :: qual ! [ code] Quality of data integer(kind=4) :: scan ! [ ] Scan number integer(kind=4) :: subscan ! [ ] Subscan number ! Written in the section on disk real(kind=8) :: ut ! [ rad] UT of observation real(kind=8) :: st ! [ rad] LST of observation real(kind=4) :: az ! [ rad] Azimuth real(kind=4) :: el ! [ rad] Elevation real(kind=4) :: tau ! [neper] Opacity real(kind=4) :: tsys ! [ K] System temperature real(kind=4) :: time ! [ s] Integration time real(kind=8) :: parang ! [ rad] Parallactic angle integer(kind=4) :: xunit ! [ code] X unit (if X coordinates section is present) end type general
Observation version 1/2 (obsolete for writing):
! GENERAL: General parameters, always present. integer(kind=4), parameter :: class_sec_gen_id=-2 integer(kind=4), parameter :: class_sec_gen_len=9 type general sequence ! Written in the index on disk integer(kind=4) :: num ! [ ] Observation number integer(kind=4) :: ver ! [ ] Version number integer(kind=4) :: teles(3)! [ ] Telescope name integer(kind=4) :: dobs ! [MJD-60549] Date of observation integer(kind=4) :: dred ! [MJD-60549] Date of reduction integer(kind=4) :: kind ! [ code] Type of data integer(kind=4) :: qual ! [ code] Quality of data integer(kind=4) :: scan ! [ ] Scan number integer(kind=4) :: subscan ! [ ] Subscan number ! Written in the section on disk real(kind=8) :: ut ! [ rad] UT of observation real(kind=8) :: st ! [ rad] LST of observation real(kind=4) :: az ! [ rad] Azimuth real(kind=4) :: el ! [ rad] Elevation real(kind=4) :: tau ! [neper] Opacity real(kind=4) :: tsys ! [ K] System temperature real(kind=4) :: time ! [ s] Integration time integer(kind=4) :: xunit ! [ code] X unit (if X coordinates section is present) end type general