include file: commvo1.cdk 8 #if defined (DOC) * * . J. Halle *CMDA/AES Oct 99. * - Added ground temperature (TG) to the model state. * . Y. Yang July 2003 * - Only changed comments for species * . Y. Yang Feb. 2005 * - Removed OZ-related variables C C COMDECK: COMMVO1 C --------------- C Auxiliary Model state interpolated at the obs. stations C -------------------------------------------------------- C GMOBS1(NKGDIMO,NMXOBS) C C Splitting of GMOBS C --------------- C GOMU1 (NFLEV,NMXOBS) : zonal wind C GOMV1 (NFLEV,NMXOBS) : meridional wind C GOMT1 (NFLEV,NMXOBS) : temperature field C GOMGZ1(NFLEV,NMXOBS) : geopotential field C GOMTR1(NFLEV*NCMTMAX,NMXOBS) : chemical species C GOMQ1 (NFLEV,NMXOBS) : specific humidity c gomes1(nflev,nmxobs) : t - td C GOMPS1(1 ,NMXOBS) : surface pressure C GOMTGR1(1 ,NMXOBS) : ground temperature C #endif REAL*8 GOMOBS1(NKGDIMO,NMXOBS) REAL*8 GOMU1(NKGDIMO,NMXOBS), GOMV1(NKGDIMO,NMXOBS) REAL*8 GOMT1(NKGDIMO,NMXOBS), GOMQ1(NKGDIMO,NMXOBS) REAL*8 GOMGZ1(NKGDIMO,NMXOBS) REAL*8 GOMTR1(NKGDIMO,NMXOBS), gomes1(nkgdimo,nmxobs) REAL*8 GOMPS1(NKGDIMO,NMXOBS), GOMTGR1(NKGDIMO,NMXOBS) POINTER (PTMOBS1,GOMOBS1), (PTOMU1,GOMU1),(PTOMV1,GOMV1) POINTER (PTOMT1,GOMT1),(PTOMQ1,GOMQ1), (PTOMPS1,GOMPS1) POINTER (PTOMGZ1,GOMGZ1), (PTOMTR1,GOMTR1) POINTER (ptomes1,gomes1),(PTOMTGR1,GOMTGR1) COMMON /POMMVO1/PTMOBS1, PTOMU1, PTOMV1, PTOMT1, PTOMQ1, PTOMPS1 COMMON /POMMVO1/PTOMGZ1, PTOMTR1, ptomes1, PTOMTGR1