Index

Rundeck: E6TomaF40

Created: Sat May 18 03:30:40 EDT 2024

rd_prof

Module: PHOTOLYSIS

File: TRCHEM_fastj2.f

Summary: rd_prof input T & O3 reference profiles
Author : Drew Shindell (modelEifications by Greg Faluvegi)
Version: 1.0 (based on cheminit0C5_M23p & ds4p_chem_init_M23)

---

Declaration:

subroutine rd_prof(nj2)

Variables:

nj2 : integer, intent(in)

local unit number

n216 : integer

local dummy variables

ntmons : integer

local dummy variables

ntlats : integer

local dummy variables

mon : integer

local dummy variables

lat : integer

local dummy variables

l : integer

local dummy variables

m : integer

local dummy variables

i : integer

local dummy variables

ia : integer

local dummy variables

out_line : character(len=300)

ofac : real*8

ofak : real*8