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

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

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

revision 1.1 by cnh, Thu Aug 20 20:21:23 1998 UTC revision 1.2 by cnh, Sat Aug 22 17:51:07 1998 UTC
# Line 44  C     Term is the vertical integral of t Line 44  C     Term is the vertical integral of t
44  C     time tendency terms along with a relaxation term that  C     time tendency terms along with a relaxation term that
45  C     pulls div(U) + dh/dt back toward zero.  C     pulls div(U) + dh/dt back toward zero.
46    
47        IF ( k .EQ. nZ ) THEN        IF ( k .EQ. Nr ) THEN
48  C      Initialise source term on first pass  C      Initialise source term on first pass
49         DO j=jMin,jMax         DO j=jMin,jMax
50          DO i=iMin,iMax          DO i=iMin,iMax
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2
  ViewVC Help
Powered by ViewVC 1.1.22