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:
parent
2ee6c1764e
commit
386ddd82dd
5 changed files with 18 additions and 8 deletions
|
|
@ -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
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue