ufo_aod_mod Module Reference

Fortran module to handle aod observations. More...

Data Types
type	ufo_aod
	Fortran derived type for aod trajectory. More...

Functions/Subroutines
subroutine	ufo_aod_simobs (self, geovals, hofx, obss)

Variables
integer, parameter	max_string =800
logical, parameter	ice4qsat =.TRUE.
real(fp), parameter	ttp = 2.7316e+2_fp
real(fp), parameter	psat = 6.1078e+2_fp
real(fp), parameter	rd = 2.8705e+2_fp
real(fp), parameter	rv = 4.6150e+2_fp
real(fp), parameter	cv = 7.1760e+2_fp
real(fp), parameter	cliq = 4.1855e+3_fp
real(fp), parameter	csol = 2.1060e+3_fp
real(fp), parameter	cvap = 1.8460e+3_fp
real(fp), parameter	hvap = 2.5000e+6_fp
real(fp), parameter	hfus = 3.3358e+5_fp
real(fp), parameter	grav = 9.81_fp
real(fp), parameter	tmix = ttp-20._fp
real(fp), parameter	hsub = hvap+hfus
real(fp), parameter	eps = rd/rv
real(fp), parameter	omeps =one-eps
real(fp), parameter	dldt =cvap-cliq
real(fp), parameter	dldti = cvap-csol
real(fp), parameter	xa = -(dldt/rv)
real(fp), parameter	xai = -(dldti/rv)
real(fp), parameter	xb = xa+hvap/(rv*ttp)
real(fp), parameter	xbi = xai+hsub/(rv*ttp)
logical	flip_vertical

Detailed Description

Fortran module to handle aod observations.

Function/Subroutine Documentation

ufo_aod_simobs()

subroutine ufo_aod_mod::ufo_aod_simobs ( class(ufo_aod), intent(in)  self, type(ufo_geovals), intent(in)  geovals, real(kind_real), dimension(:), intent(inout)  hofx, type(c_ptr), intent(in), value  obss  )

private

Definition at line 67 of file ufo_aod_mod.F90.

Here is the call graph for this function:

Variable Documentation

cliq

real(fp), parameter ufo_aod_mod::cliq = 4.1855e+3_fp

private

Definition at line 28 of file ufo_aod_mod.F90.

csol

real(fp), parameter ufo_aod_mod::csol = 2.1060e+3_fp

private

Definition at line 28 of file ufo_aod_mod.F90.

cv

real(fp), parameter ufo_aod_mod::cv = 7.1760e+2_fp

private

Definition at line 28 of file ufo_aod_mod.F90.

cvap

real(fp), parameter ufo_aod_mod::cvap = 1.8460e+3_fp

private

Definition at line 28 of file ufo_aod_mod.F90.

dldt

real(fp), parameter ufo_aod_mod::dldt =cvap-cliq

private

Definition at line 41 of file ufo_aod_mod.F90.

dldti

real(fp), parameter ufo_aod_mod::dldti = cvap-csol

private

Definition at line 41 of file ufo_aod_mod.F90.

eps

real(fp), parameter ufo_aod_mod::eps = rd/rv

private

Definition at line 41 of file ufo_aod_mod.F90.

flip_vertical

logical ufo_aod_mod::flip_vertical

private

Definition at line 53 of file ufo_aod_mod.F90.

grav

real(fp), parameter ufo_aod_mod::grav = 9.81_fp

private

Definition at line 28 of file ufo_aod_mod.F90.

hfus

real(fp), parameter ufo_aod_mod::hfus = 3.3358e+5_fp

private

Definition at line 28 of file ufo_aod_mod.F90.

hsub

real(fp), parameter ufo_aod_mod::hsub = hvap+hfus

private

Definition at line 41 of file ufo_aod_mod.F90.

hvap

real(fp), parameter ufo_aod_mod::hvap = 2.5000e+6_fp

private

Definition at line 28 of file ufo_aod_mod.F90.

ice4qsat

logical, parameter ufo_aod_mod::ice4qsat =.TRUE.

private

Definition at line 26 of file ufo_aod_mod.F90.

max_string

integer, parameter ufo_aod_mod::max_string =800

private

Definition at line 25 of file ufo_aod_mod.F90.

omeps

real(fp), parameter ufo_aod_mod::omeps =one-eps

private

Definition at line 41 of file ufo_aod_mod.F90.

psat

real(fp), parameter ufo_aod_mod::psat = 6.1078e+2_fp

private

Definition at line 28 of file ufo_aod_mod.F90.

rd

real(fp), parameter ufo_aod_mod::rd = 2.8705e+2_fp

private

Definition at line 28 of file ufo_aod_mod.F90.

rv

real(fp), parameter ufo_aod_mod::rv = 4.6150e+2_fp

private

Definition at line 28 of file ufo_aod_mod.F90.

tmix

real(fp), parameter ufo_aod_mod::tmix = ttp-20._fp

private

Definition at line 41 of file ufo_aod_mod.F90.

ttp

real(fp), parameter ufo_aod_mod::ttp = 2.7316e+2_fp

private

Definition at line 28 of file ufo_aod_mod.F90.

xa

real(fp), parameter ufo_aod_mod::xa = -(dldt/rv)

private

Definition at line 41 of file ufo_aod_mod.F90.

xai

real(fp), parameter ufo_aod_mod::xai = -(dldti/rv)

private

Definition at line 41 of file ufo_aod_mod.F90.

xb

real(fp), parameter ufo_aod_mod::xb = xa+hvap/(rv*ttp)

private

Definition at line 41 of file ufo_aod_mod.F90.

xbi

real(fp), parameter ufo_aod_mod::xbi = xai+hsub/(rv*ttp)

private

Definition at line 41 of file ufo_aod_mod.F90.