Skip to content

Commit

Permalink
Reverting commenting out a print statement.
Browse files Browse the repository at this point in the history
  • Loading branch information
EricJames-NOAA committed Aug 30, 2024
1 parent 92b6345 commit 948cb6d
Showing 1 changed file with 4 additions and 4 deletions.
8 changes: 4 additions & 4 deletions sorc/ncep_post.fd/INITPOST_MPAS.F
Original file line number Diff line number Diff line change
Expand Up @@ -607,8 +607,8 @@ SUBROUTINE INITPOST_MPAS
do j = jsta_2l, jend_2u
do i = 1, im
qqni ( i, j, l ) = dum3d ( i, j, l )
! if(i==im/2.and.j==(jsta+jend)/2)print*,'sample QQNI= ', &
! i,j,l,QQNI ( i, j, l )
if(i==im/2.and.j==(jsta+jend)/2)print*,'sample QQNI= ', &
i,j,l,QQNI ( i, j, l )
end do
end do
end do
Expand All @@ -619,8 +619,8 @@ SUBROUTINE INITPOST_MPAS
do j = jsta_2l, jend_2u
do i = 1, im
qqnr ( i, j, l ) = dum3d ( i, j, l )
! if(i==im/2.and.j==(jsta+jend)/2)print*,'sample QQNR= ', &
! i,j,l,QQNR ( i, j, l )
if(i==im/2.and.j==(jsta+jend)/2)print*,'sample QQNR= ', &
i,j,l,QQNR ( i, j, l )
end do
end do
end do
Expand Down

0 comments on commit 948cb6d

Please sign in to comment.