[Dart-dev] DART/branches Revision: 12308
dart at ucar.edu
dart at ucar.edu
Wed Jan 10 16:34:32 MST 2018
hendric at ucar.edu
2018-01-10 16:34:32 -0700 (Wed, 10 Jan 2018)
185
using get_dims_from_qty instead of get_dims_from_varid,
from the state structure, to make sure that we get a valid
number of dimensions for quanties that are not in the
state vector.
Modified: DART/branches/recam/models/cam-fv/model_mod.f90
===================================================================
--- DART/branches/recam/models/cam-fv/model_mod.f90 2018-01-10 23:25:00 UTC (rev 12307)
+++ DART/branches/recam/models/cam-fv/model_mod.f90 2018-01-10 23:34:32 UTC (rev 12308)
@@ -1358,7 +1358,7 @@
! 2d fields
case(VERTISUNDEF, VERTISSURFACE)
- if (get_num_dims(domain_id,var_id) == 2) then
+ if (get_dims_from_qty(obs_qty, var_id) == 2) then
bot_levs(:) = nlevels
top_levs(:) = nlevels - 1
vert_fracts(:) = 1.0_r8
More information about the Dart-dev
mailing list