--- MITgcm_contrib/bling/pkg/bling_dvm.F 2016/02/28 21:53:37 1.1 +++ MITgcm_contrib/bling/pkg/bling_dvm.F 2016/05/15 00:30:35 1.2 @@ -1,4 +1,4 @@ -C $Header: /home/ubuntu/mnt/e9_copy/MITgcm_contrib/bling/pkg/bling_dvm.F,v 1.1 2016/02/28 21:53:37 mmazloff Exp $ +C $Header: /home/ubuntu/mnt/e9_copy/MITgcm_contrib/bling/pkg/bling_dvm.F,v 1.2 2016/05/15 00:30:35 mmazloff Exp $ C $Name: $ #include "BLING_OPTIONS.h" @@ -395,10 +395,6 @@ ! the bottom of each layer k. -C!! needed?? -C$TAF STORE dvm = comlev1, key = ikey_dynamics, kind=isbyte - - tmp = 0 DO k=1,Nr