Skip to content

Commit 1a9c683

Browse files
wilfonbaclaude
authored andcommitted
build fixes for MPI bug fixes
1 parent 617de41 commit 1a9c683

1 file changed

Lines changed: 2 additions & 2 deletions

File tree

src/simulation/m_bubbles_EL.fpp

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -953,9 +953,9 @@ contains
953953

954954
call nvtxStartRange("BUBBLES-LAGRANGE-BETA-COMM")
955955
if (lag_params%cluster_type >= 4) then
956-
call s_populate_beta_buffers(q_beta, bc_type, 3)
956+
call s_populate_beta_buffers(q_beta, kahan_comp, bc_type, 3)
957957
else
958-
call s_populate_beta_buffers(q_beta, bc_type, 2)
958+
call s_populate_beta_buffers(q_beta, kahan_comp, bc_type, 2)
959959
end if
960960
call nvtxEndRange
961961

0 commit comments

Comments
 (0)