seq_drydep_mod.F90 File Reference

Go to the source code of this file.

Data Types

interface  seq_drydep_mod::seq_drydep_setHCoeff

Modules

module  seq_drydep_mod

Functions/Subroutines

subroutine seq_drydep_mod::seq_drydep_read (NLFilename, seq_drydep_fields)
subroutine seq_drydep_mod::seq_drydep_init ()
subroutine seq_drydep_mod::set_hcoeff_scalar (sfc_temp, heff)
subroutine seq_drydep_mod::set_hcoeff_vector (ncol, sfc_temp, heff)

Variables

integer, parameter seq_drydep_mod::maxspc = 100
integer, parameter seq_drydep_mod::n_species_table = 53
integer, parameter seq_drydep_mod::NSeas = 5
integer, parameter seq_drydep_mod::NLUse = 11
character(16), parameter seq_drydep_mod::DD_XATM
character(16), parameter seq_drydep_mod::DD_XLND
character(16), parameter seq_drydep_mod::DD_TABL
character(16) seq_drydep_mod::drydep_method = DD_XLND
real(r8), parameter seq_drydep_mod::ph = 1.e-5_r8
logical seq_drydep_mod::lnd_drydep
integer seq_drydep_mod::n_drydep = 0
character(len=32), dimension(maxspc) seq_drydep_mod::drydep_list
character(len=CS) seq_drydep_mod::drydep_fields_token
real(r8), dimension(:), allocatable seq_drydep_mod::foxd
real(r8), dimension(:), allocatable seq_drydep_mod::drat
integer, dimension(:), allocatable seq_drydep_mod::mapping
integer seq_drydep_mod::h2_ndx
integer seq_drydep_mod::ch4_ndx
integer seq_drydep_mod::co_ndx
integer seq_drydep_mod::pan_ndx
integer seq_drydep_mod::mpan_ndx
integer seq_drydep_mod::so2_ndx
integer seq_drydep_mod::o3_ndx
integer seq_drydep_mod::o3a_ndx
real(r8), dimension(nluse),
parameter 
seq_drydep_mod::h2_a = (/ 0.000_r8, 0.000_r8, 0.270_r8, 0.000_r8, 0.000_r8, 0.000_r8, 0.000_r8, 0.000_r8, 0.000_r8, 0.000_r8, 0.000_r8/)
real(r8), dimension(nluse),
parameter 
seq_drydep_mod::h2_b = (/ 0.000_r8,-41.390_r8, -0.472_r8,-41.900_r8,-41.900_r8, -41.900_r8, 0.000_r8, 0.000_r8, 0.000_r8,-41.390_r8, 0.000_r8/)
real(r8), dimension(nluse),
parameter 
seq_drydep_mod::h2_c = (/ 0.000_r8, 16.850_r8, 1.235_r8, 19.700_r8, 19.700_r8, 19.700_r8, 0.000_r8, 0.000_r8, 0.000_r8, 17.700_r8, 1.000_r8/)
real(r8), dimension(nseas, nluse) seq_drydep_mod::ri
real(r8), dimension(nseas, nluse) seq_drydep_mod::rlu
real(r8), dimension(nseas, nluse) seq_drydep_mod::rac
real(r8), dimension(nseas, nluse) seq_drydep_mod::rgss
real(r8), dimension(nseas, nluse) seq_drydep_mod::rgso
real(r8), dimension(nseas, nluse) seq_drydep_mod::rcls
real(r8), dimension(nseas, nluse) seq_drydep_mod::rclo
real(r8), dimension(nseas, nluse) seq_drydep_mod::z0
real(r8), dimension(n_species_table),
parameter 
seq_drydep_mod::dfoxd = (/ 1._r8 ,1._r8 ,1._r8 ,.1_r8 ,1.e-36_r8 ,1.e-36_r8 ,1._r8 ,.1_r8 ,1.e-36_r8 ,0._r8 ,0._r8 ,.1_r8 ,1.e-36_r8 ,1.e-36_r8 ,1.e-36_r8 ,.1_r8 ,1._r8 ,1.e-36_r8 ,.1_r8 ,1._r8 ,1.e-36_r8 ,.1_r8 ,.1_r8 ,.1_r8 ,.1_r8 ,1.e-36_r8 ,1.e-36_r8 ,.1_r8 ,1.e-36_r8 ,.1_r8 ,1.e-36_r8 ,.1_r8 ,.1_r8 ,1.e-36_r8 ,1.e-36_r8 ,1.e-36_r8 ,1.e-36_r8 ,.1_r8 ,1.e-36_r8 ,.1_r8 ,1.e-36_r8 ,.1_r8 ,.1_r8 ,.1_r8 ,1.e-36_r8 ,1.e-36_r8 ,1.e-36_r8 ,1.e-36_r8 ,1.e-36_r8 ,.1_r8 ,.1_r8 ,.1_r8 ,1.e-36_r8 /)
real(r8), parameter seq_drydep_mod::inf = O
real(r8), parameter seq_drydep_mod::small_value = 1.e-36_r8
character(len=20), dimension(n_species_table),
parameter 
seq_drydep_mod::species_name_table = (/ , , , , , , , , , , , , , , , , , , , , , , , , , , , , , , , , , , , , , , , , , , , , , , , , , , , , /)
real(r8), dimension(n_species_table
*6), paramete 
seq_drydep_mod::dheff ) = (/1.15e-02_r8, 2560._r8,0._r8 , 0._r8,0._r8 , 0._r8 ,8.33e+04_r8, 7379._r8,2.2e-12_r8,-3730._r8,0._r8 , 0._r8 ,3.00e+01_r8, 0._r8,0._r8 , 0._r8,0._r8 , 0._r8 ,2.00e+03_r8, 6600._r8,3.5e-05_r8, 0._r8,0._r8 , 0._r8 ,1.00e-03_r8, 0._r8,0._r8 , 0._r8,0._r8 , 0._r8 ,1.70e-03_r8, 0._r8,0._r8 , 0._r8,0._r8 , 0._r8 ,7.47e+00_r8, 5241._r8,0._r8 , 0._r8,0._r8 , 0._r8 ,3.11e+02_r8, 5241._r8,0._r8 , 0._r8,0._r8 , 0._r8 ,6.30e+03_r8, 6425._r8,0._r8 , 0._r8,0._r8 , 0._r8 ,5.53e+03_r8, 5700._r8,1.8e-04_r8,-1510._r8,0._r8 , 0._r8 ,1.90e-03_r8, 1480._r8,0._r8 , 0._r8,0._r8 , 0._r8 ,6.40e-03_r8, 2500._r8,0._r8 , 0._r8,0._r8 , 0._r8 ,0._r8 , 0._r8,2.6e+06_r8, 8700._r8,0._r8 , 0._r8 ,3.40e-02_r8, 2420._r8,4.5e-07_r8,-1000._r8,3.6e-11_r8,-1760._r8 ,7.40e+01_r8, 3400._r8,1.7e-05_r8, -450._r8,1.0e-14_r8,-6716._r8 ,2.14e+00_r8, 3362._r8,0._r8 , 0._r8,0._r8 , 0._r8 ,0.65e+00_r8, 0._r8,0._r8 , 0._r8,0._r8 , 0._r8 ,2.20e+02_r8, 4934._r8,0._r8 , 0._r8,0._r8 , 0._r8 ,0._r8 , 0._r8,3.2e+01_r8, 0._r8,0._r8 , 0._r8 ,1.00e-16_r8, 0._r8,0._r8 , 0._r8,0._r8 , 0._r8 ,1.70e-03_r8, 0._r8,0._r8 , 0._r8,0._r8 , 0._r8 ,7.47e+00_r8, 5241._r8,0._r8 , 0._r8,0._r8 , 0._r8 ,7.47e+00_r8, 5241._r8,0._r8 , 0._r8,0._r8 , 0._r8 ,7.47e+00_r8, 5241._r8,0._r8 , 0._r8,0._r8 , 0._r8 ,7.47e+00_r8, 5241._r8,0._r8 , 0._r8,0._r8 , 0._r8 ,1.70e-03_r8, 0._r8,0._r8 , 0._r8,0._r8 , 0._r8 ,1.14e+01_r8, 6267._r8,0._r8 , 0._r8,0._r8 , 0._r8 ,3.36e+02_r8, 5995._r8,0._r8 , 0._r8,0._r8 , 0._r8 ,1.70e-03_r8, 0._r8,0._r8 , 0._r8,0._r8 , 0._r8 ,2.20e+02_r8, 5653._r8,0._r8 , 0._r8,0._r8 , 0._r8 ,1.70e-03_r8, 0._r8,0._r8 , 0._r8,0._r8 , 0._r8 ,5.00e+00_r8, 0._r8,0._r8 , 0._r8,0._r8 , 0._r8 ,8.37e+02_r8, 5308._r8,1.8e-04_r8,-1510._r8,0._r8 , 0._r8 ,1.70e-03_r8, 0._r8,0._r8 , 0._r8,0._r8 , 0._r8 ,3.00e+05_r8, 0._r8,0._r8 , 0._r8,0._r8 , 0._r8 ,3.71e+03_r8, 7541._r8,0._r8 , 0._r8,0._r8 , 0._r8 ,4.14e+04_r8, 4630._r8,0._r8 , 0._r8,0._r8 , 0._r8 ,7.47e+00_r8, 5241._r8,0._r8 , 0._r8,0._r8 , 0._r8 ,1.45e-03_r8, 2700._r8,0._r8 , 0._r8,0._r8 , 0._r8 ,3.00e+06_r8, 0._r8,0._r8 , 0._r8,0._r8 , 0._r8 ,2.70e+01_r8, 5300._r8,0._r8 , 0._r8,0._r8 , 0._r8 ,3.36e+02_r8, 5995._r8,0._r8 , 0._r8,0._r8 , 0._r8 ,7.47e+00_r8, 5241._r8,0._r8 , 0._r8,0._r8 , 0._r8 ,3.36e+02_r8, 5995._r8,0._r8 , 0._r8,0._r8 , 0._r8 ,0.00e+00_r8, 0._r8,0._r8 , 0._r8,0._r8 , 0._r8 ,1.70e-03_r8, 0._r8,0._r8 , 0._r8,0._r8 , 0._r8 ,1.70e-03_r8, 0._r8,0._r8 , 0._r8,0._r8 , 0._r8 ,1.70e-03_r8, 0._r8,0._r8 , 0._r8,0._r8 , 0._r8 ,2.00e+02_r8, 6500._r8,0._r8 , 0._r8,0._r8 , 0._r8 ,7.51e+03_r8, 6485._r8,0._r8 , 0._r8,0._r8 , 0._r8 ,1.00e+03_r8, 6000._r8,0._r8 , 0._r8,0._r8 , 0._r8 ,1.00e+01_r8, 0._r8,0._r8 , 0._r8,0._r8 , 0._r8 ,7.00e+01_r8, 6000._r8,0._r8 , 0._r8,0._r8 , 0._r8 /)
real(r8), parameter seq_drydep_mod::wh2o = SHR_CONST_MWWV
real(r8), dimension(n_species_table),
parameter 
seq_drydep_mod::mol_wgts = (/ 47.9981995_r8, 34.0135994_r8, 17.0067997_r8, 33.0061989_r8, 28.0104008_r8, 16.0405998_r8, 47.0320015_r8, 48.0393982_r8, 30.0251999_r8, 46.0246010_r8, 30.0061398_r8, 46.0055389_r8, 63.0123405_r8, 44.0098000_r8, 17.0289402_r8, 108.010483_r8, 62.0049400_r8, 32.0400009_r8, 79.0117416_r8, 15.9994001_r8, 30.0664005_r8, 61.0578003_r8, 91.0830002_r8, 119.093399_r8, 117.119797_r8, 58.1180000_r8, 44.0509987_r8, 62.0652008_r8, 42.0774002_r8, 92.0904007_r8, 28.0515995_r8, 121.047943_r8, 76.0497971_r8, 136.228394_r8, 58.0355988_r8, 72.0614014_r8, 60.0503998_r8, 75.0423965_r8, 44.0922012_r8, 75.0836029_r8, 58.0768013_r8, 76.0910034_r8, 31.9988003_r8, 33.0061989_r8, 222.000000_r8, 68.1141968_r8, 70.0877991_r8, 70.0877991_r8, 46.0657997_r8, 147.125946_r8, 119.074341_r8, 162.117935_r8, 100.112999_r8 /)
 All Classes Namespaces Files Functions Variables Defines

Generated on Wed Jun 23 12:04:54 2010 for CESM_Driver by  doxygen 1.6.1