/[MITgcm]/MITgcm/pkg/grdchk/grdchk_readparms.F
ViewVC logotype

Diff of /MITgcm/pkg/grdchk/grdchk_readparms.F

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

revision 1.4 by heimbach, Sat Jul 13 02:55:58 2002 UTC revision 1.5 by heimbach, Fri Feb 28 02:34:56 2003 UTC
# Line 3  C $Header$ Line 3  C $Header$
3  #include "CPP_OPTIONS.h"  #include "CPP_OPTIONS.h"
4    
5    
6        subroutine grdchk_readparms(        subroutine grdchk_readparms( mythid )
      I                        mythid  
      &                      )  
7    
8  c     ==================================================================  c     ==================================================================
9  c     SUBROUTINE grdchk_readparms  c     SUBROUTINE grdchk_readparms
# Line 63  c--   Optimization parameters. Line 61  c--   Optimization parameters.
61       &                  nstep,       &                  nstep,
62       &                  nend,       &                  nend,
63       &                  grdchkvarindex,       &                  grdchkvarindex,
64       &                  useCentralDiff       &                  useCentralDiff,
65         &                  grdchkwhichproc
66    
67        jtlo = mybylo(mythid)        jtlo = mybylo(mythid)
68        jthi = mybyhi(mythid)        jthi = mybyhi(mythid)
# Line 77  c--   Optimization parameters. Line 76  c--   Optimization parameters.
76        _BEGIN_MASTER( mythid )        _BEGIN_MASTER( mythid )
77    
78  c--     Set default values.  c--     Set default values.
79          grdchk_eps = 1. _d 0          grdchk_eps      = 1. _d 0
80          nbeg       = 1          nbeg            = 1
81          nend       = 1          nend            = 1
82          nstep      = 1          nstep           = 1
83          useCentralDiff = .TRUE.          useCentralDiff  = .TRUE.
84            grdchkwhichproc = 0
85    
86  c--     Check versions.  c--     Check versions.
87    
Legend:
Removed from v.1.4  
changed lines
  Added in v.1.5
  ViewVC Help
Powered by ViewVC 1.1.22