/[MITgcm]/MITgcm/pkg/thsice/thsice_step_temp.F
ViewVC logotype

Diff of /MITgcm/pkg/thsice/thsice_step_temp.F

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

revision 1.10 by heimbach, Sat Oct 16 12:29:39 2010 UTC revision 1.11 by heimbach, Sat Oct 16 19:22:34 2010 UTC
# Line 164  CADJ STORE tice2(:,:,bi,bj) = comlev1_bi Line 164  CADJ STORE tice2(:,:,bi,bj) = comlev1_bi
164  CADJ STORE sheating(:,:,bi,bj) = comlev1_bibj, key=iicekey, byte=isbyte  CADJ STORE sheating(:,:,bi,bj) = comlev1_bibj, key=iicekey, byte=isbyte
165  #endif  #endif
166         CALL THSICE_SOLVE4TEMP(         CALL THSICE_SOLVE4TEMP(
167       I          bi, bj, siLo, siHi, sjLo, sjHi,       I          bi, bj,
168       I          iMin,iMax, jMin,jMax, dBugFlag,       I          iMin,iMax, jMin,jMax, dBugFlag,
169       I          useBulkForce, useEXF,       I          useBulkForce, useEXF,
170       I          iceMask(siLo,sjLo,bi,bj), iceHeight(siLo,sjLo,bi,bj),       I          iceMask(siLo,sjLo,bi,bj), iceHeight(siLo,sjLo,bi,bj),
Legend:
Removed from v.1.10  
changed lines
  Added in v.1.11
  ViewVC Help
Powered by ViewVC 1.1.22