Skip to content

Commit 4ac3e67

Browse files
Remove comments
1 parent 8ea881d commit 4ac3e67

1 file changed

Lines changed: 4 additions & 4 deletions

File tree

src/simulation/m_ib_patches.fpp

Lines changed: 4 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -567,10 +567,10 @@ contains
567567
else
568568
f = (airfoil_grid_l(k)%x - xyz_local(1))/(airfoil_grid_l(k)%x - airfoil_grid_l(k - 1)%x)
569569
570-
! if (xyz_local(2) >= ((1._wp - f)*airfoil_grid_l(k)%y + f*airfoil_grid_l(k - 1)%y)) then
571-
! !!IB
572-
! ib_markers_sf(i, j, l) = patch_id
573-
! end if
570+
if (xyz_local(2) >= ((1._wp - f)*airfoil_grid_l(k)%y + f*airfoil_grid_l(k - 1)%y)) then
571+
!!IB
572+
ib_markers_sf(i, j, l) = patch_id
573+
end if
574574
end if
575575
end if
576576
end if

0 commit comments

Comments
 (0)