c  $Header: /usr/people/flittner/radtran/tomrad/pv2.2/src/RCS/thkns.cmn,v 2.22 2000/08/30 16:38:59 flittner Exp $
      real*8 tsl(101),tt(202),tts(202),ttl(202),dtsp(202),dtts(202)
      real*8 pressure(202)
      common /thkns/ tsl,tt,tts,ttl,dtsp,dtts,pressure
      save /thkns/