Index

Rundeck: E6TomaF40

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

legnd0

Module: PHOTOLYSIS

File: TRCHEM_fastj2.f

Summary: LEGND0 Calculates ORDINARY LEGENDRE fns of X (real) from P[0] = PL(1) = 1, P[1] = X, .... P[N-1] = PL(N)
Author : UCI (see note above), GCM incorporation: Drew Shindell, modelEifications: Greg Faluvegi
Version:

---

Declaration:

subroutine legnd0(x, pl, nfastj)

Variables:

nfastj : integer

i : integer

x : real*8

pl : real*8, dimension(NFASTJ)

den : real*8