/[MITgcm]/MITgcm/pkg/dic/DIC_DIAGS.h
ViewVC logotype

Contents of /MITgcm/pkg/dic/DIC_DIAGS.h

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph

Revision 1.4 - (show annotations) (download)
Sat Jan 2 23:07:39 2010 UTC (14 years, 8 months ago) by jmc
Branch: MAIN
CVS Tags: checkpoint64p, checkpoint64i, checkpoint64h, checkpoint64k, checkpoint64j, checkpoint64m, checkpoint64l, checkpoint64o, checkpoint64n, checkpoint64a, checkpoint64c, checkpoint64b, checkpoint64e, checkpoint64d, checkpoint64g, checkpoint64f, checkpoint63p, checkpoint63q, checkpoint63r, checkpoint63s, checkpoint63l, checkpoint63m, checkpoint63n, checkpoint63o, checkpoint63h, checkpoint63i, checkpoint63j, checkpoint63k, checkpoint63d, checkpoint63e, checkpoint63f, checkpoint63g, checkpoint63a, checkpoint63b, checkpoint63c, checkpoint64, checkpoint63, checkpoint62c, checkpoint62b, checkpoint62a, checkpoint62g, checkpoint62f, checkpoint62e, checkpoint62d, checkpoint62k, checkpoint62j, checkpoint62i, checkpoint62h, checkpoint62o, checkpoint62n, checkpoint62m, checkpoint62l, checkpoint62s, checkpoint62r, checkpoint62q, checkpoint62p, checkpoint62w, checkpoint62v, checkpoint62u, checkpoint62t, checkpoint62z, checkpoint62y, checkpoint62x
Changes since 1.3: +33 -33 lines
File MIME type: text/plain 
- remove tab in source code
- time-ave: fix (simpler, no level index) cumulative-time counter: OBS_timetave
- to do: fix monthly cumulative-time counter "obsm_timetave"
1 C $Header: /u/gcmpack/MITgcm/pkg/dic/DIC_DIAGS.h,v 1.3 2007/08/24 16:08:37 dfer Exp $
2 C $Name: $
3
4 #ifdef ALLOW_DIC_COST
5
6 c DIC_DIAGS.h
7 _RL po4obs (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
8 _RL o2obs (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
9 _RL po4ann (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
10 _RL o2ann (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
11 _RL OBS_timetave(nSx,nSy)
12 _RL po4var(Nr)
13 _RL o2var(Nr)
14 COMMON /DIC_AVERAGE/
15 & po4obs, o2obs, po4ann, o2ann, OBS_timetave, po4var, o2var
16
17 _RL po4obsl1(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
18 _RL po4obsl2(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
19 _RL po4obsl3(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
20 cQQ _RL po4obsl4(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
21 _RL o2obsl1 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
22 _RL o2obsl2 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
23 _RL o2obsl3 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
24 cQQ _RL o2obsl4 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
25 _RL po4lev1 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,12,nSx,nSy)
26 _RL po4lev2 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,12,nSx,nSy)
27 _RL po4lev3 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,12,nSx,nSy)
28 cQQ _RL po4lev4 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,12,nSx,nSy)
29 _RL o2lev1 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,12,nSx,nSy)
30 _RL o2lev2 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,12,nSx,nSy)
31 _RL o2lev3 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,12,nSx,nSy)
32 cQQ _RL O2lev4 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,12,nSx,nSy)
33 _RL obsm_timetave(12,nSx,nSy)
34 _RL po4varm(12,3)
35 _RL o2varm(12,3)
36 COMMON /DIC_AVERAGE_MONTH/
37 & po4obsl1, po4obsl2, po4obsl3,
38 & o2obsl1, o2obsl2, o2obsl3,
39 & po4lev1, po4lev2, po4lev3 ,
40 & o2lev1 , o2lev2 , o2lev3 ,
41 & obsm_timetave, po4varm, o2varm
42
43 #endif /* ALLOW_DIC_COST */
44
45 CEH3 ;;; Local Variables: ***
46 CEH3 ;;; mode:fortran ***
47 CEH3 ;;; End: ***
  ViewVC Help
Powered by ViewVC 1.1.22