! SWITCH: Switching information (for spectra). integer(kind=4), parameter :: class_sec_swi_id=-8 integer(kind=4), parameter :: mxphas=8 integer(kind=4), parameter :: class_sec_swi_len=2+6*mxphas type class_switch_t sequence integer(kind=4) :: nphas ! [ ] Number of phases real(kind=8) :: decal(mxphas) ! [ MHz] Frequency offsets real(kind=4) :: duree(mxphas) ! [ s] Time per phase real(kind=4) :: poids(mxphas) ! [ ] Weight of each phase integer(kind=4) :: swmod ! [code] Switching mode (frequency, position...) real(kind=4) :: ldecal(mxphas) ! [ rad] Lambda offsets real(kind=4) :: bdecal(mxphas) ! [ rad] Beta offsets of each phase end type class_switch_t