/[MITgcm]/MITgcm/pkg/exf/exf_check_range.F
ViewVC logotype

Diff of /MITgcm/pkg/exf/exf_check_range.F

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

revision 1.25 by mlosch, Thu Jun 29 15:41:58 2006 UTC revision 1.26 by dimitri, Thu Feb 8 07:01:08 2007 UTC
# Line 50  c     == end of interface == Line 50  c     == end of interface ==
50        jthi = mybyhi(mythid)        jthi = mybyhi(mythid)
51        itlo = mybxlo(mythid)        itlo = mybxlo(mythid)
52        ithi = mybxhi(mythid)        ithi = mybxhi(mythid)
53        jmin = 1-oly  
54        jmax = sny+oly  C Change checking range because some atmospheric fields will
55        imin = 1-olx  C not always have valid values in the tile edges.
56        imax = snx+olx  C      jmin = 1-oly
57    C      jmax = sny+oly
58    C      imin = 1-olx
59    C      imax = snx+olx
60          jmin = 1
61          jmax = sny
62          imin = 1
63          imax = snx
64    
65        do bj = jtlo,jthi        do bj = jtlo,jthi
66         do bi = itlo,ithi         do bi = itlo,ithi
Legend:
Removed from v.1.25  
changed lines
  Added in v.1.26
  ViewVC Help
Powered by ViewVC 1.1.22