include file: localpost.cdk 12
* Revision:
*          C. Charette /L. Fillion *ARMA/AES - Nov. 1998
*                      -Add fields required to do postprocessing of
*                       GZ, ES, HU when cvcord='ETAGE'
*          L. Fillion *ARMA/AES - 4 dec. 1998
*                      -Add fields TTB,TTU,GZB,GZU,PSB,PSU
*          Y. Nezlin  *ARQX March 2006
*                      -Added fields TGG and TGB and PXTGG and PXTGB
*                       (following code by M. Buehner)
*
      REAL*8 ZPP(NI,NFLEV,NJ), ZCC(NI,NFLEV,NJ), ZDD(NI,NFLEV,NJ)
     &     , ZQQ(NI,NFLEV,NJ),ZQR(NI,NFLEV,NJ), ZTP(NI,NFLEV,NJ)
     &     , ZLPP(NI,1,NJ), ZGP(NI,NFLEV,NJ),ZGB(NI,NFLEV,NJ)
     &     , ZO3(NI,NJ), zuug(ni,nflev,nj), zvvg(ni,nflev,nj)
     &     , zttg(ni,nflev,nj),zhug(ni,nflev,nj),zpsg(ni,nj),ztgg(ni,nj)
     &     , zesg(ni,nflev,nj),ZUC(NI,NFLEV,NJ),zpt(ni,nj)
     &     , ztv(ni,nflev,nj),zgz(ni,nflev,nj), zes(ni,nflev,nj)
     &     , zhu(ni,nflev,nj),zttb(ni,nflev,nj), zttu(ni,nflev,nj)
     &     , zgzb(ni,nflev,nj), zgzu(ni,nflev,nj)
     &     , zpsb(ni,nj),ztgb(ni,nj), zpsu(ni,nj)
      logical lvardiag
      POINTER (PXPP,ZPP),(PXCC,ZCC),(PXQQ,ZQQ),(PXQR,ZQR), (PXDD,ZDD)
     &     , (PXTP,ZTP), (PXLPP,ZLPP), (PXGP,ZGP), (PXGB,ZGB)
     &     , (PXttg,Zttg), (pxuug,zuug), (pxvvg,zvvg)
     &     , (pxhug,zhug), (pxesg,zesg),(pxpsg,zpsg),(pxtgg,ztgg),(pxpt,zpt)
     &     , (PXtv,ztv), (PXgz,zgz), (PXes,zes), (pxhu,zhu)
     &     , (pxttb,zttb), (pxttu,zttu), (pxgzb,zgzb), (pxgzu,zgzu)
     &     , (pxpsb,zpsb),(pxtgb,ztgb), (pxpsu,zpsu)
      POINTER (PXO3,ZO3),(PXUC,ZUC)
      COMMON /POMPVOR/PXPP,PXDD,PXCC,PXQQ,PXQR,PXO3
     &                ,PXTP,PXLPP,PXGP,PXGB,PXUC,pxttg,pxtv,pxgz
     &                ,pxes,pxhu,pxhug,pxuug,pxvvg,pxpsg,pxtgg,pxpt
     &                ,pxttb,pxttu,pxgzb,pxgzu,pxpsb,pxtgb,pxpsu,pxesg
      common /comllpost/lvardiag