integer(kind=4), parameter :: class_sec_her_id=-20
integer(kind=4), parameter :: class_sec_her_len=96
type class_herschel_t
integer(kind=8) :: obsid ! 1- 2 [----] Observation id
character(len=8) :: instrument ! 3- 4 [str ] Instrument name
character(len=24) :: proposal ! 5-10 [str ] Proposal name
character(len=68) :: aor ! 11-27 [str ] Astronomical Observation Request
integer(kind=4) :: operday ! 28 [day ] Operational day number
character(len=28) :: dateobs ! 29-35 [str ] Start date (ISO date)
character(len=28) :: dateend ! 36-42 [str ] End date (ISO date)
character(len=40) :: obsmode ! 43-52 [str ] Observing mode
real(kind=4) :: vinfo ! 53 [km/s] Informative source velocity in LSR frame
real(kind=4) :: zinfo ! 54 [----] Informative target redshift
real(kind=8) :: posangle ! 55-56 [rad ] Spacecraft pointing position angle
real(kind=8) :: reflam ! 57-58 [rad ] Sky reference (a.k.a. OFF), lambda coordinate
real(kind=8) :: refbet ! 59-60 [rad ] Sky reference (a.k.a. OFF), beta coordinate
real(kind=8) :: hifavelam ! 61-62 [rad ] ON average H and V coordinate (HIFI), lambda coordinate
real(kind=8) :: hifavebet ! 63-64 [rad ] ON average H and V coordinate (HIFI), beta coordinate
real(kind=4) :: etamb ! 65 [----] Main beam efficiency used when applying doAntennaTemp
real(kind=4) :: etal ! 66 [----] Forward efficiency used when applying doAntennaTemp
real(kind=4) :: etaa ! 67 [----] Telescope aperture efficiency
real(kind=4) :: hpbw ! 68 [rad ] Azimuthally-averaged half-power beam width
character(len=8) :: tempscal ! 69-70 [str ] Temperature scale in use
real(kind=8) :: lodopave ! 71-72 [MHz ] Average LO frequency Doppler corrected to freqFrame (SPECSYS)
real(kind=4) :: gim0 ! 73 [----] Sideband gain polynomial coeff 0 applied
real(kind=4) :: gim1 ! 74 [----] Sideband gain polynomial coeff 1 applied
real(kind=4) :: gim2 ! 75 [----] Sideband gain polynomial coeff 2 applied
real(kind=4) :: gim3 ! 76 [----] Sideband gain polynomial coeff 3 applied
real(kind=4) :: mixercurh ! 77 [mA ] Calibrated mixer junction current, horizontal
real(kind=4) :: mixercurv ! 78 [mA ] Calibrated mixer junction current, vertical
character(len=28) :: datehcss ! 79-85 [str ] Processing date (ISO date)
character(len=24) :: hcssver ! 86-91 [str ] HCSS version
character(len=16) :: calver ! 92-95 [str ] Calibration version
real(kind=4) :: level ! 96 [----] Pipeline level
end type class_herschel_t