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 |