Skip to content

Commit 03a99d9

Browse files
authored
Merge pull request #650 from naveenragur/patch-1
Updated comment section fgmax_values.f90
2 parents 271bea3 + 1a0da90 commit 03a99d9

File tree

1 file changed

+3
-3
lines changed

1 file changed

+3
-3
lines changed

src/2d/shallow/fgmax_values.f90

Lines changed: 3 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -12,9 +12,9 @@ subroutine fgmax_values(mx,my,meqn,mbc,maux,q,aux,dx,dy, &
1212
! This library routine expects FG_NUM_VAL to be 1, 2, or 5 and sets:
1313
! values(1,i,j) = h (if FG_NUM_VAL >= 1)
1414
! values(2,i,j) = speed (if FG_NUM_VAL >= 2)
15-
! values(1,i,j) = momentum (if FG_NUM_VAL == 5)
16-
! values(1,i,j) = momentum flux (if FG_NUM_VAL == 5)
17-
! values(1,i,j) = -depth (if FG_NUM_VAL == 5)
15+
! values(3,i,j) = momentum (if FG_NUM_VAL == 5)
16+
! values(4,i,j) = momentum flux (if FG_NUM_VAL == 5)
17+
! values(5,i,j) = -depth (if FG_NUM_VAL == 5)
1818
! The max of -depth can be used to determin the minimum depth of water
1919
! at a point over the computation, useful in harbors where ships may be
2020
! grounded if the depth goes too low.

0 commit comments

Comments
 (0)