!>\file seas_data_mod.F90 !! This file contains data for the sea salt emission modules. module seas_data_mod use machine , only : kind_phys ! -- parameters from NGAC v2.4.0 (rev. d48932c) integer, parameter :: number_ss_bins = 5 ! -- lower/upper particle radii (um) for each bin real(kind=kind_phys), dimension(number_ss_bins), parameter :: ra = (/ 0.03, 0.1, 0.5, 1.5, 5.0 /) real(kind=kind_phys), dimension(number_ss_bins), parameter :: rb = (/ 0.1, 0.5, 1.5, 5.0, 10.0 /) ! -- global scaling factors for sea salt emissions (originally 0.875 in NGAC namelist) !real(kind=kind_phys), dimension(number_ss_bins), parameter :: emission_scale = (/ 0.100, 0.100, 0.100, 0.100, 0.100 /) real(kind=kind_phys), dimension(number_ss_bins), parameter :: emission_scale = (/ 1.0, 1.0, 1.0, 1.0, 1.0 /) ! -- sea salt density real(kind=kind_phys), dimension(number_ss_bins), parameter :: den_seas = (/ 2200., 2200., 2200., 2200., 2200. /) ! -- particle effective radius (m) real(kind=kind_phys), dimension(number_ss_bins), parameter :: reff_seas = (/ 0.079e-6, 0.316e-6, 1.119e-6, 2.818e-6, 7.772e-6 /) end module seas_data_mod