/[MITgcm]/MITgcm_contrib/bling/pkg/bling_dvm.F
ViewVC logotype

Diff of /MITgcm_contrib/bling/pkg/bling_dvm.F

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

revision 1.1 by mmazloff, Sun Feb 28 21:53:37 2016 UTC revision 1.2 by mmazloff, Sun May 15 00:30:35 2016 UTC
# Line 395  c!! what is grid_mkt?? Line 395  c!! what is grid_mkt??
395          ! the bottom of each layer k.          ! the bottom of each layer k.
396    
397    
 C!! needed??  
 C$TAF STORE dvm = comlev1, key = ikey_dynamics, kind=isbyte  
   
   
398          tmp = 0          tmp = 0
399          DO k=1,Nr          DO k=1,Nr
400    
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2
  ViewVC Help
Powered by ViewVC 1.1.22