Parent Directory
|
Revision Log
|
Revision Graph
Add a modified version of pkg/rbcs that allows several rbcs fields to be read with independent frequencies. The idea is for each i = 1 , ... , U/V/WnLEN one can define a separate mask and relaxation file and separate/independent periods.
1 | C $Header: /u/gcmpack/MITgcm/pkg/rbcs/RBCS_SIZE.h,v 1.1 2011/05/14 19:52:12 jmc Exp $ |
2 | C $Name: $ |
3 | |
4 | #ifdef ALLOW_RBCS |
5 | |
6 | CBOP |
7 | C !ROUTINE: RBCS_SIZE.h |
8 | C !INTERFACE: |
9 | |
10 | C !DESCRIPTION: |
11 | C Contains RBCS array size (number of tracer mask) |
12 | CEOP |
13 | |
14 | C--- RBCS Parameters: |
15 | C maskLEN :: number of mask to read |
16 | INTEGER maskLEN |
17 | PARAMETER( maskLEN = 3 ) |
18 | C adding multiple masks for momentum |
19 | |
20 | |
21 | C UmLEN :: number of U mask to read |
22 | INTEGER UmLEN |
23 | PARAMETER( UmLEN = 2 ) |
24 | |
25 | C VmLEN :: number of V mask to read |
26 | INTEGER VmLEN |
27 | PARAMETER( VmLEN = 0 ) |
28 | #ifdef ALLOW_NONHYDROSTATIC |
29 | C WmLEN :: number of W mask to read |
30 | INTEGER WmLEN |
31 | PARAMETER( WmLEN = 2 ) |
32 | #endif |
33 | #endif /* ALLOW_RBCS */ |
ViewVC Help | |
Powered by ViewVC 1.1.22 |