[Dart-dev] DART/branches Revision: 12357

[dart at ucar.edu]

nancy at ucar.edu
2018-01-18 09:22:44 -0700 (Thu, 18 Jan 2018)
49
initialize the table to 1.0 for all quantities.




Modified: DART/branches/recam/models/cam-fv/chem_tables_mod.f90
===================================================================
--- DART/branches/recam/models/cam-fv/chem_tables_mod.f90	2018-01-18 16:22:04 UTC (rev 12356)
+++ DART/branches/recam/models/cam-fv/chem_tables_mod.f90	2018-01-18 16:22:44 UTC (rev 12357)
@@ -65,6 +65,11 @@
 
 allocate(chem_conv_table(0:num_qtys))
 
+! the default factor is unity. then you can always multiply
+! by this factor for any quantity.
+ 
+chem_conv_table(:) = 1.0_r8
+
 call add_entry('O3',   47.9982_r8, 'QTY_O3')
 call add_entry('O',    15.9994_r8, 'QTY_O')
 call add_entry('O1D',  15.9994_r8, 'QTY_O1D')