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 | heimbach | 1.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 |