/[MITgcm]/MITgcm/model/src/dynamics.F
ViewVC logotype

Diff of /MITgcm/model/src/dynamics.F

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

revision 1.59 by cnh, Sun Feb 4 14:38:47 2001 UTC revision 1.60 by adcroft, Wed Feb 7 16:28:54 2001 UTC
# Line 286  C--       Integrate continuity verticall Line 286  C--       Integrate continuity verticall
286    
287  #ifdef    ALLOW_OBCS  #ifdef    ALLOW_OBCS
288  #ifdef    ALLOW_NONHYDROSTATIC  #ifdef    ALLOW_NONHYDROSTATIC
289  C--       Calculate future values on open boundaries  C--       Apply OBC to W if in N-H mode
290            IF (useOBCS.AND.nonHydrostatic) THEN            IF (useOBCS.AND.nonHydrostatic) THEN
291              CALL OBCS_APPLY_W( bi, bj, k, wVel, myThid )              CALL OBCS_APPLY_W( bi, bj, k, wVel, myThid )
292            ENDIF            ENDIF
Legend:
Removed from v.1.59  
changed lines
  Added in v.1.60
  ViewVC Help
Powered by ViewVC 1.1.22