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/dev_2802_OBStools/NEMOGCM/TOOLS/OBSTOOLS/src – NEMO

source: branches/dev_2802_OBStools/NEMOGCM/TOOLS/OBSTOOLS/src/fbaccdata.F90 @ 3407

Last change on this file since 3407 was 3000, checked in by djlea, 13 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
RevLine 
[2945]1MODULE fbaccdata
[3000]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
[2945]9   INTEGER, PARAMETER :: maxvars = 10
10   REAL, DIMENSION(maxvars) :: zcheck
11   REAL, DIMENSION(maxvars) :: zhistmax, zhistmin, zhiststep
12   TYPE(histtype), DIMENSION(maxvars) :: hist
[3000]13   REAL, DIMENSION(maxvars) :: zxymax, zxymin, zxystep
14   TYPE(xytype), DIMENSION(maxvars) :: xy
[2945]15END MODULE fbaccdata
16
Note: See TracBrowser for help on using the repository browser.