OB.DAAC Logo
NASA Logo
Ocean Color Science Software

ocssw V2022
atrem_app_refl_plus_gas_removal_for_l2gen3.f90 File Reference

Go to the source code of this file.

Functions/Subroutines

subroutine get_input
 
subroutine model_adj
 
subroutine init_speccal
 
subroutine tran_table
 
subroutine trancal
 
subroutine tran_smooth
 
subroutine chnlratio
 
subroutine process_cube
 
subroutine locate (xx, n, x, j)
 
subroutine cubspln (N, XORGN, YORGN, XINT, YINT)
 
subroutine spline (x, y, n, yp1, ypn, y2)
 
subroutine splint (xa, ya, y2a, n, x, y)
 
subroutine hunt (xx, n, x, jlo)
 
subroutine suncor (IDAY, MONTH, IYR, TZ, DEC, HAZ)
 
subroutine solcor (JD, FJD, RAS, DECS, GSDT, BZRO, P, SOLONG)
 
function julian (IDAY, MONTH, IYR)
 
subroutine hazel (H, D, A, E, XLAT)
 
function findmatch (LIST, NOBS, ELEM)
 

Function/Subroutine Documentation

◆ chnlratio()

subroutine chnlratio

◆ cubspln()

subroutine cubspln ( integer  N,
dimension(1050)  XORGN,
dimension(1050)  YORGN,
dimension(1024)  XINT,
dimension(1024)  YINT 
)

◆ findmatch()

function findmatch ( real, dimension(1024)  LIST,
integer  NOBS,
real  ELEM 
)

◆ get_input()

subroutine get_input

◆ hazel()

subroutine hazel (   H,
  D,
  A,
  E,
  XLAT 
)

◆ hunt()

subroutine hunt ( real, dimension(n)  xx,
integer  n,
real  x,
integer  jlo 
)

◆ init_speccal()

subroutine init_speccal

◆ julian()

function julian (   IDAY,
  MONTH,
  IYR 
)

◆ locate()

subroutine locate ( real, dimension(n)  xx,
integer  n,
real  x,
integer  j 
)

◆ model_adj()

subroutine model_adj

◆ process_cube()

subroutine process_cube

◆ solcor()

subroutine solcor (   JD,
  FJD,
  RAS,
  DECS,
  GSDT,
  BZRO,
  P,
  SOLONG 
)

◆ spline()

subroutine spline ( real, dimension(n)  x,
real, dimension(n)  y,
integer  n,
real  yp1,
real  ypn,
real, dimension(n)  y2 
)

◆ splint()

subroutine splint ( real, dimension(n)  xa,
real, dimension(n)  ya,
real, dimension(n)  y2a,
integer  n,
real  x,
real  y 
)

◆ suncor()

subroutine suncor (   IDAY,
  MONTH,
  IYR,
  TZ,
  DEC,
  HAZ 
)

◆ tran_smooth()

subroutine tran_smooth

◆ tran_table()

subroutine tran_table

◆ trancal()

subroutine trancal