## Spectroscopic information (for spectra)

Observation version 1.3 (Doppler correction added, SkyFr and Vteles removed):

      ! SPECTRO: Spectroscopic information (for spectra).
      integer(kind=4), parameter :: class_sec_spe_id=-4
      integer(kind=4), parameter :: class_sec_spe_len=17
      type spectro
         sequence
         integer(kind=4) :: line(3)  ! [    ] Line name
         real(kind=8)    :: restf    ! [ MHz] Rest frequency
         integer(kind=4) :: nchan    ! [    ] Number of channels
         real(kind=4)    :: rchan    ! [    ] Reference channel
         real(kind=4)    :: fres     ! [ MHz] Frequency resolution
         real(kind=4)    :: foff     ! [ MHz] Frequency offset
         real(kind=4)    :: vres     ! [km/s] Velocity resolution
         real(kind=4)    :: voff     ! [km/s] Velocity at reference channel
         real(kind=4)    :: bad      ! [    ] Blanking value
         real(kind=8)    :: image    ! [ MHz] Image frequency
         integer(kind=4) :: vtype    ! [code] Type of velocity
         real(kind=8)    :: doppler  ! [km/s] Doppler correction -V/c (CLASS convention)
      end type spectro

Observation version 1.2 (SkyFr and Vteles added), obsolete for writing:

      ! SPECTRO: Spectroscopic information (for spectra).
      integer(kind=4), parameter :: class_sec_spe_id=-4
      integer(kind=4), parameter :: class_sec_spe_len=18
      type spectro
         sequence
         integer(kind=4) :: line(3) ! [    ] Line name
         real(kind=8)    :: restf   ! [ MHz] Rest frequency
         integer(kind=4) :: nchan   ! [    ] Number of channels
         real(kind=4)    :: rchan   ! [    ] Reference channels
         real(kind=4)    :: fres    ! [ MHz] Frequency resolution
         real(kind=4)    :: foff    ! [ MHz] Frequency offset
         real(kind=4)    :: vres    ! [km/s] Velocity resolution
         real(kind=4)    :: voff    ! [km/s] Velocity at reference channel
         real(kind=4)    :: bad     ! [    ] Blanking value
         real(kind=8)    :: image   ! [ MHz] Image frequency
         integer(kind=4) :: vtype   ! [code] Type of velocity
         real(kind=8)    :: skyfr   ! [ MHz]
         real(kind=4)    :: vteles  ! [km/s]
      end type spectro

Observation version 1.1, obsolete for writing:

      ! SPECTRO: Spectroscopic information (for spectra).
      integer(kind=4), parameter :: class_sec_spe_id=-4
      integer(kind=4), parameter :: class_sec_spe_len=15
      type spectro
         sequence
         integer(kind=4) :: line(3) ! [    ] Line name
         real(kind=8)    :: restf   ! [ MHz] Rest frequency
         integer(kind=4) :: nchan   ! [    ] Number of channels
         real(kind=4)    :: rchan   ! [    ] Reference channels
         real(kind=4)    :: fres    ! [ MHz] Frequency resolution
         real(kind=4)    :: foff    ! [ MHz] Frequency offset
         real(kind=4)    :: vres    ! [km/s] Velocity resolution
         real(kind=4)    :: voff    ! [km/s] Velocity at reference channel
         real(kind=4)    :: bad     ! [    ] Blanking value
         real(kind=8)    :: image   ! [ MHz] Image frequency
         integer(kind=4) :: vtype   ! [code] Type of velocity
      end type spectro