Skip to content

Commit 93973d6

Browse files
committed
fix: invalid Fortran continuation in m_ibm.fpp breaks Cray ftn build
Line ending with & followed by a continuation line with only & and a comment is non-standard. Cray ftn (ftn-71) rejects it. Move the comment to its own line.
1 parent 55ded73 commit 93973d6

1 file changed

Lines changed: 2 additions & 2 deletions

File tree

src/simulation/m_ibm.fpp

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -1179,8 +1179,8 @@ contains
11791179
else ! we do not have an analytic moment of inertia calculation and need to approximate it directly via a sum
11801180
count = 0
11811181
moment = 0._wp
1182-
cell_volume = (x_cc(1) - x_cc(0))*(y_cc(1) - y_cc(0)) &
1183-
& ! computed without grid stretching. Update in the loop to perform with stretching
1182+
! computed without grid stretching; update in the loop to perform with stretching
1183+
cell_volume = (x_cc(1) - x_cc(0))*(y_cc(1) - y_cc(0))
11841184
if (p /= 0) then
11851185
cell_volume = cell_volume*(z_cc(1) - z_cc(0))
11861186
end if

0 commit comments

Comments
 (0)