[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