anchor.diff:         ijdim,        &
          kdim,         &
          lall,         &
  -!       test_case,    &
          nicamcore,    &
          DIAG_var      )
       use mod_adm, only: &
  
positive.code:        I_QV,      &
         NQW_MAX,   &
         TRC_vmax
  !       NCHEM_MAX, &
  !       NCHEM_STR, &
  !       NCHEM_END
      implicit none
  
      integer,          intent(in)  :: ijdim
  
negative.code: 
      integer, parameter :: deep    = 0 ! deep atmosphere (1 = yes or 0 = no)
      integer, parameter :: zcoords = 1 ! 1 if z is specified, 0 if p is specified
      integer            :: pert       ! type of perturbation (0 = no perturbation, 1 = perturbation)
  
      integer :: n, k, l
  