C                                                                               
C*************** TOP OF COMMON BLOCK - NMCCOM **************************        
C                                                                               
C   NAME- NMCCOM                                                                
C                                                                               
C   LANGUAGE- VS FORTRAN    TYPE- COMMON BLOCK   COMPUTER- CRAY                 
C                                                                               
C   VERSION- 1.0     DATE- 10/18/96   PROGRAMMER- ALEX POZDNYAK (FDC)           
C   VERSION- 2.0     DATE- 05/05/98   PROGRAMMER- BRIAN BARIL (RSTX)
C                    CHANGED GRDBUF DIMENSIONS FROM (145,37,5,21) TO
C                    (145,37) 
C                                                                               
C   FUNCTION- THIS COMMON BLOCK CONTAINS VALUES OBTAINED FROM NMC               
C             FILES. 
C                                                                               
C   SHARED PARAMETERS-                                                          
C     VARIABLE   TYPE   DESCRIPTION                                             
C     --------   ----   -----------                                             
C     YEAR       INT    YEAR OF DATA FROM NMC FORECAST FILE.
C     MON        INT    MONTH OF DATA FROM NMC FORECAST FILE.
C     DAY        INT    DAY OF DATA FROM NMC FORECAST FILE.
C     HOUR       INT    HOUR OF DATA FROM NMC FORECAST FILE.
C     GRDBUF     REAL   ARRAY (DIM 145 X 37) OF FORECAST INFO.
C                       THERE ARE 145 LONGITUDES AND 37 LATITUDES.
C     PNMC       INT     ARRAY (DIM 10) OF PRESSURE LEVELS THAT
C                        HELP SET CORRESPONDENCE TO NMC RECORDS TO
C                        READ.
C     IFIL       INT     ARRAY (DIM 5) OF UNIT NUMBER OF NMC FILES.
C
C
C***********************************************************************        
C                                                                               
      COMMON /NMC/  DAYS, MONS, YEARS, HOURS, HOLD, PNMC, IFIL, GRDBUF
C
      INTEGER   DAYS(5), MONS(5), YEARS(5), HOURS(5)
      INTEGER   HOLD(5,21), PNMC(10), IFIL(5) 
      REAL*4    GRDBUF(145,37) 
C
C      DATA PNMC/ 100, 150, 200, 250, 300, 400, 500, 700, 850, 1000/
C      DATA IFIL/ 35, 36, 37, 38, 39/
C
C*************** BOTTOM OF COMMON BLOCK - NMCCOM ***********************