Corrections and some basic printing

This commit is contained in:
Jorge Gonzalez 2026-03-10 18:26:47 +01:00
commit a48e5111e7
4 changed files with 42 additions and 3 deletions

View file

@ -523,6 +523,8 @@ MODULE moduleSolver
USE moduleCaseParam, ONLY: timeStep
IMPLICIT NONE
integer:: b ! TEMPORARY
CALL outputProbes()
counterOutput = counterOutput + 1
@ -551,6 +553,17 @@ MODULE moduleSolver
END IF
WRITE(*,*)
! TEMPORARY
! Output of boundaries. TODO: Move this to mesh module
do b = 1, nBoundariesParticle
if (associated(boundariesParticle(b)%obj%print)) then
print *, b
call boundariesParticle(b)%obj%print()
end if
end do
END IF
counterCPUTime = counterCPUTime + 1