"Stellar shell" profile fit results (for spectra)

  ! Section -12   /CRSHEL/
  ! SHELL: "Stellar shell" profile fit results (for spectra).
  integer mshell
  parameter (mshell=43)
  type shell
     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(20)  ! [] Fit results
     real(kind=4)    :: nerr(20)  ! [] Errors
  end type shell