Implementation of average scheme and testing
New input variables to activate the average scheme. Still only computing the mean, no the standard deviation. Output checked with ALPHIE Grid example. Looks good. No impact on CPU time, although testing is still required.
This commit is contained in:
parent
c5c4cbefbf
commit
38d28887ff
3 changed files with 43 additions and 1 deletions
|
|
@ -114,6 +114,8 @@ PROGRAM fpakc
|
|||
!$OMP SINGLE
|
||||
tEMField = omp_get_wtime() - tEMField
|
||||
|
||||
CALL doAverage(t)
|
||||
|
||||
tStep = omp_get_wtime() - tStep
|
||||
|
||||
!Output data
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue