UFO
ufo_rttovonedvarcheck_rsubmatrix_mod Module Reference

Fortran derived type to hold data for the observation covariance. More...

Data Types

type  ufo_rttovonedvarcheck_rsubmatrix
 

Functions/Subroutines

subroutine rsubmatrix_setup (self, nchans, channels, full_rmatrix)
 Setup for the r sub-matrix. More...
 
subroutine rsubmatrix_delete (self)
 Delete method for the r_matrix. More...
 
subroutine rsubmatrix_multiply (self, xin, xout)
 Multiply a vector by the r-matrix. More...
 
subroutine rsubmatrix_multiply_matrix (self, xin, xout)
 Multiply a matrix by the r-matrix. More...
 
subroutine rsubmatrix_inv_multiply (self, xin, xout)
 Multiply a vector by the inverse of the r-matrix. More...
 
subroutine rsubmatrix_multiply_inv_matrix (self, xin, xout)
 Multiply a matrix by the inverse of the r-matrix. More...
 
subroutine rsubmatrix_add_to_u (self, uin, uout)
 Add a matrix to the r-matrix. More...
 
subroutine rsubmatrix_multiply_factor_by_stdev (self, factor, xout)
 Multiply a vector by the r-matrix diagonal standard deviation. More...
 
subroutine rsubmatrix_print (self)
 Print the contents of the r-matrix. More...
 

Detailed Description

Fortran derived type to hold data for the observation covariance.

Function/Subroutine Documentation

◆ rsubmatrix_add_to_u()

subroutine ufo_rttovonedvarcheck_rsubmatrix_mod::rsubmatrix_add_to_u ( class(ufo_rttovonedvarcheck_rsubmatrix), intent(in)  self,
real(kind_real), dimension(:,:), intent(in)  uin,
real(kind_real), dimension(:,:), intent(inout)  uout 
)
private

Add a matrix to the r-matrix.

Author
Met Office
Date
09/06/2020: Created

Definition at line 250 of file ufo_rttovonedvarcheck_rsubmatrix_mod.f90.

◆ rsubmatrix_delete()

subroutine ufo_rttovonedvarcheck_rsubmatrix_mod::rsubmatrix_delete ( class(ufo_rttovonedvarcheck_rsubmatrix), intent(inout)  self)
private

Delete method for the r_matrix.

Author
Met Office
Date
09/06/2020: Created
Parameters
[in,out]selfR mtrix structure

Definition at line 116 of file ufo_rttovonedvarcheck_rsubmatrix_mod.f90.

◆ rsubmatrix_inv_multiply()

subroutine ufo_rttovonedvarcheck_rsubmatrix_mod::rsubmatrix_inv_multiply ( class(ufo_rttovonedvarcheck_rsubmatrix), intent(in)  self,
real(kind_real), dimension(:), intent(in)  xin,
real(kind_real), dimension(:), intent(inout)  xout 
)
private

Multiply a vector by the inverse of the r-matrix.

Author
Met Office
Date
09/06/2020: Created

Definition at line 192 of file ufo_rttovonedvarcheck_rsubmatrix_mod.f90.

◆ rsubmatrix_multiply()

subroutine ufo_rttovonedvarcheck_rsubmatrix_mod::rsubmatrix_multiply ( class(ufo_rttovonedvarcheck_rsubmatrix), intent(in)  self,
real(kind_real), dimension(:), intent(in)  xin,
real(kind_real), dimension(:), intent(inout)  xout 
)
private

Multiply a vector by the r-matrix.

Author
Met Office
Date
09/06/2020: Created

Definition at line 134 of file ufo_rttovonedvarcheck_rsubmatrix_mod.f90.

◆ rsubmatrix_multiply_factor_by_stdev()

subroutine ufo_rttovonedvarcheck_rsubmatrix_mod::rsubmatrix_multiply_factor_by_stdev ( class(ufo_rttovonedvarcheck_rsubmatrix), intent(in)  self,
real(kind_real), intent(in)  factor,
real(kind_real), dimension(:), intent(inout)  xout 
)
private

Multiply a vector by the r-matrix diagonal standard deviation.

Author
Met Office
Date
16/06/2021: Created

Definition at line 282 of file ufo_rttovonedvarcheck_rsubmatrix_mod.f90.

◆ rsubmatrix_multiply_inv_matrix()

subroutine ufo_rttovonedvarcheck_rsubmatrix_mod::rsubmatrix_multiply_inv_matrix ( class(ufo_rttovonedvarcheck_rsubmatrix), intent(in)  self,
real(kind_real), dimension(:,:), intent(in)  xin,
real(kind_real), dimension(:,:), intent(out)  xout 
)
private

Multiply a matrix by the inverse of the r-matrix.

Author
Met Office
Date
09/06/2020: Created

Definition at line 218 of file ufo_rttovonedvarcheck_rsubmatrix_mod.f90.

◆ rsubmatrix_multiply_matrix()

subroutine ufo_rttovonedvarcheck_rsubmatrix_mod::rsubmatrix_multiply_matrix ( class(ufo_rttovonedvarcheck_rsubmatrix), intent(in)  self,
real(kind_real), dimension(:,:), intent(in)  xin,
real(kind_real), dimension(:,:), intent(inout)  xout 
)
private

Multiply a matrix by the r-matrix.

Author
Met Office
Date
09/06/2020: Created

Definition at line 160 of file ufo_rttovonedvarcheck_rsubmatrix_mod.f90.

◆ rsubmatrix_print()

subroutine ufo_rttovonedvarcheck_rsubmatrix_mod::rsubmatrix_print ( class(ufo_rttovonedvarcheck_rsubmatrix), intent(in)  self)
private

Print the contents of the r-matrix.

Author
Met Office
Date
09/06/2020: Created

Definition at line 314 of file ufo_rttovonedvarcheck_rsubmatrix_mod.f90.

◆ rsubmatrix_setup()

subroutine ufo_rttovonedvarcheck_rsubmatrix_mod::rsubmatrix_setup ( class(ufo_rttovonedvarcheck_rsubmatrix), intent(inout)  self,
integer, intent(in)  nchans,
integer, dimension(:), intent(in)  channels,
type(ufo_metoffice_rmatrixradiance), intent(in)  full_rmatrix 
)

Setup for the r sub-matrix.

Author
Met Office
Date
09/06/2020: Created

Definition at line 48 of file ufo_rttovonedvarcheck_rsubmatrix_mod.f90.