[Dart-dev] DART/branches Revision: 11383

dart at ucar.edu dart at ucar.edu
Tue Mar 21 15:04:46 MDT 2017


nancy at ucar.edu
2017-03-21 15:04:46 -0600 (Tue, 21 Mar 2017)
95
specify the vars length as 1_i8 to match the prototype.
rename the mkmf file to fix the typo.




Modified: DART/branches/rma_trunk/models/mpas_atm/mpas_dart_obs_preprocess.f90
===================================================================
--- DART/branches/rma_trunk/models/mpas_atm/mpas_dart_obs_preprocess.f90	2017-03-21 19:46:19 UTC (rev 11382)
+++ DART/branches/rma_trunk/models/mpas_atm/mpas_dart_obs_preprocess.f90	2017-03-21 21:04:46 UTC (rev 11383)
@@ -32,7 +32,7 @@
 !
 !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
 
-use        types_mod, only : r8, missing_r8, earth_radius, RAD2DEG, DEG2RAD
+use        types_mod, only : r8, missing_r8, earth_radius, RAD2DEG, DEG2RAD, i8
 use    utilities_mod, only : error_handler, E_MSG, find_namelist_in_file, &
                              check_namelist_read, nc_check
 use time_manager_mod, only : time_type, operator(>=), operator(<), operator(>), operator(<=), &
@@ -177,7 +177,7 @@
 
 call static_init_obs_sequence()
 call static_init_model()
-call init_ensemble_manager(dummy_ens, 1, 1)
+call init_ensemble_manager(dummy_ens, 1, 1_i8)
 
 call get_grid_dims(nCells, nVertices, nEdges, nVertLevels, vertexDegree, nSoilLevels)
 

Deleted: DART/branches/rma_trunk/models/mpas_atm/work/mfmf_mpas_dart_obs_preprocess
===================================================================
--- DART/branches/rma_trunk/models/mpas_atm/work/mfmf_mpas_dart_obs_preprocess	2017-03-21 19:46:19 UTC (rev 11382)
+++ DART/branches/rma_trunk/models/mpas_atm/work/mfmf_mpas_dart_obs_preprocess	2017-03-21 21:04:46 UTC (rev 11383)
@@ -1,17 +0,0 @@
-#!/bin/csh
-#
-# DART software - Copyright UCAR. This open source software is provided
-# by UCAR, "as is", without charge, subject to all terms of use at
-# http://www.image.ucar.edu/DAReS/DART/DART_download
-#
-# DART $Id$
-
-../../../build_templates/mkmf -p mpas_dart_obs_preprocess -t ../../../build_templates/mkmf.template   \
- -a "../../.." path_names_mpas_dart_obs_preprocess
-
-exit $status
-
-# <next few lines under version control, do not edit>
-# $URL$
-# $Revision$
-# $Date$

Copied: DART/branches/rma_trunk/models/mpas_atm/work/mkmf_mpas_dart_obs_preprocess (from rev 11382, DART/branches/rma_trunk/models/mpas_atm/work/mfmf_mpas_dart_obs_preprocess)
===================================================================
--- DART/branches/rma_trunk/models/mpas_atm/work/mkmf_mpas_dart_obs_preprocess	                        (rev 0)
+++ DART/branches/rma_trunk/models/mpas_atm/work/mkmf_mpas_dart_obs_preprocess	2017-03-21 21:04:46 UTC (rev 11383)
@@ -0,0 +1,17 @@
+#!/bin/csh
+#
+# DART software - Copyright UCAR. This open source software is provided
+# by UCAR, "as is", without charge, subject to all terms of use at
+# http://www.image.ucar.edu/DAReS/DART/DART_download
+#
+# DART $Id$
+
+../../../build_templates/mkmf -p mpas_dart_obs_preprocess -t ../../../build_templates/mkmf.template   \
+ -a "../../.." path_names_mpas_dart_obs_preprocess
+
+exit $status
+
+# <next few lines under version control, do not edit>
+# $URL$
+# $Revision$
+# $Date$


More information about the Dart-dev mailing list