!
!  ARPS radar summation arrays
!
  REAL :: grdvel2(nx,ny,nz)
  REAL :: grdref2(nx,ny,nz)
  REAL :: wgtvel(nx,ny,nz)
  REAL :: wgtref(nx,ny,nz)
  REAL :: wpotvel(nx,ny,nz)
  REAL :: wpotref(nx,ny,nz)