/[MITgcm]/MITgcm/pkg/mom_fluxform/mom_u_adv_wu.F
ViewVC logotype

Diff of /MITgcm/pkg/mom_fluxform/mom_u_adv_wu.F

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

revision 1.8 by jmc, Tue Oct 19 02:43:06 2004 UTC revision 1.9 by jmc, Fri Nov 4 01:31:59 2005 UTC
# Line 47  C !LOCAL VARIABLES: ==================== Line 47  C !LOCAL VARIABLES: ====================
47  C  i,j                  :: loop indices  C  i,j                  :: loop indices
48        INTEGER I,J        INTEGER I,J
49  CEOP  CEOP
       _RL tmpFld(1-OLx:sNx+OLx,1-OLy:sNy+OLy)  
50    
51        IF ( k.EQ.Nr+1 .AND.        IF ( k.EQ.Nr+1 .AND.
52       &     useRealFreshWaterFlux .AND. usingPCoords ) THEN       &     useRealFreshWaterFlux .AND. usingPCoords ) THEN
Legend:
Removed from v.1.8  
changed lines
  Added in v.1.9
  ViewVC Help
Powered by ViewVC 1.1.22