c  $Header: /usr/people/flittner/radtran/tomrad/pv2.2/src/RCS/buff3.cmn,v 2.22 2000/08/30 16:38:59 flittner Exp $
      real*8 eitl(max_scan,max_az),eitr(max_scan,max_az)
      real*8 eitu(max_scan,max_az)
      common/buff3/eitl,eitr,eitu
      save /buff3/