ufo_rttovonedvarcheck_pcemis_mod Module Reference

Fortran module which contains the methods for Infrared Principal Component Emissivity The science can be found at: Pavelin, E., Candy, B., 2014. Assimilation of surface-sensitive infrared radiances over land: Estimation of land surface temperature and emissivity. Q. J. R. Metorol. Soc., 140, 1198-1208. More...

Data Types
type	ufo_rttovonedvarcheck_emiseigenvec
type	ufo_rttovonedvarcheck_emisatlas
type	ufo_rttovonedvarcheck_pcemis

Functions/Subroutines
subroutine	ufo_rttovonedvarcheck_initpcemis (self, filepath, atlaspath)
	Initialize PC emissivity object. More...
subroutine	ufo_rttovonedvarcheck_getemiseigenvec (self, fileunit)
	Read the emissivity eigen vector from file. More...
subroutine	ufo_rttovonedvarcheck_getemisatlas (self, fileunit)
	Read the emissivity eigen atlas from file. More...
subroutine	ufo_rttovonedvarcheck_deletepcemis (self)
	Delete the PC emissivity object. More...
subroutine	ufo_rttovonedvarcheck_printpcemis (self)
	Print information about the PC Emissivity object. More...
subroutine	ufo_rttovonedvarcheck_emistopc (self, Channels, Emissivity, PC)
	Convert from spectral emissivity to principal component weights. This is used to convert CAMEL emissivities to PC weights for the 1D-Var. More...
subroutine	ufo_rttovonedvarcheck_pctoemis (self, NumChans, Channels, NumPC, PC, Emissivity)
	Transform from principal components to emissivity spectrum. More...
subroutine	ufo_rttovonedvarcheck_emisktopc (self, NumChans, Channels, NumPC, Emissivity, Emissivity_K, PC_K)
	Transform from principal components to emissivity spectrum. More...

Detailed Description

Fortran module which contains the methods for Infrared Principal Component Emissivity The science can be found at: Pavelin, E., Candy, B., 2014. Assimilation of surface-sensitive infrared radiances over land: Estimation of land surface temperature and emissivity. Q. J. R. Metorol. Soc., 140, 1198-1208.

Function/Subroutine Documentation

ufo_rttovonedvarcheck_deletepcemis()

subroutine ufo_rttovonedvarcheck_pcemis_mod::ufo_rttovonedvarcheck_deletepcemis ( class(ufo_rttovonedvarcheck_pcemis), intent(inout)  self )

private

Delete the PC emissivity object.

Heritage: Ops_SatRad_KillEmisEigenVec

Author

Met Office

Date

04/08/2020: Created

Parameters

[in,out]

self

PC emissivity type

Definition at line 264 of file ufo_rttovonedvarcheck_pcemis_mod.f90.

ufo_rttovonedvarcheck_emisktopc()

subroutine ufo_rttovonedvarcheck_pcemis_mod::ufo_rttovonedvarcheck_emisktopc ( class(ufo_rttovonedvarcheck_pcemis), intent(inout)  self, integer, intent(in)  NumChans, integer, dimension(numchans), intent(in)  Channels, integer, intent(in)  NumPC, real(kind_real), dimension(numchans), intent(in)  Emissivity, real(kind_real), dimension(numchans), intent(in)  Emissivity_K, real(kind_real), dimension(numchans,numpc), intent(out)  PC_K  )

private

Transform from principal components to emissivity spectrum.

Heritage: Ops_SatRad_EmissKToPC.f90

Author

Met Office

Date

04/08/2020: Created

Parameters

[in,out]

self

PC emissivity type

Definition at line 415 of file ufo_rttovonedvarcheck_pcemis_mod.f90.

ufo_rttovonedvarcheck_emistopc()

subroutine ufo_rttovonedvarcheck_pcemis_mod::ufo_rttovonedvarcheck_emistopc ( class(ufo_rttovonedvarcheck_pcemis), intent(inout)  self, integer, dimension(:), intent(in)  Channels, real(kind_real), dimension(:), intent(in)  Emissivity, real(kind_real), dimension(:), intent(out)  PC  )

private

Convert from spectral emissivity to principal component weights. This is used to convert CAMEL emissivities to PC weights for the 1D-Var.

Heritage: Ops_SatRad_EmissToPC.f90

Author

Met Office

Date

04/08/2020: Created

Parameters

[in,out]

self

PC emissivity type

Definition at line 314 of file ufo_rttovonedvarcheck_pcemis_mod.f90.

ufo_rttovonedvarcheck_getemisatlas()

subroutine ufo_rttovonedvarcheck_pcemis_mod::ufo_rttovonedvarcheck_getemisatlas ( type(ufo_rttovonedvarcheck_pcemis), intent(out)  self, integer, intent(in)  fileunit  )

private

Read the emissivity eigen atlas from file.

Heritage: Ops_SatRad_GetEmisAtlas

Author

Met Office

Date

16/09/2020: Created

Parameters

[out]

self

PC emissivity type

Definition at line 205 of file ufo_rttovonedvarcheck_pcemis_mod.f90.

Here is the caller graph for this function:

ufo_rttovonedvarcheck_getemiseigenvec()

subroutine ufo_rttovonedvarcheck_pcemis_mod::ufo_rttovonedvarcheck_getemiseigenvec ( type(ufo_rttovonedvarcheck_pcemis), intent(out)  self, integer, intent(in)  fileunit  )

private

Read the emissivity eigen vector from file.

Heritage: Ops_SatRad_GetEmisEigenVec

Author

Met Office

Date

04/08/2020: Created

Parameters

[out]

self

PC emissivity type

Definition at line 125 of file ufo_rttovonedvarcheck_pcemis_mod.f90.

Here is the caller graph for this function:

ufo_rttovonedvarcheck_initpcemis()

subroutine ufo_rttovonedvarcheck_pcemis_mod::ufo_rttovonedvarcheck_initpcemis	(	class(ufo_rttovonedvarcheck_pcemis), intent(out)	self,
		character(len=*), intent(in)	filepath,
		character(len=*), intent(in), optional	atlaspath
	)

Initialize PC emissivity object.

Author

Met Office

Date

04/08/2020: Created

Parameters

[out]

self

PC emissivity type

Definition at line 70 of file ufo_rttovonedvarcheck_pcemis_mod.f90.

Here is the call graph for this function:

ufo_rttovonedvarcheck_pctoemis()

subroutine ufo_rttovonedvarcheck_pcemis_mod::ufo_rttovonedvarcheck_pctoemis ( class(ufo_rttovonedvarcheck_pcemis), intent(inout)  self, integer, intent(in)  NumChans, integer, dimension(numchans), intent(in)  Channels, integer, intent(in)  NumPC, real(kind_real), dimension(numpc), intent(in)  PC, real(kind_real), dimension(numchans), intent(out)  Emissivity  )

private

Transform from principal components to emissivity spectrum.

Heritage: Ops_SatRad_PCToEmiss.f90

Author

Met Office

Date

04/08/2020: Created

Parameters

[in,out]

self

PC emissivity type

Definition at line 365 of file ufo_rttovonedvarcheck_pcemis_mod.f90.

ufo_rttovonedvarcheck_printpcemis()

subroutine ufo_rttovonedvarcheck_pcemis_mod::ufo_rttovonedvarcheck_printpcemis ( class(ufo_rttovonedvarcheck_pcemis), intent(inout)  self )

private

Print information about the PC Emissivity object.

Author

Met Office

Date

04/08/2020: Created

Parameters

[in,out]

self

PC emissivity type

Definition at line 292 of file ufo_rttovonedvarcheck_pcemis_mod.f90.