We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent 33afdec commit ce57253Copy full SHA for ce57253
src/simulation/m_rhs.fpp
@@ -1197,7 +1197,7 @@ contains
1197
end do
1198
1199
else
1200
-
+
1201
if (alt_soundspeed) then
1202
do j = advxb, advxe
1203
if ((j == advxe) .and. (bubbles .neqv. .true.)) then
@@ -1471,9 +1471,9 @@ contains
1471
! if (id == 1) then
1472
1473
! elseif (id == 2) then
1474
1475
! elseif (id == 3) then
1476
1477
! end if
1478
1479
! end subroutine s_compute_advection_source_term
0 commit comments