typo fix

NOAA-EMC · Jan 6, 2025 · 6da4a1e · 6da4a1e
1 parent 55b7d42
commit 6da4a1e
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/sorc/ncep_post.fd/UPP_PHYSICS.f b/sorc/ncep_post.fd/UPP_PHYSICS.f
@@ -4563,7 +4563,7 @@ subroutine calchipsi (uwnd,vwnd,chi,psi)
 !     
 !$omp  parallel do private(i,j)
       do j=jsta_2l,jend_2u
-      do i=ista_2l,iend,_2u
+      do i=ista_2l,iend_2u
         absv(i,j) = spval
 	div(i,j) = spval
         chi(i,j) = spval