New URL for NEMO forge!   http://forge.nemo-ocean.eu

Since March 2022 along with NEMO 4.2 release, the code development moved to a self-hosted GitLab.
This present forge is now archived and remained online for history.
fbaccdata.F90 in branches/UKMO/r6232_tracer_advection/NEMOGCM/TOOLS/OBSTOOLS/src – NEMO

source: branches/UKMO/r6232_tracer_advection/NEMOGCM/TOOLS/OBSTOOLS/src/fbaccdata.F90 @ 9295

Last change on this file since 9295 was 3000, checked in by djlea, 12 years ago

Updated obstools. Addition of headers to programs which explain what each utility does and how to run it. All the programs now build using the naketools utility.

File size: 641 bytes
Line 
1MODULE fbaccdata
2   USE fbacctype
3   IMPLICIT NONE
4   INTEGER, DIMENSION(:,:,:,:,:), ALLOCATABLE :: inum,inumov,inumbv
5   INTEGER, DIMENSION(:,:,:,:), ALLOCATABLE :: inuma
6   REAL, DIMENSION(:,:,:,:,:), ALLOCATABLE :: zbias,zrms,zsdev,zomean,zmmean,&
7      & zoemea,zovmea,zbemea,zbvmea
8   REAL, DIMENSION(:,:,:,:), ALLOCATABLE :: zoamean
9   INTEGER, PARAMETER :: maxvars = 10
10   REAL, DIMENSION(maxvars) :: zcheck
11   REAL, DIMENSION(maxvars) :: zhistmax, zhistmin, zhiststep
12   TYPE(histtype), DIMENSION(maxvars) :: hist
13   REAL, DIMENSION(maxvars) :: zxymax, zxymin, zxystep
14   TYPE(xytype), DIMENSION(maxvars) :: xy
15END MODULE fbaccdata
16
Note: See TracBrowser for help on using the repository browser.