DSTRB.F:      REAL,ALLOCATABLE,DIMENSION(:) :: ARRAYX
DSTRB.F:          ALLOCATE(ARRAYX(NUMVALS),STAT=I)
DSTRB.F:          DEALLOCATE(ARRAYX)
DSTRB.F:        ALLOCATE(ARRAYX(NUMVALS),STAT=I)
DSTRB.F:        DEALLOCATE(ARRAYX)
NMM_NEST_UTILS1.F: REAL, ALLOCATABLE, DIMENSION(:,:) :: data1     ! for highres topo
NMM_NEST_UTILS1.F: REAL, ALLOCATABLE, DIMENSION(:,:) :: avc_big, lnd_big, lah_big, loh_big
NMM_NEST_UTILS1.F: REAL, ALLOCATABLE, DIMENSION(:,:) :: avc_nest, lnd_nest, lah_nest, loh_nest
NMM_NEST_UTILS1.F: real, allocatable, dimension(:,:,:) :: real_domain
NMM_NEST_UTILS1.F:      ALLOCATE(DATA1(1:NNXP,1:NNYP))
NMM_NEST_UTILS1.F:             ALLOCATE (avc_big(im_big,jm_big))
NMM_NEST_UTILS1.F:             ALLOCATE (lnd_big(im_big,jm_big))
NMM_NEST_UTILS1.F:             ALLOCATE (lah_big(im_big,jm_big))
NMM_NEST_UTILS1.F:             ALLOCATE (loh_big(im_big,jm_big))
NMM_NEST_UTILS1.F:             if (allocated(real_domain)) deallocate(real_domain)
NMM_NEST_UTILS1.F:             allocate(real_domain(domain_start(1):domain_end(1), domain_start(2):domain_end(2), domain_start(3):domain_end(3)))
NMM_NEST_UTILS1.F:                ALLOCATE (lah_big(im_big,jm_big))
NMM_NEST_UTILS1.F:                ALLOCATE (loh_big(im_big,jm_big))
NMM_NEST_UTILS1.F:                ALLOCATE (lnd_big(im_big,jm_big))
NMM_NEST_UTILS1.F:                ALLOCATE (avc_big(im_big,jm_big))
NMM_NEST_UTILS1.F:        ALLOCATE (avc_nest(im,jm))
NMM_NEST_UTILS1.F:        ALLOCATE (lnd_nest(im,jm))
NMM_NEST_UTILS1.F:        ALLOCATE (lah_nest(im,jm))
NMM_NEST_UTILS1.F:        ALLOCATE (loh_nest(im,jm))
NMM_NEST_UTILS1.F:        DEALLOCATE (avc_big,lnd_big)
NMM_NEST_UTILS1.F:        DEALLOCATE (avc_nest,lnd_nest)
NMM_NEST_UTILS1.F:      DEALLOCATE(DATA1)
NMM_NEST_UTILS1.F: INTEGER, ALLOCATABLE, DIMENSION(:)  :: KHL2,KVL2,KHH2,KVH2,KHLA,KHHA,KVLA,KVHA
NMM_NEST_UTILS1.F: REAL, ALLOCATABLE, DIMENSION(:)     :: DXJ,WPDARJ,CPGFUJ,CURVJ,   &
NMM_NEST_UTILS1.F:    ALLOCATE(KHL2(JTS:NNYP),KVL2(JTS:NNYP),KHH2(JTS:NNYP),KVH2(JTS:NNYP))
NMM_NEST_UTILS1.F:    ALLOCATE(DXJ(JTS:NNYP),WPDARJ(JTS:NNYP),CPGFUJ(JTS:NNYP),CURVJ(JTS:NNYP))
NMM_NEST_UTILS1.F:    ALLOCATE(FCPJ(JTS:NNYP),FDIVJ(JTS:NNYP),FADJ(JTS:NNYP))
NMM_NEST_UTILS1.F:    ALLOCATE(HDACJ(JTS:NNYP),DDMPUJ(JTS:NNYP),DDMPVJ(JTS:NNYP))
NMM_NEST_UTILS1.F:    ALLOCATE(KHLA(JAM),KHHA(JAM))
NMM_NEST_UTILS1.F:    ALLOCATE(KVLA(JAM),KVHA(JAM))
NMM_NEST_UTILS1.F:     ALLOCATE(EMJ(JDS:JDE-1),EMTJ(JDS:JDE-1))
NMM_NEST_UTILS1.F:!   deallocs
NMM_NEST_UTILS1.F:    DEALLOCATE(KHL2,KVL2,KHH2,KVH2)
NMM_NEST_UTILS1.F:    DEALLOCATE(DXJ,WPDARJ,CPGFUJ,CURVJ)
NMM_NEST_UTILS1.F:    DEALLOCATE(FCPJ,FDIVJ,FADJ)
NMM_NEST_UTILS1.F:    DEALLOCATE(HDACJ,DDMPUJ,DDMPVJ)
NMM_NEST_UTILS1.F:    DEALLOCATE(KHLA,KHHA)
NMM_NEST_UTILS1.F:    DEALLOCATE(KVLA,KVHA)
module_BC_NMM.F:      REAL,ALLOCATABLE,DIMENSION(:,:) :: PDB_ORIG
module_BC_NMM.F:      REAL,ALLOCATABLE,DIMENSION(:,:,:) :: TB_ORIG,QB_ORIG             &
module_CLDWTR.F:!jm      REAL,ALLOCATABLE,DIMENSION(:,:,:) :: CWM,F_ICE,F_RAIN,F_RIMEF
module_CLDWTR.F:!jm      REAL,ALLOCATABLE,DIMENSION(:,:) :: SR,U00
module_CLDWTR.F:!jm      REAL,ALLOCATABLE,DIMENSION(:,:) :: CFRACH,CFRACL,CFRACM,CUPPT
module_CLDWTR.F:!jm      INTEGER,ALLOCATABLE,DIMENSION(:,:) :: LC
module_CLDWTR.F:!jm      INTEGER,ALLOCATABLE,DIMENSION(:) :: UL
module_INDX.F:      INTEGER,ALLOCATABLE,DIMENSION(:) :: IHE,IHW,IVE,IVW,IRAD         &
module_INDX.F:      INTEGER,ALLOCATABLE,DIMENSION(:,:,:) :: INDX3_WRK
module_INDX.F:      INTEGER,ALLOCATABLE,DIMENSION(:) :: N_IUP_H,N_IUP_V              &
module_INDX.F:      INTEGER,ALLOCATABLE,DIMENSION(:,:) :: IUP_H,IUP_V,IUP_ADH,IUP_ADV
module_INDX.F:            ALLOCATE(IHE(-2:NMM_MAX_DIM))
module_INDX.F:            ALLOCATE(IHW(-2:NMM_MAX_DIM))
module_INDX.F:            ALLOCATE(IVE(-2:NMM_MAX_DIM))
module_INDX.F:            ALLOCATE(IVW(-2:NMM_MAX_DIM))
module_INDX.F:            ALLOCATE(IRAD(-2:NMM_MAX_DIM))
module_INDX.F:            ALLOCATE(IHEG(-2:NMM_MAX_DIM))
module_INDX.F:            ALLOCATE(IHWG(-2:NMM_MAX_DIM))
module_INDX.F:            ALLOCATE(IVEG(-2:NMM_MAX_DIM))
module_INDX.F:            ALLOCATE(IVWG(-2:NMM_MAX_DIM))
module_INDX.F:            ALLOCATE(IRADG(-2:NMM_MAX_DIM))
module_INDX.F:            ALLOCATE(INDX3_WRK(-3:3,1:NMM_MAX_DIM,0:6))
module_PHYSICS_CALLS.F:      REAL,DIMENSION(:,:,:,:),ALLOCATABLE :: MOIST_TRANS
module_PHYSICS_CALLS.F:      ALLOCATE(MOIST_TRANS(IMS:IME,KMS:KME,JMS:JME,N_MOIST),STAT=ISTAT)
module_PHYSICS_CALLS.F:      DEALLOCATE(MOIST_TRANS,STAT=ISTAT)
module_PHYSICS_CALLS.F:      REAL,DIMENSION(:,:,:,:),ALLOCATABLE :: MOIST_TRANS
module_PHYSICS_CALLS.F:      ALLOCATE(MOIST_TRANS(IMS:IME,KMS:KME,JMS:JME,N_MOIST),STAT=ISTAT)
module_PHYSICS_CALLS.F:      DEALLOCATE(MOIST_TRANS,STAT=ISTAT)
module_PHYSICS_CALLS.F:      REAL,DIMENSION(:,:,:,:),ALLOCATABLE :: MOIST_TRANS
module_PHYSICS_CALLS.F:      IF(.NOT.ALLOCATED(MOIST_TRANS))THEN
module_PHYSICS_CALLS.F:        ALLOCATE(MOIST_TRANS(IMS:IME,KMS:KME,JMS:JME,N_MOIST),STAT=ISTAT)
module_PHYSICS_CALLS.F:      DEALLOCATE(MOIST_TRANS,STAT=ISTAT)
module_PHYSICS_CALLS.F:      REAL,DIMENSION(:,:,:,:),ALLOCATABLE :: MOIST_TRANS
module_PHYSICS_CALLS.F:      REAL,DIMENSION(:,:,:,:),ALLOCATABLE :: SCALAR_TRANS
module_PHYSICS_CALLS.F:      ALLOCATE(MOIST_TRANS(IMS:IME,KMS:KME,JMS:JME,N_MOIST),STAT=ISTAT)
module_PHYSICS_CALLS.F:      ALLOCATE(SCALAR_TRANS(IMS:IME,KMS:KME,JMS:JME,N_SCALAR),STAT=ISTAT)
module_PHYSICS_CALLS.F:      DEALLOCATE(MOIST_TRANS,STAT=ISTAT)
module_PHYSICS_CALLS.F:      DEALLOCATE(SCALAR_TRANS,STAT=ISTAT)
module_TIMERS.F:      REAL :: allocm_tim,allocs_tim,digflt_tim,fltas_tim               &
module_initialize_real.F:              REAL,ALLOCATABLE    :: SICE_G(:,:), SM_G(:,:)
module_initialize_real.F:              INTEGER, ALLOCATABLE::  IHE_G(:),IHW_G(:)
module_initialize_real.F:              INTEGER, ALLOCATABLE::  ITEMP(:,:)
module_initialize_real.F:        REAL, ALLOCATABLE,DIMENSION(:,:):: ADUM2D,SNOWC,HT,TG_ALT, &
module_initialize_real.F:        REAL, ALLOCATABLE,DIMENSION(:,:,:):: P3D_OUT,P3DV_OUT,P3DV_IN, &
module_initialize_real.F:        INTEGER, ALLOCATABLE, DIMENSION(:):: KHL2,KVL2,KHH2,KVH2, &
module_initialize_real.F:!        INTEGER, ALLOCATABLE, DIMENSION(:,:):: LU_INDEX
module_initialize_real.F:        REAL, ALLOCATABLE, DIMENSION(:):: DXJ,WPDARJ,CPGFUJ,CURVJ, &
module_initialize_real.F:        REAL, ALLOCATABLE,DIMENSION(:),SAVE:: SG1,SG2,DSG1,DSG2, &
module_initialize_real.F:        if (ALLOCATED(ADUM2D)) DEALLOCATE(ADUM2D)
module_initialize_real.F:        if (ALLOCATED(TG_ALT)) DEALLOCATE(TG_ALT)
module_initialize_real.F:      allocate(itemp(inpes,jnpes),stat=istat)
module_initialize_real.F:      deallocate(itemp)
module_initialize_real.F:          ALLOCATE(ADUM2D(grid%sm31:grid%em31,jms:jme))
module_initialize_real.F:          ALLOCATE(KHL2(JTS:NNYP),KVL2(JTS:NNYP),KHH2(JTS:NNYP),KVH2(JTS:NNYP))
module_initialize_real.F:          ALLOCATE(DXJ(JTS:NNYP),WPDARJ(JTS:NNYP),CPGFUJ(JTS:NNYP),CURVJ(JTS:NNYP))
module_initialize_real.F:          ALLOCATE(FCPJ(JTS:NNYP),FDIVJ(JTS:NNYP),&
module_initialize_real.F:          ALLOCATE(HDACJ(JTS:NNYP),DDMPUJ(JTS:NNYP),DDMPVJ(JTS:NNYP))
module_initialize_real.F:          ALLOCATE(KHLA(JAM),KHHA(JAM))
module_initialize_real.F:          ALLOCATE(KVLA(JAM),KVHA(JAM))
module_initialize_real.F:        allocate(SG1(1:KDE-1))
module_initialize_real.F:        allocate(SG2(1:KDE-1))
module_initialize_real.F:        allocate(DSG1(1:KDE-1))
module_initialize_real.F:        allocate(DSG2(1:KDE-1))
module_initialize_real.F:        allocate(SGML1(1:KDE))
module_initialize_real.F:        allocate(SGML2(1:KDE))
module_initialize_real.F:        if (.NOT. allocated(PDVP))     allocate(PDVP(IMS:IME,JMS:JME))
module_initialize_real.F:        if (.NOT. allocated(P3D_OUT))  allocate(P3D_OUT(IMS:IME,JMS:JME,KDS:KDE-1))
module_initialize_real.F:        if (.NOT. allocated(PSFC_OUTV)) allocate(PSFC_OUTV(IMS:IME,JMS:JME))
module_initialize_real.F:        if (.NOT. allocated(P3DV_OUT)) allocate(P3DV_OUT(IMS:IME,JMS:JME,KDS:KDE-1))
module_initialize_real.F:        if (.NOT. allocated(P3DV_IN))  allocate(P3DV_IN(IMS:IME,JMS:JME,num_metgrid_levels))
module_initialize_real.F:         ALLOCATE(qtmp(IMS:IME,JMS:JME,num_metgrid_levels))
module_initialize_real.F:         ALLOCATE(qtmp2(IMS:IME,JMS:JME,num_metgrid_levels))
module_initialize_real.F:      IF (ALLOCATED(QTMP)) DEALLOCATE(QTMP)
module_initialize_real.F:      IF (ALLOCATED(QTMP)) DEALLOCATE(QTMP2)
module_initialize_real.F:!  new deallocs
module_initialize_real.F:        DEALLOCATE(p3d_out,p3dv_out,p3dv_in)
module_initialize_real.F:        ALLOCATE(SM_G(IDS:IDE,JDS:JDE),SICE_G(IDS:IDE,JDS:JDE))
module_initialize_real.F:        allocate(IHE_G(JDS:JDE-1),IHW_G(JDS:JDE-1))
module_initialize_real.F:        DEALLOCATE(SM_G,SICE_G)
module_initialize_real.F:        DEALLOCATE(IHE_G,IHW_G)
module_initialize_real.F:        ALLOCATE(HT(ims:ime,jms:jme))
module_initialize_real.F:!       allocate(lu_index(ims:ime,jms:jme))
module_initialize_real.F:   IF (.NOT. ALLOCATED(TG_ALT))ALLOCATE(TG_ALT(grid%sm31:grid%em31,jms:jme))
module_initialize_real.F:        DEALLOCATE(TG_ALT)
module_initialize_real.F:     num_st_levels_alloc , num_sm_levels_alloc , &
module_initialize_real.F:     num_sw_levels_alloc )
module_initialize_real.F:        ALLOCATE(EMJ(JDS:JDE-1),EMTJ(JDS:JDE-1))
module_initialize_real.F:        write(message,*) 'allocating DSG,DSG1,DSG2 as ', LM
module_initialize_real.F:       real, allocatable:: dum2d(:,:),DUM2DB(:,:)
module_initialize_real.F:       ALLOCATE(DUM2D(IMS:IME,JMS:JME))
module_initialize_real.F:       ALLOCATE (DUM2DB(IMS:IME,JMS:JME))
module_initialize_real.F:	deallocate(dum2d,dum2db)
module_initialize_real.F:        REAL, ALLOCATABLE           :: dum3d(:,:,:)
module_initialize_real.F:        allocate(dum3d(IMS:IME,JMS:JME,end_z))
module_initialize_real.F:        DEALLOCATE(dum3d)
module_si_io_nmm.F:      REAL , DIMENSION(:,:,:) , ALLOCATABLE :: u_input , v_input , &
module_si_io_nmm.F:      REAL , DIMENSION(:,:,:) , ALLOCATABLE :: landuse_frac_input , &
module_si_io_nmm.F:      REAL, ALLOCATABLE:: htm_in(:,:,:),vtm_in(:,:,:)
module_si_io_nmm.F:      REAL , DIMENSION(:,:)   , ALLOCATABLE :: soilt010_input , soilt040_input , &
module_si_io_nmm.F:      REAL , DIMENSION(:,:)   , ALLOCATABLE :: lat_wind, lon_wind 
module_si_io_nmm.F:      REAL , DIMENSION(:)     , ALLOCATABLE :: DETA_in, AETA_in, ETAX_in
module_si_io_nmm.F:      REAL , DIMENSION(:)     , ALLOCATABLE :: DETA1_in, AETA1_in, ETA1_in
module_si_io_nmm.F:      REAL , DIMENSION(:)     , ALLOCATABLE :: DETA2_in, AETA2_in, ETA2_in, DFL_in
module_si_io_nmm.F:      REAL , DIMENSION(:,:,:), ALLOCATABLE :: st_inputx , sm_inputx, sw_inputx
module_si_io_nmm.F:      REAL,DIMENSION(:,:),ALLOCATABLE :: dum2d
module_si_io_nmm.F:      INTEGER,DIMENSION(:,:),ALLOCATABLE :: idum2d
module_si_io_nmm.F:      REAL,DIMENSION(:,:,:),ALLOCATABLE :: dum3d
module_si_io_nmm.F:      write(0,*) 'dum3d I allocs: ', ids,ide-1
module_si_io_nmm.F:      write(0,*) 'dum3d J allocs: ', jds,jde-1
module_si_io_nmm.F:      write(0,*) 'dum3d K allocs: ', kds,kde-1
module_si_io_nmm.F:        IF (.NOT. ALLOCATED (DETA_in)) ALLOCATE(DETA_in(kds:kde-1))
module_si_io_nmm.F:        IF (.NOT. ALLOCATED (AETA_in)) ALLOCATE(AETA_in(kds:kde-1))
module_si_io_nmm.F:        IF (.NOT. ALLOCATED (ETAX_in)) ALLOCATE(ETAX_in(kds:kde))
module_si_io_nmm.F:        IF (.NOT. ALLOCATED (DETA1_in)) ALLOCATE(DETA1_in(kds:kde-1))
module_si_io_nmm.F:        IF (.NOT. ALLOCATED (AETA1_in)) ALLOCATE(AETA1_in(kds:kde-1))
module_si_io_nmm.F:        IF (.NOT. ALLOCATED (ETA1_in))  ALLOCATE(ETA1_in(kds:kde))
module_si_io_nmm.F:        IF (.NOT. ALLOCATED (DETA2_in)) ALLOCATE(DETA2_in(kds:kde-1))
module_si_io_nmm.F:        IF (.NOT. ALLOCATED (AETA2_in)) ALLOCATE(AETA2_in(kds:kde-1))
module_si_io_nmm.F:        IF (.NOT. ALLOCATED (ETA2_in)) ALLOCATE(ETA2_in(kds:kde))
module_si_io_nmm.F:        IF (.NOT. ALLOCATED (DFL_in)) ALLOCATE(DFL_in(kds:kde))
module_si_io_nmm.F:        IF (.NOT. ALLOCATED (u_input)  ) ALLOCATE ( u_input(its:ite,jts:jte,kts:kte) )
module_si_io_nmm.F:        IF (.NOT. ALLOCATED (v_input)  ) ALLOCATE ( v_input(its:ite,jts:jte,kts:kte) )
module_si_io_nmm.F:        IF (.NOT. ALLOCATED (q_input)  ) ALLOCATE ( q_input(its:ite,jts:jte,kts:kte) )
module_si_io_nmm.F:        IF (.NOT. ALLOCATED (t_input)  ) ALLOCATE ( t_input(its:ite,jts:jte,kts:kte) )
module_si_io_nmm.F:        IF (.NOT. ALLOCATED (htm_in)  ) ALLOCATE ( htm_in(its:ite,jts:jte,kts:kte) )
module_si_io_nmm.F:        IF (.NOT. ALLOCATED (vtm_in)  ) ALLOCATE ( vtm_in(its:ite,jts:jte,kts:kte) )
module_si_io_nmm.F:        IF (.NOT. ALLOCATED (pmsl)              ) ALLOCATE ( pmsl(its:ite,jts:jte) )
module_si_io_nmm.F:        IF (.NOT. ALLOCATED (psfc_in)           ) ALLOCATE ( psfc_in(its:ite,jts:jte) )
module_si_io_nmm.F:        IF (.NOT. ALLOCATED (st_inputx)) ALLOCATE (st_inputx(its:ite,jts:jte,num_st_levels_alloc))
module_si_io_nmm.F:        IF (.NOT. ALLOCATED (sm_inputx)) ALLOCATE (sm_inputx(its:ite,jts:jte,num_st_levels_alloc))
module_si_io_nmm.F:        IF (.NOT. ALLOCATED (sw_inputx)) ALLOCATE (sw_inputx(its:ite,jts:jte,num_st_levels_alloc))
module_si_io_nmm.F:        IF (.NOT. ALLOCATED (soilt010_input)    ) ALLOCATE ( soilt010_input(its:ite,jts:jte) )
module_si_io_nmm.F:        IF (.NOT. ALLOCATED (soilt040_input)    ) ALLOCATE ( soilt040_input(its:ite,jts:jte) )
module_si_io_nmm.F:        IF (.NOT. ALLOCATED (soilt100_input)    ) ALLOCATE ( soilt100_input(its:ite,jts:jte) )
module_si_io_nmm.F:        IF (.NOT. ALLOCATED (soilt200_input)    ) ALLOCATE ( soilt200_input(its:ite,jts:jte) )
module_si_io_nmm.F:        IF (.NOT. ALLOCATED (soilm010_input)    ) ALLOCATE ( soilm010_input(its:ite,jts:jte) )
module_si_io_nmm.F:        IF (.NOT. ALLOCATED (soilm040_input)    ) ALLOCATE ( soilm040_input(its:ite,jts:jte) )
module_si_io_nmm.F:        IF (.NOT. ALLOCATED (soilm100_input)    ) ALLOCATE ( soilm100_input(its:ite,jts:jte) )
module_si_io_nmm.F:        IF (.NOT. ALLOCATED (soilm200_input)    ) ALLOCATE ( soilm200_input(its:ite,jts:jte) )
module_si_io_nmm.F:        IF (.NOT. ALLOCATED (lat_wind)          ) ALLOCATE (lat_wind(its:ite,jts:jte))
module_si_io_nmm.F:        IF (.NOT. ALLOCATED (lon_wind)          ) ALLOCATE (lon_wind(its:ite,jts:jte))
module_si_io_nmm.F:        IF (.NOT. ALLOCATED (dum2d)             ) ALLOCATE (dum2d(IDS:IDE-1,JDS:JDE-1))
module_si_io_nmm.F:        IF (.NOT. ALLOCATED (idum2d)            ) ALLOCATE (idum2d(IDS:IDE-1,JDS:JDE-1))
module_si_io_nmm.F:        IF (.NOT. ALLOCATED (dum3d)             ) ALLOCATE (dum3d(IDS:IDE-1,JDS:JDE-1,KDS:KDE-1))
module_si_io_nmm.F:            IF ( ( first_time_in ) .AND. ( .NOT. ALLOCATED ( landuse_frac_input) ) ) THEN
module_si_io_nmm.F:               ALLOCATE (landuse_frac_input(its:ite,jts:jte,var_info%dim_val(3)) )
module_si_io_nmm.F:            IF ( ( first_time_in ) .AND. ( .NOT. ALLOCATED ( soil_top_cat_input) ) ) THEN
module_si_io_nmm.F:               ALLOCATE (soil_top_cat_input(its:ite,jts:jte,var_info%dim_val(3)) )
module_si_io_nmm.F:            IF ( ( first_time_in ) .AND. ( .NOT. ALLOCATED ( soil_bot_cat_input) ) ) THEN
module_si_io_nmm.F:               ALLOCATE (soil_bot_cat_input(its:ite,jts:jte,var_info%dim_val(3)) )
module_si_io_nmm.F:         do K=1,num_st_levels_alloc
module_si_io_nmm.F:      character*132, allocatable :: datestr_all(:)
module_si_io_nmm.F:      character*132, allocatable :: varname_all(:)
module_si_io_nmm.F:      integer, allocatable       :: domainend_all(:,:)
module_si_io_nmm.F:      integer, allocatable       :: start_block(:)
module_si_io_nmm.F:      integer, allocatable       :: end_block(:)
module_si_io_nmm.F:      integer, allocatable       :: start_byte(:)
module_si_io_nmm.F:      integer, allocatable       :: end_byte(:)
module_si_io_nmm.F:      integer(kind=i_llong), allocatable           :: file_offset(:)
module_si_io_nmm.F:      REAL, ALLOCATABLE:: dumdata(:,:,:)
module_si_io_nmm.F:!	write(6,*) 'pre allocations'
module_si_io_nmm.F:        IF (.NOT. ALLOCATED (pmsl)              ) ALLOCATE ( pmsl(its:ite,jts:jte) )
module_si_io_nmm.F:        IF (.NOT. ALLOCATED (psfc_in)           ) ALLOCATE ( psfc_in(its:ite,jts:jte) )
module_si_io_nmm.F:        IF (.NOT. ALLOCATED (st_inputx)) ALLOCATE (st_inputx(its:ite,jts:jte,num_st_levels_alloc))
module_si_io_nmm.F:        IF (.NOT. ALLOCATED (sm_inputx)) ALLOCATE (sm_inputx(its:ite,jts:jte,num_st_levels_alloc))
module_si_io_nmm.F:        IF (.NOT. ALLOCATED (sw_inputx)) ALLOCATE (sw_inputx(its:ite,jts:jte,num_st_levels_alloc))
module_si_io_nmm.F:        IF (.NOT. ALLOCATED (soilt010_input)    ) ALLOCATE ( soilt010_input(its:ite,jts:jte) )
module_si_io_nmm.F:        IF (.NOT. ALLOCATED (soilt040_input)    ) ALLOCATE ( soilt040_input(its:ite,jts:jte) )
module_si_io_nmm.F:        IF (.NOT. ALLOCATED (soilt100_input)    ) ALLOCATE ( soilt100_input(its:ite,jts:jte) )
module_si_io_nmm.F:        IF (.NOT. ALLOCATED (soilt200_input)    ) ALLOCATE ( soilt200_input(its:ite,jts:jte) )
module_si_io_nmm.F:        IF (.NOT. ALLOCATED (soilm010_input)    ) ALLOCATE ( soilm010_input(its:ite,jts:jte) )
module_si_io_nmm.F:        IF (.NOT. ALLOCATED (soilm040_input)    ) ALLOCATE ( soilm040_input(its:ite,jts:jte) )
module_si_io_nmm.F:        IF (.NOT. ALLOCATED (soilm100_input)    ) ALLOCATE ( soilm100_input(its:ite,jts:jte) )
module_si_io_nmm.F:        IF (.NOT. ALLOCATED (soilm200_input)    ) ALLOCATE ( soilm200_input(its:ite,jts:jte) )
module_si_io_nmm.F:!	write(6,*) 'past allocations'
module_si_io_nmm.F:      allocate (datestr_all(nrecs))
module_si_io_nmm.F:      allocate (varname_all(nrecs))
module_si_io_nmm.F:      allocate (domainend_all(3,nrecs))
module_si_io_nmm.F:      allocate (start_block(nrecs))
module_si_io_nmm.F:      allocate (end_block(nrecs))
module_si_io_nmm.F:      allocate (start_byte(nrecs))
module_si_io_nmm.F:      allocate (end_byte(nrecs))
module_si_io_nmm.F:      allocate (file_offset(nrecs))
module_si_io_nmm.F:    allocate(dumdata(IDS:IDE-1,JDS:JDE-1,num_metgrid_levels))
module_si_io_nmm.F:         do K=1,num_st_levels_alloc
module_si_io_nmm.F:        DEALLOCATE(pmsl)
module_si_io_nmm.F:        DEALLOCATE(psfc_in)
module_si_io_nmm.F:        DEALLOCATE(st_inputx)
module_si_io_nmm.F:        DEALLOCATE(sm_inputx)
module_si_io_nmm.F:        DEALLOCATE(sw_inputx)
module_si_io_nmm.F:        DEALLOCATE(soilt010_input)
module_si_io_nmm.F:        DEALLOCATE(soilt040_input)
module_si_io_nmm.F:        DEALLOCATE(soilt100_input)
module_si_io_nmm.F:        DEALLOCATE(soilt200_input)
module_si_io_nmm.F:        DEALLOCATE(soilm010_input)
module_si_io_nmm.F:        DEALLOCATE(soilm040_input)
module_si_io_nmm.F:        DEALLOCATE(soilm100_input)
module_si_io_nmm.F:        DEALLOCATE(soilm200_input)
module_si_io_nmm.F:        DEALLOCATE(dumdata)
module_si_io_nmm.F:   real, allocatable, dimension(:,:,:,:) :: data
module_si_io_nmm.F:   ALLOCATE (data (end_index(1), end_index(2), end_index(3), 1))
module_si_io_nmm.F:   DEALLOCATE(data)
read_nmm.F:   REAL,ALLOCATABLE,DIMENSION(:) :: TEMP1
read_nmm.F:   REAL,ALLOCATABLE,DIMENSION(:,:) :: TEMP
read_nmm.F:   INTEGER,ALLOCATABLE,DIMENSION(:,:) :: ITEMP
read_nmm.F:   REAL,ALLOCATABLE,DIMENSION(:,:,:) :: HOLD
read_nmm.F:      write(0,*)' before allocates and nhb nsoil=',nsoil
read_nmm.F:   ALLOCATE(TEMP1(1:NSOIL),STAT=I)
read_nmm.F:   ALLOCATE(ITEMP(IDS:IDE,JDS:JDE),STAT=I)
read_nmm.F:   ALLOCATE(TEMP(IDS:IDE,JDS:JDE),STAT=I)
read_nmm.F:   ALLOCATE(HOLD(IDS:IDE,JDS:JDE,KDS:KDE),STAT=I)
read_nmm.F:   DEALLOCATE(TEMP1,STAT=I)
read_nmm.F:   DEALLOCATE(ITEMP,STAT=I)
read_nmm.F:   DEALLOCATE(TEMP,STAT=I)
read_nmm.F:   DEALLOCATE(HOLD,STAT=I)
solve_nmm.F:      REAL,ALLOCATABLE,SAVE,DIMENSION(:,:,:) :: PPTDAT
solve_nmm.F:      REAL,ALLOCATABLE,DIMENSION(:,:,:) :: TTEN,QTEN
solve_nmm.F:      REAL,ALLOCATABLE,DIMENSION(:,:,:) :: RTHRATEN,RTHBLTEN,RQVBLTEN
solve_nmm.F:      REAL,ALLOCATABLE,DIMENSION(:,:) :: HDAC_BIG,HDACV_BIG
solve_nmm.F:      REAL,ALLOCATABLE,DIMENSION(:,:),SAVE :: DDMPU_LOC,DDMPV_LOC
solve_nmm.F:      ALLOCATE(TTEN(IMS:IME,KMS:KME,JMS:JME),STAT=ISTAT)
solve_nmm.F:      ALLOCATE(QTEN(IMS:IME,KMS:KME,JMS:JME),STAT=ISTAT)
solve_nmm.F:      ALLOCATE(RTHBLTEN(IMS:IME,KMS:KME,JMS:JME),STAT=ISTAT)
solve_nmm.F:      ALLOCATE(RQVBLTEN(IMS:IME,KMS:KME,JMS:JME),STAT=ISTAT)
solve_nmm.F:      ALLOCATE(RTHRATEN(IMS:IME,KMS:KME,JMS:JME),STAT=ISTAT)
solve_nmm.F:!***  ALLOCATE PPTDAT ARRAY (PRECIP ASSIM):
solve_nmm.F:      IF(GRID%PCPFLG.AND..NOT.ALLOCATED(PPTDAT))THEN
solve_nmm.F:        ALLOCATE(PPTDAT(IMS:IME,JMS:JME,3),STAT=ISTAT)
solve_nmm.F:!***               of input precip allocated to each physics time step
solve_nmm.F:!***  When allocating CAM radiation 4d arrays (ozmixm, aerosolc), 
solve_nmm.F:      IF(.NOT.ALLOCATED(HDAC_BIG ))ALLOCATE(HDAC_BIG(IMS:IME,JMS:JME))
solve_nmm.F:      IF(.NOT.ALLOCATED(HDACV_BIG))ALLOCATE(HDACV_BIG(IMS:IME,JMS:JME))
solve_nmm.F:      IF(LAST_TIME.AND.ALLOCATED(PPTDAT))THEN
solve_nmm.F:        DEALLOCATE(PPTDAT,STAT=ISTAT)
solve_nmm.F:      DEALLOCATE(TTEN,STAT=ISTAT)
solve_nmm.F:      DEALLOCATE(QTEN,STAT=ISTAT)
solve_nmm.F:      DEALLOCATE(RTHRATEN,STAT=ISTAT)
solve_nmm.F:      DEALLOCATE(RTHBLTEN,STAT=ISTAT)
solve_nmm.F:      DEALLOCATE(RQVBLTEN,STAT=ISTAT)
solve_nmm.F:      REAL,ALLOCATABLE,DIMENSION(:) :: VALUES
solve_nmm.F:          ALLOCATE(VALUES(1:NSIZE))
solve_nmm.F:          DEALLOCATE(VALUES)
solve_nmm.F:        ALLOCATE(VALUES(1:NSIZE))
solve_nmm.F:        DEALLOCATE(VALUES)
solve_nmm.F:      REAL,ALLOCATABLE,DIMENSION(:) :: VALUES
solve_nmm.F:          ALLOCATE(VALUES(1:NSIZE))
solve_nmm.F:          DEALLOCATE(VALUES)
solve_nmm.F:        ALLOCATE(VALUES(1:NSIZE))
solve_nmm.F:        DEALLOCATE(VALUES)
solve_nmm.F:      INTEGER,ALLOCATABLE,DIMENSION(:) :: ID_PE,IPE_SORT
solve_nmm.F:      REAL,ALLOCATABLE,DIMENSION(:) :: TIME,SORT_TIME
solve_nmm.F:        ALLOCATE(TIME(1:NPES))
solve_nmm.F:        ALLOCATE(SORT_TIME(1:NPES))
solve_nmm.F:        ALLOCATE(ID_PE(1:NPES))
solve_nmm.F:        ALLOCATE(IPE_SORT(1:NPES))
solve_nmm.F:        ALLOCATE(PTR_NEW,STAT=ISTAT)  ! Location for next data items
solve_nmm.F:      DEALLOCATE(PTR_NEW)
start_domain_nmm.F:      REAL,ALLOCATABLE,DIMENSION(:) :: PHALF
start_domain_nmm.F:!!!   REAL,ALLOCATABLE,DIMENSION(:,:) :: RAINBL,RAINNC,RAINNC           &
start_domain_nmm.F:      INTEGER,ALLOCATABLE,DIMENSION(:,:) :: ITEMP,LOWLYR
start_domain_nmm.F:      REAL,ALLOCATABLE,DIMENSION(:) :: SFULL,SMID
start_domain_nmm.F:      REAL,ALLOCATABLE,DIMENSION(:) :: DZS,ZS
start_domain_nmm.F:      REAL,ALLOCATABLE,DIMENSION(:,:,:) :: RQCBLTEN,RQIBLTEN            &
start_domain_nmm.F:      REAL,ALLOCATABLE,DIMENSION(:,:) :: EMISS,GLW,HFX                  &
start_domain_nmm.F:      REAL,ALLOCATABLE,DIMENSION(:,:) :: Z0_DUM, ALBEDO_DUM
start_domain_nmm.F:      REAL,ALLOCATABLE,DIMENSION(:,:,:) :: ZINT,RRI,CONVFAC
start_domain_nmm.F:!     REAL,ALLOCATABLE,DIMENSION(:,:,:) :: ZMID
start_domain_nmm.F:      REAL,ALLOCATABLE,DIMENSION(:,:,:) :: CLDFRA_TRANS,CLDFRA_OLD
start_domain_nmm.F:      REAL,ALLOCATABLE,DIMENSION(:,:,:) :: W0AVG
start_domain_nmm.F:      allocate(itemp(inpes,jnpes),stat=istat)
start_domain_nmm.F:      deallocate(itemp)
start_domain_nmm.F:      ALLOCATE(PHALF(LM+1),STAT=I)
start_domain_nmm.F:      DEALLOCATE(PHALF)
start_domain_nmm.F:      ALLOCATE(SFULL(KMS:KME),STAT=I)           ; SFULL    = 0.
start_domain_nmm.F:      ALLOCATE(SMID(KMS:KME),STAT=I)            ; SMID     = 0.
start_domain_nmm.F:      ALLOCATE(EMISS(IMS:IME,JMS:JME),STAT=I)   ; EMISS    = 0.
start_domain_nmm.F:      ALLOCATE(GLW(IMS:IME,JMS:JME),STAT=I)     ; GLW      = 0.
start_domain_nmm.F:      ALLOCATE(HFX(IMS:IME,JMS:JME),STAT=I)     ; HFX      = 0.
start_domain_nmm.F:      ALLOCATE(LOWLYR(IMS:IME,JMS:JME),STAT=I)  ; LOWLYR   = 0.
start_domain_nmm.F:!     ALLOCATE(MAVAIL(IMS:IME,JMS:JME),STAT=I)  ; MAVAIL   = 0.
start_domain_nmm.F:      ALLOCATE(NCA(IMS:IME,JMS:JME),STAT=I)     ; NCA      = 0.
start_domain_nmm.F:      ALLOCATE(QFX(IMS:IME,JMS:JME),STAT=I)     ; QFX      = 0.
start_domain_nmm.F:      ALLOCATE(RAINBL(IMS:IME,JMS:JME),STAT=I)  ; RAINBL   = 0.
start_domain_nmm.F:      ALLOCATE(RAINC(IMS:IME,JMS:JME),STAT=I)   ; RAINC    = 0.
start_domain_nmm.F:      ALLOCATE(RAINNC(IMS:IME,JMS:JME),STAT=I)  ; RAINNC   = 0.
start_domain_nmm.F:      ALLOCATE(RAINNCV(IMS:IME,JMS:JME),STAT=I) ; RAINNCV  = 0.
start_domain_nmm.F:      ALLOCATE(ZS(KMS:KME),STAT=I)              ; ZS       = 0.
start_domain_nmm.F:      ALLOCATE(SNOWC(IMS:IME,JMS:JME),STAT=I)   ; SNOWC    = 0.
start_domain_nmm.F:      ALLOCATE(THC(IMS:IME,JMS:JME),STAT=I)     ; THC      = 0.
start_domain_nmm.F:      ALLOCATE(TMN(IMS:IME,JMS:JME),STAT=I)     ; TMN      = 0.
start_domain_nmm.F:      ALLOCATE(TSFC(IMS:IME,JMS:JME),STAT=I)    ; TSFC     = 0.
start_domain_nmm.F:      ALLOCATE(Z0_DUM(IMS:IME,JMS:JME),STAT=I)  ; Z0_DUM   = 0.
start_domain_nmm.F:      ALLOCATE(ALBEDO_DUM(IMS:IME,JMS:JME),STAT=I)  ; ALBEDO_DUM   = 0.
start_domain_nmm.F:      ALLOCATE(DZS(KMS:KME),STAT=I)                         ; DZS = 0.
start_domain_nmm.F:      ALLOCATE(RQCBLTEN(IMS:IME,KMS:KME,JMS:JME),STAT=I)    ; RQCBLTEN = 0.
start_domain_nmm.F:      ALLOCATE(RQIBLTEN(IMS:IME,KMS:KME,JMS:JME),STAT=I)    ; RQIBLTEN = 0.
start_domain_nmm.F:      ALLOCATE(RQVBLTEN(IMS:IME,KMS:KME,JMS:JME),STAT=I)    ; RQVBLTEN =  0.
start_domain_nmm.F:      ALLOCATE(RTHBLTEN(IMS:IME,KMS:KME,JMS:JME),STAT=I)    ; RTHBLTEN =  0.
start_domain_nmm.F:      ALLOCATE(RUBLTEN(IMS:IME,KMS:KME,JMS:JME),STAT=I)     ; RUBLTEN = 0.
start_domain_nmm.F:      ALLOCATE(RVBLTEN(IMS:IME,KMS:KME,JMS:JME),STAT=I)     ; RVBLTEN = 0.
start_domain_nmm.F:      ALLOCATE(RQCCUTEN(IMS:IME,KMS:KME,JMS:JME),STAT=I)    ; RQCCUTEN = 0.
start_domain_nmm.F:      ALLOCATE(RQICUTEN(IMS:IME,KMS:KME,JMS:JME),STAT=I)    ; RQICUTEN  = 0.
start_domain_nmm.F:      ALLOCATE(RQRCUTEN(IMS:IME,KMS:KME,JMS:JME),STAT=I)    ; RQRCUTEN = 0.
start_domain_nmm.F:      ALLOCATE(RQSCUTEN(IMS:IME,KMS:KME,JMS:JME),STAT=I)    ; RQSCUTEN = 0.
start_domain_nmm.F:      ALLOCATE(RQVCUTEN(IMS:IME,KMS:KME,JMS:JME),STAT=I)    ; RQVCUTEN = 0.
start_domain_nmm.F:      ALLOCATE(RTHCUTEN(IMS:IME,KMS:KME,JMS:JME),STAT=I)    ; RTHCUTEN = 0.
start_domain_nmm.F:      ALLOCATE(RTHRATEN(IMS:IME,KMS:KME,JMS:JME),STAT=I)    ; RTHRATEN  = 0.
start_domain_nmm.F:      ALLOCATE(RTHRATENLW(IMS:IME,KMS:KME,JMS:JME),STAT=I)  ; RTHRATENLW = 0.
start_domain_nmm.F:      ALLOCATE(RTHRATENSW(IMS:IME,KMS:KME,JMS:JME),STAT=I)  ; RTHRATENSW = 0.
start_domain_nmm.F:      ALLOCATE(RRI(IMS:IME,JMS:JME,KMS:KME),STAT=I)  ; RRI = 0.
start_domain_nmm.F:      ALLOCATE(ZINT(IMS:IME,KMS:KME,JMS:JME),STAT=I)  ; ZINT = 0.
start_domain_nmm.F:!     ALLOCATE(ZMID(IMS:IME,KMS:KME,JMS:JME),STAT=I)  ; ZMID = 0.
start_domain_nmm.F:      ALLOCATE(CONVFAC(IMS:IME,KMS:KME,JMS:JME),STAT=I)  ; CONVFAC = 0.
start_domain_nmm.F:      ALLOCATE(CLDFRA_TRANS(IMS:IME,KMS:KME,JMS:JME),STAT=I)  ; CLDFRA_TRANS = 0.
start_domain_nmm.F:      ALLOCATE(CLDFRA_OLD(IMS:IME,KMS:KME,JMS:JME),STAT=I)  ; CLDFRA_OLD = 0.
start_domain_nmm.F:      ALLOCATE(W0AVG(IMS:IME,KMS:KME,JMS:JME),STAT=I)       ; W0AVG = 0.
start_domain_nmm.F:! when allocating CAM radiation 4d arrays (ozmixm, aerosolc) these are not needed
start_domain_nmm.F:      DEALLOCATE(SFULL)
start_domain_nmm.F:      DEALLOCATE(SMID)
start_domain_nmm.F:      DEALLOCATE(DZS)
start_domain_nmm.F:      DEALLOCATE(EMISS)
start_domain_nmm.F:      DEALLOCATE(GLW)
start_domain_nmm.F:      DEALLOCATE(HFX)
start_domain_nmm.F:      DEALLOCATE(LOWLYR)
start_domain_nmm.F:!     DEALLOCATE(MAVAIL)
start_domain_nmm.F:      DEALLOCATE(NCA)
start_domain_nmm.F:      DEALLOCATE(QFX)
start_domain_nmm.F:      DEALLOCATE(RAINBL)
start_domain_nmm.F:      DEALLOCATE(RAINC)
start_domain_nmm.F:      DEALLOCATE(RAINNC)
start_domain_nmm.F:      DEALLOCATE(RAINNCV)
start_domain_nmm.F:      DEALLOCATE(RQCBLTEN)
start_domain_nmm.F:      DEALLOCATE(RQIBLTEN)
start_domain_nmm.F:      DEALLOCATE(RQVBLTEN)
start_domain_nmm.F:      DEALLOCATE(RTHBLTEN)
start_domain_nmm.F:      DEALLOCATE(RUBLTEN)
start_domain_nmm.F:      DEALLOCATE(RVBLTEN)
start_domain_nmm.F:      DEALLOCATE(RQCCUTEN)
start_domain_nmm.F:      DEALLOCATE(RQICUTEN)
start_domain_nmm.F:      DEALLOCATE(RQRCUTEN)
start_domain_nmm.F:      DEALLOCATE(RQSCUTEN)
start_domain_nmm.F:      DEALLOCATE(RQVCUTEN)
start_domain_nmm.F:      DEALLOCATE(RTHCUTEN)
start_domain_nmm.F:      DEALLOCATE(RTHRATEN)
start_domain_nmm.F:      DEALLOCATE(RTHRATENLW)
start_domain_nmm.F:      DEALLOCATE(RTHRATENSW)
start_domain_nmm.F:      DEALLOCATE(ZINT)
start_domain_nmm.F:      DEALLOCATE(CONVFAC)
start_domain_nmm.F:      DEALLOCATE(RRI)
start_domain_nmm.F:!     DEALLOCATE(ZMID)
start_domain_nmm.F:      DEALLOCATE(SNOWC)
start_domain_nmm.F:      DEALLOCATE(THC)
start_domain_nmm.F:      DEALLOCATE(TMN)
start_domain_nmm.F:      DEALLOCATE(TSFC)
start_domain_nmm.F:      DEALLOCATE(ZS)
start_domain_nmm.F:      DEALLOCATE(CLDFRA_TRANS)
start_domain_nmm.F:      DEALLOCATE(CLDFRA_OLD)
start_domain_nmm.F:      DEALLOCATE(W0AVG)