/[MITgcm]/MITgcm/pkg/rbcs/RBCS_FIELDS.h
ViewVC logotype

Contents of /MITgcm/pkg/rbcs/RBCS_FIELDS.h

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

Revision 1.1 - (show annotations) (download)
Sat May 14 19:52:12 2011 UTC (12 years, 11 months ago) by jmc
Branch: MAIN
CVS Tags: checkpoint64y, checkpoint64x, checkpoint64z, checkpoint64q, checkpoint64p, checkpoint64s, checkpoint64r, checkpoint64u, checkpoint64t, checkpoint64w, checkpoint64v, 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, checkpoint65, checkpoint63, checkpoint66g, checkpoint66f, checkpoint66e, checkpoint66d, checkpoint66c, checkpoint66b, checkpoint66a, checkpoint66o, checkpoint66n, checkpoint66m, checkpoint66l, checkpoint66k, checkpoint66j, checkpoint66i, checkpoint66h, checkpoint65z, checkpoint65x, checkpoint65y, checkpoint65r, checkpoint65s, checkpoint65p, checkpoint65q, checkpoint65v, checkpoint65w, checkpoint65t, checkpoint65u, checkpoint65j, checkpoint65k, checkpoint65h, checkpoint65i, checkpoint65n, checkpoint65o, checkpoint65l, checkpoint65m, checkpoint65b, checkpoint65c, checkpoint65a, checkpoint65f, checkpoint65g, checkpoint65d, checkpoint65e, checkpoint62z, checkpoint62y, HEAD
File MIME type: text/plain 
- split RBCS.h into 3 files: RBCS_SIZE.h  RBCS_PARAMS.h  RBCS_FIELDS.h
- add capability to apply relaxation to horizontal velocity uVel & vVel
1 C $Header: /u/gcmpack/MITgcm/pkg/rbcs/RBCS.h,v 1.10 2011/04/20 01:42:53 jmc Exp $
2 C $Name: $
3
4 #ifdef ALLOW_RBCS
5
6 CBOP
7 C !ROUTINE: RBCS_FIELDS.h
8 C !INTERFACE:
9
10 C !DESCRIPTION:
11 C Contains RBCS fields for 3-D relaxation
12 CEOP
13
14 C--- RBCS 3-D Fields:
15
16 #ifndef DISABLE_RBCS_MOM
17 _RS RBC_maskU(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
18 _RS RBC_maskV(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
19 _RL RBCuVel(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
20 _RL RBCvVel(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
21 COMMON /RBCS_MASKS_UV/
22 & RBC_maskU,
23 & RBC_maskV
24 COMMON /RBCS_FIELDS_UV/
25 & RBCuVel,
26 & RBCvVel
27 #endif
28 _RS RBC_mask(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy,maskLEN)
29 _RL RBCtemp(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
30 _RL RBCsalt(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
31 COMMON /RBCS_MASKS_TR/
32 & RBC_mask
33 COMMON /RBCS_FIELDS_TS/
34 & RBCtemp,
35 & RBCsalt
36
37 #ifdef ALLOW_PTRACERS
38 _RL RBC_ptracers(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy,
39 & PTRACERS_num)
40 COMMON /RBCS_PTR_FIELDS/
41 & RBC_ptracers
42 #endif /* ALLOW_PTRACERS */
43
44 C rbcsLdRec :: time-record currently loaded (in temp arrays *[1])
45 COMMON /RBCS_LOAD_I/ rbcsLdRec
46 INTEGER rbcsLdRec(nSx,nSy)
47 #ifndef DISABLE_RBCS_MOM
48 COMMON /RBCS_LOADED_UV/
49 & rbcu0, rbcv0,
50 & rbcu1, rbcv1
51 _RS rbcu0 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
52 _RS rbcu1 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
53 _RS rbcv0 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
54 _RS rbcv1 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
55 #endif
56 COMMON /RBCS_LOADED_TS/
57 & rbct0, rbcs0,
58 & rbct1, rbcs1
59 _RS rbct0 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
60 _RS rbct1 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
61 _RS rbcs0 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
62 _RS rbcs1 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
63
64 #ifdef ALLOW_PTRACERS
65 COMMON /RBCS_LOADED_PTR/
66 & rbcptr0, rbcptr1
67 _RS rbcptr0(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy,
68 & PTRACERS_num)
69 _RS rbcptr1(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy,
70 & PTRACERS_num)
71 #endif /* ALLOW_PTRACERS */
72
73 #endif /* ALLOW_RBCS */
  ViewVC Help
Powered by ViewVC 1.1.22