!-----------------------------------------------------------------------
      real(4),pointer::deta2(:),aeta2(:),dfrlg(:),qs0(:),sqs(:)
      real(4),pointer::the0(:),sthe(:),the0q(:),stheq(:)
      real(4),pointer::mxsnal(:,:),epsr(:,:),radin(:,:),radot(:,:)
      real(4),pointer::glat(:,:),glon(:,:),czen(:,:)
      real(4),pointer::htop(:,:),hbot(:,:)
      real(4),pointer::tg(:,:),gffc(:,:),sst(:,:),albase(:,:)
      real(4),pointer::albedo(:,:)
      real(4),pointer::hdac(:,:),hdacv(:,:),czmean(:,:),sigt4(:,:)
      real(4),pointer::ptbl(:,:),ttbl(:,:),ttblq(:,:)
      COMMON/PHYS/KTM,PT2,DTQ2,TDTQ2,DTD,TDTD,ROS,CS,DS,ROI,CI,DI,PL
      common/phys/THL,RDQ,RDTH,RDP,RDTHE,PLQ,RDPQ,RDTHEQ,DETA2,AETA2
      common/phys/DFRLG,QS0,SQS,THE0,STHE,THE0Q,STHEQ,MXSNAL,EPSR
      common/phys/RADIN,RADOT,GLAT,GLON,CZEN,HTOP,HBOT,TG,GFFC
      common/phys/SST,ALBASE,ALBEDO,HDAC,HDACV,CZMEAN,SIGT4,PTBL
      common/phys/TTBL,TTBLQ
!-----------------------------------------------------------------------