/[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.20 by mlosch, Thu Apr 24 07:42:37 2008 UTC revision 1.21 by mlosch, Thu Apr 24 08:22:06 2008 UTC
# Line 50  C     iUnit       - Work variable for IO Line 50  C     iUnit       - Work variable for IO
50       &          OBNuiceFile,OBSuiceFile,OBEuiceFile,OBWuiceFile,       &          OBNuiceFile,OBSuiceFile,OBEuiceFile,OBWuiceFile,
51       &          OBNviceFile,OBSviceFile,OBEviceFile,OBWviceFile,       &          OBNviceFile,OBSviceFile,OBEviceFile,OBWviceFile,
52       &          useOBCSsponge, useOBCSbalance, useOBCSprescribe,       &          useOBCSsponge, useOBCSbalance, useOBCSprescribe,
53       &          OBCSprintDiags, useOBCSYearlyFields       &          OBCSprintDiags, useOBCSYearlyFields, OBCSfixTopo
54  #ifdef ALLOW_PTRACERS  #ifdef ALLOW_PTRACERS
55       &        , OBNptrFile,OBSptrFile,OBEptrFile,OBWptrFile       &        , OBNptrFile,OBSptrFile,OBEptrFile,OBWptrFile
56  #endif  #endif
# Line 102  C--   Default flags and values for OBCS Line 102  C--   Default flags and values for OBCS
102        useOBCSprescribe   =.FALSE.        useOBCSprescribe   =.FALSE.
103        OBCSprintDiags     =.TRUE.        OBCSprintDiags     =.TRUE.
104        useOBCSYearlyFields=.FALSE.        useOBCSYearlyFields=.FALSE.
105          OBCSfixTopo        =.FALSE.
106    
107        OBNuFile = ' '        OBNuFile = ' '
108        OBNvFile = ' '        OBNvFile = ' '
Legend:
Removed from v.1.20  
changed lines
  Added in v.1.21
  ViewVC Help
Powered by ViewVC 1.1.22