Index

Rundeck: E6TomaF40

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

jvalue

Module: PHOTOLYSIS

File: TRCHEM_fastj2.f

Summary: JVALUE Calculate the actinic flux at each level for the current SZA value.
Author : UCI (see note above), GCM incorporation: Drew Shindell, modelEifications: Greg Faluvegi
Version:

---

Declaration:

subroutine jvalue(nslon, nslat)

Variables:

xqo3_2 : real*8, allocatable, dimension(:)

fastj2 Absorption cross-section of O3

xqo2_2 : real*8, allocatable, dimension(:)

fastj2 Absorption cross-section of O2

wave : real*8

Effective wavelength of each wavelength bin

avgf : real*8, allocatable, dimension(:)

Attenuation of beam at each level for each wavelength

k : integer

j : integer

nslon : integer, intent(in)

nslat : integer, intent(in)