Index | Rundeck: E6TomaF40 | Created: Fri May 17 03:30:39 EDT 2024 |
TRACERS_AEROSOLS_Koch_e4.f
Summary: Author :
Version:
Modules:
- AEROSOL_SOURCES
- repository for Koch aerosol sources, features, etc.
Global Subroutines:
- aerosol_gas_chem
- aerosol gas phase chemistry
- alloc_aerosol_sources
- get_bc_dalbedo
- Calculates change to albedo of snow on ice and snow on land due
to BC within the snow.
Parameterization based on Warren and Wiscombe (1980) (21 inputs)
or actually on Flanner et al. fig 2 r_e=500 (14 inputs)
or Warren and Wiscombe (1985) (18 input, old vs new, then I
continue linearly from 19-29 off the plot)
- get_o3_offline
- read in ozone fields for aqueous oxidation
- get_sulfate
- GET_SULFATE calculates formation of sulfate from SO2 and H2O2
within or below convective or large-scale clouds. Gas
condensation uses Henry's Law if not freezing.
- grains
- Estimates snow grain size (microns) based on air temperature
and snow age. From Susan Marshall's PhD thesis
- read_dms_sources
- generates DMS ocean source
- read_mon3dsources
- Read in monthly sources and interpolate to current day
Calling routine must have the lines:
real*8 tlca(im,jm,Ldim,nm),tlcb(im,jm,Ldim,nm)
integer imon(nm) ! nm=number of files that will be read
data jdlast /0/
save jdlast,tlca,tlcb,imon
Input: iu, the fileUnit#; jdlast
Output: interpolated data array + two monthly data arrays
- read_offhno3
- scalerad
Depends on the following files:
- ATM_COM.f
- AtmRes.F90
- CLOUDS2.F90
- FLUXES.f
- GEOM_B.f
- GHY_COM.f
- MODEL_COM.f
- PBL_COM.f
- RAD_COM.f
- SEAICE.f
- TRACERS_AEROSOLS_Koch_e4.f
- TRACER_COM.f
- TRDIAG_COM.f
- ATM_COM.f
Used by the following files: