source: CIVL/examples/fortran/nek5000/core/AVG

main
Last change on this file was ea777aa, checked in by Alex Wilton <awilton@…>, 3 years ago

Moved examples, include, build_default.properties, common.xml, and README out from dev.civl.com into the root of the repo.

git-svn-id: svn://vsl.cis.udel.edu/civl/trunk@5704 fb995dde-84ed-4084-dfe6-e5aef3e2452c

  • Property mode set to 100755
File size: 673 bytes
Line 
1c
2c Averaged fields
3c
4 real atime,timel
5 common /avgcmnr/ atime,timel
6
7 real uavg(ax1,ay1,az1,lelt)
8 $ , vavg(ax1,ay1,az1,lelt)
9 $ , wavg(ax1,ay1,az1,lelt)
10 $ , tavg(ax1,ay1,az1,lelt,ldimt)
11 $ , pavg(ax2,ay2,az2,lelt)
12 common /chkavg/ uavg, vavg, wavg, tavg, pavg
13
14 real urms(ax1,ay1,az1,lelt)
15 $ , vrms(ax1,ay1,az1,lelt)
16 $ , wrms(ax1,ay1,az1,lelt)
17 $ , trms(ax1,ay1,az1,lelt,ldimt)
18 $ , prms(ax2,ay2,az2,lelt)
19 $ , vwms(ax1,ay1,az1,lelt)
20 $ , wums(ax1,ay1,az1,lelt)
21 $ , uvms(ax1,ay1,az1,lelt)
22 common /chkrms/ urms, vrms, wrms, trms, prms, vwms, wums, uvms
23
Note: See TracBrowser for help on using the repository browser.