[Dart-dev] DART/branches Revision: 11882
dart at ucar.edu
dart at ucar.edu
Fri Aug 4 16:24:34 MDT 2017
hendric at ucar.edu
2017-08-04 16:24:34 -0600 (Fri, 04 Aug 2017)
26
removing print statement
Modified: DART/branches/rma_fix_clm_restarts/models/clm/model_mod.f90
===================================================================
--- DART/branches/rma_fix_clm_restarts/models/clm/model_mod.f90 2017-08-04 21:50:54 UTC (rev 11881)
+++ DART/branches/rma_fix_clm_restarts/models/clm/model_mod.f90 2017-08-04 22:24:34 UTC (rev 11882)
@@ -2568,7 +2568,6 @@
where((data_1d_array < 0.0_r8)) data_1d_array = org_array
if (trim(progvar(ivar)%varname) == 'H2OSNO') then
- print*, 'SIZE : ', size(data_1d_array), ' :: SIZE ORIG', size(org_array)
where((data_1d_array <= 0.0_r8)) data_1d_array = org_array
endif
More information about the Dart-dev
mailing list