/[MITgcm]/MITgcm/pkg/diagnostics/diagnostics_fract_fill.F
ViewVC logotype

Diff of /MITgcm/pkg/diagnostics/diagnostics_fract_fill.F

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

revision 1.3 by jmc, Mon Jun 5 18:17:22 2006 UTC revision 1.4 by jmc, Mon Jul 31 16:26:32 2006 UTC
# Line 84  C =============== Line 84  C ===============
84        CHARACTER*(MAX_LEN_MBUF) msgBuf        CHARACTER*(MAX_LEN_MBUF) msgBuf
85    
86        IF ( bibjFlg.EQ.0 ) THEN        IF ( bibjFlg.EQ.0 ) THEN
87          bi = 1          bi = myBxLo(myThid)
88          bj = 1          bj = myByLo(myThid)
89        ELSE        ELSE
90          bi = biArg          bi = biArg
91          bj = bjArg          bj = bjArg
Legend:
Removed from v.1.3  
changed lines
  Added in v.1.4
  ViewVC Help
Powered by ViewVC 1.1.22