[Dart-dev] [3452] DART/trunk/models/PBL_1d/model_mod.f90: Make the beta parameter initializers be integer to match the underlying var type .

[nancy at ucar.edu]

An HTML attachment was scrubbed...
URL: http://mailman.ucar.edu/pipermail/dart-dev/attachments/20080709/8d82af51/attachment.html
-------------- next part --------------
Modified: DART/trunk/models/PBL_1d/model_mod.f90
===================================================================
--- DART/trunk/models/PBL_1d/model_mod.f90	2008-07-09 16:36:40 UTC (rev 3451)
+++ DART/trunk/models/PBL_1d/model_mod.f90	2008-07-09 16:51:00 UTC (rev 3452)
@@ -87,8 +87,8 @@
 integer, dimension(10) :: est_param_types = 600
 real   , dimension(10) :: pert_init_sd    = 0.0
 real   , dimension(10) :: pert_param_sd   = 0.0
-integer, dimension(10) :: pert_init_beta_1 = -1.0
-integer, dimension(10) :: pert_init_beta_2 = -1.0
+integer, dimension(10) :: pert_init_beta_1 = -1
+integer, dimension(10) :: pert_init_beta_2 = -1
 real   , dimension(10) :: pert_param_min  = 0.00001
 real   , dimension(10) :: pert_param_max  = 0.99999
 logical                :: maintain_initial_spread = .false.