Next: tubulence.F
Up: The Proudman Oceanographic Laboratory
Previous: tidbndrp2.F
Subsections
tidmeanout.F
subroutine tidemeanout
This routine provides daily means by carrying out a 25 hour
average of currents, temperature, salinity, turbulence parameters
and depthmean fluxes
 lu1,lu2,lu3 Logical units for output from routine
 itimttime in integer seconds
 ntimttime in seconds remaining after integer hours
 navtmtime in seconds remaining after integer days
 itimt4=itimt
 lu1logical unit for output of average u, v, temperature and
salinity
 lu2logical unit for output of turbulence parameters
 lu3logical unit for output of depthmean fluxes
 On very first call zero the storeage arrays
 Set storeage arrays to initial values
 Calculate Depth Mean fluxes
 For integer hours sum depth mean fluxes into storeage
 Sum u,v,s,t and turbulence parameters into storage arrays
 At integer days take 25 hour mean and write to output files
 Reinitialise storage arrays with present data set which becomes first
data set in next 25 hour averaging.
 out3dcompu
 out3dcomp
 out3d
 out2d
 data_out

 COMPOUT compressed output
 none
Next: tubulence.F
Up: The Proudman Oceanographic Laboratory
Previous: tidbndrp2.F
The AMMP Project
20050420