! POSITION: Position information.
integer(kind=4), parameter :: class_sec_pos_id=-3
integer(kind=4), parameter :: class_sec_pos_len=17
type position
sequence
integer(kind=4) :: sourc(3) ! [ ] Source name
real(kind=4) :: epoch ! [ ] Epoch of coordinates
real(kind=8) :: lam ! [rad] Lambda
real(kind=8) :: bet ! [rad] Beta
real(kind=4) :: lamof ! [rad] Offset in Lambda
real(kind=4) :: betof ! [rad] Offset in Beta
integer(kind=4) :: proj ! [rad] Projection system
real(kind=8) :: sl0p ! [rad] lambda of descriptive system
real(kind=8) :: sb0p ! [rad] beta of descriptive system
real(kind=8) :: sk0p ! [rad] angle of descriptive system
end type position