Probes in 0 iteration

Probes are now written at the 0 iteration.

Additionally, and this shouldn't be done, some small changes to the quad
elements. This should be done in a separate commit, but I'm lazy.
This commit is contained in:
Jorge Gonzalez 2023-02-23 13:36:31 +01:00
commit 386ddd82dd
5 changed files with 18 additions and 8 deletions

View file

@ -91,7 +91,13 @@ MODULE moduleProbe
1:self%nv(3)))
!Number of iterations between output
self%every = NINT(timeStep/ tauMin / ti_ref)
IF (timeStep == 0.D0) THEN
self%every = 1
ELSE
self%every = NINT(timeStep/ tauMin / ti_ref)
END IF
!Maximum radius
!TODO: Make this an input parameter
@ -270,7 +276,7 @@ MODULE moduleProbe
DO i = 1, nProbes
probe(i)%f = 0.D0
probe(i)%update = MOD(t, probe(i)%every) == 0 .OR. t == tFinal .OR. t == tInitial
probe(i)%update = t == tFinal .OR. t == tInitial .OR. MOD(t, probe(i)%every) == 0
END DO