/[MITgcm]/MITgcm_contrib/plumes/plume2dyn.F
ViewVC logotype

Diff of /MITgcm_contrib/plumes/plume2dyn.F

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

revision 1.4 by molod, Wed May 26 03:10:27 2004 UTC revision 1.5 by molod, Wed May 26 14:17:41 2004 UTC
# Line 88  C the angle given by uref and vref Line 88  C the angle given by uref and vref
88          else          else
89           qdyn1(i,j,L,bi,bj) = qplumeav(i,j,L)           qdyn1(i,j,L,bi,bj) = qplumeav(i,j,L)
90           qdyn2(i,j,L,bi,bj) = 0.           qdyn2(i,j,L,bi,bj) = 0.
91            endif
92         enddo         enddo
93         enddo         enddo
94         enddo         enddo
Legend:
Removed from v.1.4  
changed lines
  Added in v.1.5
  ViewVC Help
Powered by ViewVC 1.1.22