CALRAD_WCLOUD_newcrtm.f File Reference

Subroutine that computes model derived brightness temperature. More...

Go to the source code of this file.

Functions/Subroutines
subroutine	calrad_wcloud
real function	effr (pmid, t, q, qqw, qqi, qqr, f_rimef, nlice, nrain, qqs, qqg, qqnr, qqni, qqnw, mp_opt, species)
real function	gammln (xx)
real function	wgamma (y)

Detailed Description

Subroutine that computes model derived brightness temperature.

This routine computes model derived brightness temperature using CRTM. It is patterned after GSI setuprad with Treadon's help.

Program history log:

Date	Programmer	Comments
2007-01-17	H Chuang	Initial
2011-02-06	Jun Wang	add grib2 option
2014-12-09	WM Lewis	added function EFFR to compute effective particle radii channel selection using LVLS from WRF_CNTRL.PARM
2019-04-01	Sharon Nebuda	Added output option for GOES-16 & GOES-17 ABI IR Channels 7-16
2020-04-09	Tracy Hertneky	Added Himawari-8 AHI CH7-CH16
2021-01-10	Wen Meng	Added checking points for skiping grids with filling value spval
2021-03-11	Bo Cui	improve local arrays memory
2021-08-31	Lin Zhu	added ssmis-f17 channels 15-18 grib2 output
2021-09-02	Bo Cui	Decompose UPP in X direction
2022-05-26	WM Lewis	added support for GOES-18 ABI IR Channels 7-16
2022-09-12	Wen Meng	Added cloud fraction changes for crtm/2.4.0
2023-03-22	WM Lewis	Added support for using effective radius arrays from RRFS

Author

Chuang

Date

2007-01-17

Definition in file CALRAD_WCLOUD_newcrtm.f.

Function/Subroutine Documentation

calrad_wcloud()

subroutine calrad_wcloud

Definition at line 24 of file CALRAD_WCLOUD_newcrtm.f.

effr()

real function effr	(	real	pmid,
		real	t,
		real	q,
		real	qqw,
		real	qqi,
		real	qqr,
		real	f_rimef,
		real	nlice,
		real	nrain,
		real	qqs,
		real	qqg,
		real	qqnr,
		real	qqni,
		real	qqnw,
		integer	mp_opt,
		character(len=1)	species
	)

Definition at line 2202 of file CALRAD_WCLOUD_newcrtm.f.

gammln()

real function gammln

(

real, intent(in)

xx

)

Definition at line 2818 of file CALRAD_WCLOUD_newcrtm.f.

wgamma()

real function wgamma

(

real, intent(in)

y

)

Definition at line 2842 of file CALRAD_WCLOUD_newcrtm.f.