/[MITgcm]/MITgcm/pkg/obcs/obcs_readparms.F
ViewVC logotype

Diff of /MITgcm/pkg/obcs/obcs_readparms.F

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

revision 1.11 by mlosch, Mon Oct 10 05:53:48 2005 UTC revision 1.12 by mlosch, Tue Apr 4 07:46:17 2006 UTC
# Line 37  C     === Routine arguments === Line 37  C     === Routine arguments ===
37       &          OBSuFile,OBSvFile,OBStFile,OBSsFile,       &          OBSuFile,OBSvFile,OBStFile,OBSsFile,
38       &          OBEuFile,OBEvFile,OBEtFile,OBEsFile,       &          OBEuFile,OBEvFile,OBEtFile,OBEsFile,
39       &          OBWuFile,OBWvFile,OBWtFile,OBWsFile,       &          OBWuFile,OBWvFile,OBWtFile,OBWsFile,
40       &          useOBCSsponge, useOBCSbalance, useOBCSprescribe       &          useOBCSsponge, useOBCSbalance, useOBCSprescribe,
41         &          OBCSprintDiags
42  #ifdef ALLOW_PTRACERS  #ifdef ALLOW_PTRACERS
43       &        , OBNptrFile,OBSptrFile,OBEptrFile,OBWptrFile       &        , OBNptrFile,OBSptrFile,OBEptrFile,OBWptrFile
44  #endif  #endif
# Line 91  C--   Default flags and values for OBCS Line 92  C--   Default flags and values for OBCS
92        useOrlanskiWest =.FALSE.        useOrlanskiWest =.FALSE.
93        useOBCSsponge   =.FALSE.        useOBCSsponge   =.FALSE.
94        useOBCSbalance  =.FALSE.        useOBCSbalance  =.FALSE.
95        useOBCSprescribe = .FALSE.        useOBCSprescribe=.FALSE.
96          OBCSprintDiags  =.TRUE.
97    
98        OBNuFile = ' '        OBNuFile = ' '
99        OBNvFile = ' '        OBNvFile = ' '
Legend:
Removed from v.1.11  
changed lines
  Added in v.1.12
  ViewVC Help
Powered by ViewVC 1.1.22