c  $Header: /usr/people/flittner/radtran/tomrad/pv2.2/src/RCS/eks.cmn,v 2.22 2000/08/30 16:38:59 flittner Exp $
      real*8 extmu(202,max_scan),ek4(202),ek5(202)
      real*8 ek8(202),ek9(202)
      common /eks/ extmu,ek4,ek5,ek8,ek9
      save /eks/