/[MITgcm]/MITgcm/pkg/seaice/seaice_pickup.F
ViewVC logotype

Diff of /MITgcm/pkg/seaice/seaice_pickup.F

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

revision 1.16 by mlosch, Wed Dec 20 12:25:15 2006 UTC revision 1.17 by mlosch, Mon Apr 16 22:30:05 2007 UTC
# Line 82  C--    Read ice model fields Line 82  C--    Read ice model fields
82         _BARRIER         _BARRIER
83    
84  C--    Update overlap regions  C--    Update overlap regions
85         CALL SEAICE_EXCH_UV ( UICE, VICE, myThid )         CALL EXCH_UV_3D_RL( UICE, VICE, .TRUE., 3, myThid )
86         CALL SEAICE_EXCH ( HEFF, myThid )         CALL EXCH_3D_RL   ( HEFF, 3, myThid )
87         CALL SEAICE_EXCH ( AREA, myThid )         CALL EXCH_3D_RL   ( AREA, 3, myThid )
88         _EXCH_XY_R8(TICE , myThid )         _EXCH_XY_R8(TICE , myThid )
89         _EXCH_XY_R8(YNEG , myThid )         _EXCH_XY_R8(YNEG , myThid )
90         _EXCH_XY_R8(HSNOW, myThid )         _EXCH_XY_R8(HSNOW, myThid )
Legend:
Removed from v.1.16  
changed lines
  Added in v.1.17
  ViewVC Help
Powered by ViewVC 1.1.22