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

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

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

revision 1.46 by dimitri, Tue Sep 23 05:31:30 2003 UTC revision 1.47 by dimitri, Wed Sep 24 04:52:38 2003 UTC
# Line 439  C       relaxation terms, etc. Line 439  C       relaxation terms, etc.
439  #endif  #endif
440          CALL EXTERNAL_FORCING_SURF(          CALL EXTERNAL_FORCING_SURF(
441       I             bi, bj, iMin, iMax, jMin, jMax,       I             bi, bj, iMin, iMax, jMin, jMax,
442       I             myThid )       I             myTime, myIter, myThid )
443    
444  C--    end of if/else block useThermSeaIce --  C--    end of if/else block useThermSeaIce --
445         ENDIF         ENDIF
Legend:
Removed from v.1.46  
changed lines
  Added in v.1.47
  ViewVC Help
Powered by ViewVC 1.1.22