c  $Header: /usr/people/flittner/radtran/tomrad/pv2.2/src/RCS/es.cmn,v 2.22 2000/08/30 16:38:59 flittner Exp $
      real*8 odan(6),e(6),eek(6)
      common /es/ odan,e,eek
      save /es/