Index

Rundeck: E6TomaF40

Created: Fri May 17 03:30:39 EDT 2024

fastj2_drv

Module: PHOTOLYSIS

File: TRCHEM_fastj2.f

Summary: fastj2_drv driver for photolysis. This subroutine needs to be standalone, any chemical mechanism-related code should be present in the chemical mechanism files itself, not here.
Author : Kostas Tsigaridis (with content collected from TRCHEM_master.f)
Version:

---

Declaration:

subroutine fastj2_drv(i, j, ta, rh, surfacealbedo)

Variables:

pedn : used from atm_com

pmid : used from atm_com

nraero_koch : used from rad_com

nraero_nitrate : used from rad_com

nraero_dust : used from rad_com

nraero_seasalt : used from rad_com

am_i_root : used from domain_decomp_1d

rh : real*8, intent(in), dimension(:)

humidity profile used to choose scattering input for FASTJ2

ta : real*8, intent(in), dimension(:)

surfacealbedo : real*8, intent(in)

i : integer, intent(in)

j : integer, intent(in)

out_line : character(len=300)

ll : integer

ii : integer

irh : integer

n : integer