diff --git a/src/simulation/m_ibm.fpp b/src/simulation/m_ibm.fpp index 5f865cffeb..d1f0e88cd4 100644 --- a/src/simulation/m_ibm.fpp +++ b/src/simulation/m_ibm.fpp @@ -201,6 +201,7 @@ contains k = gp%loc(2) l = gp%loc(3) patch_id = ghost_points(i)%ib_patch_id + call s_decode_patch_periodicity(patch_id, patch_id) ! Calculate physical location of GP if (p > 0) then