Skip to content

Commit 8067087

Browse files
author
Daniel Vickers
committed
Moved implicity statement that was no longer needed
1 parent 7051855 commit 8067087

File tree

1 file changed

+0
-3
lines changed

1 file changed

+0
-3
lines changed

src/simulation/m_ibm.fpp

Lines changed: 0 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -1065,8 +1065,6 @@ contains
10651065
patch_ib(i)%torque(:) = matmul(patch_ib(i)%rotation_matrix_inverse, torques(i, :)) ! torques must be computed in the local coordinates of the IB
10661066
end do
10671067
1068-
print *, forces(1, 1:2)
1069-
10701068
end subroutine s_compute_ib_forces
10711069
10721070
!> Subroutine to deallocate memory reserved for the IBM module
@@ -1150,7 +1148,6 @@ contains
11501148
end subroutine s_compute_moment_of_inertia
11511149
11521150
function cross_product(a, b) result(c)
1153-
implicit none
11541151
real(wp), intent(in) :: a(3), b(3)
11551152
real(wp) :: c(3)
11561153

0 commit comments

Comments
 (0)