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