This source code produces the the following .dat files which can be read by xmgrace (but you may have to remove the text from the first line).

Where the following notation is used: Production ~ , Turbulent diffusion ~ , Pressure diffusion ~ , Viscous diffusion ~ , Dissipation ~

Rij.dat :     , , , , , ,

k.dat :        , , , , , ,

upup.dat, , , , , ,

vpvp.dat, , , , , ,

wpwp.dat : , , , , , ,

upvp.dat :   , , , , , ,

triple_corr.dat : , , , ,

user.dat : , , 6 user defined statistics which should be inserted into dnsstat.F

 SUBROUTINE DNSTIME


The code has been set up for 6 additional user defined statistics which have been accumulated as follows

c=========================================================================
C    extra user defined statistics
C    feel free to add your own here or modify M1T, M2T, M3T, M4T, M5T, M6T
M1T(IEL) = M1T(IEL) + RA(IGRADV+((1-1)+3*(2-1))*NCELET+IEL-1)
SIGNE=QQ/ABS(QQ)
QQ=ABS(QQ)
IF (TT.NE.0) THEN
M2T(IEL) = M2T(IEL) + SIGNE*(DELTA**2.)*(QQ**1.5)*(TT**-1.0)
ENDIF
IF (QQ.GT.0) THEN
M3T(IEL) = M3T(IEL) + SIGNE*(DELTA**2.)*(QQ**1.0)*(TT**-0.5)
M4T(IEL) = M4T(IEL) + (DELTA**2.)*(QQ**0.5)
M5T(IEL) = M5T(IEL) + (DELTA**2.)*(QQ**0.25)*(TT**0.25)
M6T(IEL) = M6T(IEL) + (DELTA**1.5)*QQ**0.25*TT**0.125
ENDIF
c=========================================================================


Current Tags:
create new tag
, view all tags
Topic revision: r2 - 2010-01-22 - 09:43:19 - YacineKahil
Main Web
25 Sep 2018

Manchester CfdTm
Code_Saturne

ATAAC
KNOO

DESider
FLOMANIA

### Useful Links:

User Directory
Photo Wall
Upcoming Events
Add Event

Computational Fluid Dynamics and Turbulence Mechanics
@ the University of Manchester
Copyright © by the contributing authors. Unless noted otherwise, all material on this web site is the property of the contributing authors.