! Defintion of emit variable
     
      integer n_grid
      integer cell_grid
      integer landc_type, soil_comp
      integer nday
      integer initflg
 
!  nhour_max
      integer CMZListNum
       
      parameter (n_grid = 95)
      parameter (cell_grid = 12)
      parameter (landc_type = 265)
      parameter (soil_comp = 8949) 
!      parameter (day = 60)
      parameter (CMZListNum = 117)
      parameter (nday = 3)
!      parameter (nhour_max = 49) 


      integer soilDim(n_grid,n_grid,cell_grid,cell_grid)
      integer landcov(n_grid,n_grid,cell_grid,cell_grid)
      integer landcovIDX(n_grid,n_grid,cell_grid,cell_grid)
      integer cmzListIDX(CMZListNum)
      integer cmzListCode(CMZListNum)
      character*124 cmzListName(CMZListNum)
      integer cligenidx(n_grid,n_grid)
      integer wingenidx(n_grid,n_grid)   
      integer rdx(cell_grid,cell_grid)

! changed from day to nday
      real :: etotal(nday,n_grid,n_grid)
      real :: essp(nday,n_grid,n_grid)
      real :: epm10(nday,n_grid,n_grid)

! Hourly esosion output
      real :: ahgt(24)   
      real :: ahssp(24)
      real :: ahpm10(24)

! Define variables for cligen and wingen
      real :: temp_max(n_grid,n_grid,nday)
      real :: temp_min(n_grid,n_grid,nday)
      real :: temp_ave(n_grid,n_grid,nday)
      real :: temp_sum(n_grid,n_grid,nday)
      real :: awe_prec(n_grid,n_grid,nday)
      real :: awe_rad(n_grid,n_grid,nday)
      real :: wdsp_hr(n_grid,n_grid,nday,24)
      real :: awe_dir(n_grid,n_grid,nday)
      real :: awe_dew(n_grid,n_grid,nday)
      real :: wu_max(n_grid,n_grid,nday)
      real :: wu_min(n_grid,n_grid,nday) 
   
! soilDim - soil cover dimension
! landcov - landcov dimension
! cligendx - spatial cligen station data for each grid
! wingendx - spatial wingen station data for each grid
! rdx - regional index which will replace isr for regional run of WEPS
! day - to define the days to run the model
      common /spatialGIS/soilDim,landcov,rdx,cligenidx,wingenidx,       & 
     &        cmzListIDX,cmzListCode,cmzListName,landcovIDX,            &
     &       temp_max,temp_min,temp_ave,temp_sum,awe_prec,wdsp_hr,      &
     &       awe_rad,awe_dew,wu_max,wu_min, etotal,essp,epm10,ahgt,     &
     &       ahssp,ahpm10,initflg

 
!   soilDim - soil spatial dimenion