/[MITgcm]/MITgcm_contrib/dgoldberg/streamice/streamice_cost_surf_accum.F
ViewVC logotype

Diff of /MITgcm_contrib/dgoldberg/streamice/streamice_cost_surf_accum.F

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

revision 1.6 by dgoldberg, Thu Oct 4 15:40:16 2012 UTC revision 1.7 by dgoldberg, Thu Oct 4 15:42:48 2012 UTC
# Line 70  CADJ STORE surf_el_streamice  = comlev1, Line 70  CADJ STORE surf_el_streamice  = comlev1,
70  CADJ &     kind = isbyte  CADJ &     kind = isbyte
71  CADJ STORE H_streamice_prev  = comlev1, key = ikey_dynamics,  CADJ STORE H_streamice_prev  = comlev1, key = ikey_dynamics,
72  CADJ &     kind = isbyte  CADJ &     kind = isbyte
73    CADJ STORE H_streamice  = comlev1, key = ikey_dynamics,
74    CADJ &     kind = isbyte
75  #endif  #endif
76    
77  C--   Calculate cost function on tile of this instance  C--   Calculate cost function on tile of this instance
Legend:
Removed from v.1.6  
changed lines
  Added in v.1.7
  ViewVC Help
Powered by ViewVC 1.1.22