! HFS: "Hyperfine Structure" profile fit results (e.g. NH3, HCN, for spectra). integer(kind=4), parameter :: class_sec_hfs_id=-13 integer(kind=4), parameter :: mhfsfit=12 integer(kind=4), parameter :: class_sec_hfs_len=3+2*mhfsfit type hfs sequence integer(kind=4) :: nline ! Number of components real(kind=4) :: sigba ! Sigma on base real(kind=4) :: sigra ! Sigma on line real(kind=4) :: nfit(mhfsfit) ! Fit results real(kind=4) :: nerr(mhfsfit) ! Errors end type hfs