JGonzalez/fpakc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Adding a time step for collisions

Browse source 
A new option has been added in which MCC are computed with its own time
step.

If no time is provided, then the minimum time step of the simulation is
employed.
This commit is contained in:
Jorge Gonzalez 2021-06-15 10:40:13 +02:00
commit b6a7eb9ced
9 changed files with 88 additions and 53 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/fpakc.f90
View file

@ -70,7 +70,7 @@ PROGRAM fpakc
tColl = omp_get_wtime()
!$OMP END SINGLE
IF (ASSOCIATED(meshForMCC)) CALL meshForMCC%doCollisions()
IF (ASSOCIATED(meshForMCC)) CALL meshForMCC%doCollisions(t)
!$OMP SINGLE
tColl = omp_get_wtime() - tColl