anchor.diff:     ! USE module_domain, ONLY : HISTORY_ALARM, Is_alarm_tstep  ! GT
      ! USE module_mp_radar
   
  -! USE WRF PHYSICS CONSTANTS
  +! USE WRF PHYSICS CONSTANTS taken from ICAR data_structures module
     use data_structures, ONLY: CP, G=>gravity, R => Rd, RV => Rw, EP_2=>EP2
   !  USE module_state_description
   
  
positive.code: ! ISUB = 0, INCLUDE SUB-GRID W (RECOMMENDED FOR LOWER RESOLUTION)
  ! ISUB = 1, EXCLUDE SUB-GRID W, ONLY USE GRID-SCALE W
  
       INTEGER, PRIVATE ::  ISUB      
  
  ! SWITCH FOR GRAUPEL/NO GRAUPEL
  ! IGRAUP = 0, INCLUDE GRAUPEL
  
negative.code:           NI(i,k,j)        = NI1D(k)
            NS(i,k,j)        = NS1D(k)          
            NR(i,k,j)        = NR1D(k)
  	      QG(I,K,j)        = QG1D(K)
            NG(I,K,j)        = NG1D(K)
  
            T(i,k,j)         = T1D(k)
  