MODULE units_coulmat
  !
  ! ... the units of the files and the record lengths
  !
  SAVE

  INTEGER :: iuncoulmat
  INTEGER :: lrcoulmat

END MODULE units_coulmat