FV3 Bundle
crtm_rtsolution_define Module Reference

Data Types

interface  crtm_rtsolution_inspect
 
type  crtm_rtsolution_type
 
interface  operator(**)
 
interface  operator(+)
 
interface  operator(-)
 
interface  operator(/)
 
interface  operator(==)
 
interface  sqrt
 

Functions/Subroutines

elemental logical function, public crtm_rtsolution_associated (RTSolution)
 
elemental subroutine, public crtm_rtsolution_destroy (RTSolution)
 
elemental subroutine, public crtm_rtsolution_create (RTSolution, n_Layers)
 
elemental subroutine, public crtm_rtsolution_zero (RTSolution)
 
subroutine scalar_inspect (RTSolution, Unit)
 
subroutine rank2_inspect (RTSolution, Unit)
 
subroutine, public crtm_rtsolution_defineversion (Id)
 
elemental logical function, public crtm_rtsolution_compare (x, y, n_SigFig)
 
integer function, public crtm_rtsolution_statistics (rts, rts_stats)
 
integer function, public crtm_rtsolution_inquirefile (Filename, n_Channels, n_Profiles)
 
integer function, public crtm_rtsolution_readfile (Filename, RTSolution, Quiet, n_Channels, n_Profiles, Old_Version, Debug)
 
integer function, public crtm_rtsolution_writefile (Filename, RTSolution, Quiet, Debug)
 
elemental logical function crtm_rtsolution_equal (x, y)
 
elemental type(crtm_rtsolution_type) function crtm_rtsolution_add (rts1, rts2)
 
elemental type(crtm_rtsolution_type) function crtm_rtsolution_subtract (rts1, rts2)
 
elemental type(crtm_rtsolution_type) function crtm_rtsolution_exponent (rts, power)
 
elemental type(crtm_rtsolution_type) function crtm_rtsolution_normalise (rts, factor)
 
elemental type(crtm_rtsolution_type) function crtm_rtsolution_sqrt (rts)
 
integer function read_record (fid, rts, old_version)
 
integer function write_record (fid, rts)
 

Variables

character(*), parameter module_version_id = '$Id: CRTM_RTSolution_Define.f90 60152 2015-08-13 19:19:13Z paul.vandelst@noaa.gov $'
 
real(fp), parameter zero = 0.0_fp
 
integer, parameter ml = 256
 
character(*), parameter write_error_status = 'DELETE'
 

Function/Subroutine Documentation

◆ crtm_rtsolution_add()

elemental type(crtm_rtsolution_type) function crtm_rtsolution_define::crtm_rtsolution_add ( type(crtm_rtsolution_type), intent(in)  rts1,
type(crtm_rtsolution_type), intent(in)  rts2 
)
private

Definition at line 1235 of file CRTM_RTSolution_Define.f90.

Here is the call graph for this function:

◆ crtm_rtsolution_associated()

elemental logical function, public crtm_rtsolution_define::crtm_rtsolution_associated ( type(crtm_rtsolution_type), intent(in)  RTSolution)

Definition at line 195 of file CRTM_RTSolution_Define.f90.

Here is the caller graph for this function:

◆ crtm_rtsolution_compare()

elemental logical function, public crtm_rtsolution_define::crtm_rtsolution_compare ( type(crtm_rtsolution_type), intent(in)  x,
type(crtm_rtsolution_type), intent(in)  y,
integer, intent(in), optional  n_SigFig 
)

Definition at line 509 of file CRTM_RTSolution_Define.f90.

Here is the call graph for this function:

◆ crtm_rtsolution_create()

elemental subroutine, public crtm_rtsolution_define::crtm_rtsolution_create ( type(crtm_rtsolution_type), intent(out)  RTSolution,
integer, intent(in)  n_Layers 
)

Definition at line 261 of file CRTM_RTSolution_Define.f90.

Here is the caller graph for this function:

◆ crtm_rtsolution_defineversion()

subroutine, public crtm_rtsolution_define::crtm_rtsolution_defineversion ( character(*), intent(out)  Id)

Definition at line 463 of file CRTM_RTSolution_Define.f90.

◆ crtm_rtsolution_destroy()

elemental subroutine, public crtm_rtsolution_define::crtm_rtsolution_destroy ( type(crtm_rtsolution_type), intent(out)  RTSolution)

Definition at line 224 of file CRTM_RTSolution_Define.f90.

Here is the caller graph for this function:

◆ crtm_rtsolution_equal()

elemental logical function crtm_rtsolution_define::crtm_rtsolution_equal ( type(crtm_rtsolution_type), intent(in)  x,
type(crtm_rtsolution_type), intent(in)  y 
)
private

Definition at line 1164 of file CRTM_RTSolution_Define.f90.

Here is the call graph for this function:

◆ crtm_rtsolution_exponent()

elemental type(crtm_rtsolution_type) function crtm_rtsolution_define::crtm_rtsolution_exponent ( type(crtm_rtsolution_type), intent(in)  rts,
integer, intent(in)  power 
)
private

Definition at line 1396 of file CRTM_RTSolution_Define.f90.

Here is the call graph for this function:

◆ crtm_rtsolution_inquirefile()

integer function, public crtm_rtsolution_define::crtm_rtsolution_inquirefile ( character(*), intent(in)  Filename,
integer, intent(out), optional  n_Channels,
integer, intent(out), optional  n_Profiles 
)

Definition at line 713 of file CRTM_RTSolution_Define.f90.

Here is the call graph for this function:

◆ crtm_rtsolution_normalise()

elemental type(crtm_rtsolution_type) function crtm_rtsolution_define::crtm_rtsolution_normalise ( type(crtm_rtsolution_type), intent(in)  rts,
real(fp), intent(in)  factor 
)
private

Definition at line 1467 of file CRTM_RTSolution_Define.f90.

Here is the call graph for this function:

◆ crtm_rtsolution_readfile()

integer function, public crtm_rtsolution_define::crtm_rtsolution_readfile ( character(*), intent(in)  Filename,
type(crtm_rtsolution_type), dimension(:,:), intent(out)  RTSolution,
logical, intent(in), optional  Quiet,
integer, intent(out), optional  n_Channels,
integer, intent(out), optional  n_Profiles,
logical, intent(in), optional  Old_Version,
logical, intent(in), optional  Debug 
)

Definition at line 854 of file CRTM_RTSolution_Define.f90.

Here is the call graph for this function:

◆ crtm_rtsolution_sqrt()

elemental type(crtm_rtsolution_type) function crtm_rtsolution_define::crtm_rtsolution_sqrt ( type(crtm_rtsolution_type), intent(in)  rts)
private

Definition at line 1531 of file CRTM_RTSolution_Define.f90.

Here is the call graph for this function:

◆ crtm_rtsolution_statistics()

integer function, public crtm_rtsolution_define::crtm_rtsolution_statistics ( type(crtm_rtsolution_type), dimension(:,:), intent(in)  rts,
type(crtm_rtsolution_type), dimension(:,:), intent(out), allocatable  rts_stats 
)

Definition at line 600 of file CRTM_RTSolution_Define.f90.

Here is the call graph for this function:

◆ crtm_rtsolution_subtract()

elemental type(crtm_rtsolution_type) function crtm_rtsolution_define::crtm_rtsolution_subtract ( type(crtm_rtsolution_type), intent(in)  rts1,
type(crtm_rtsolution_type), intent(in)  rts2 
)
private

Definition at line 1313 of file CRTM_RTSolution_Define.f90.

Here is the call graph for this function:

◆ crtm_rtsolution_writefile()

integer function, public crtm_rtsolution_define::crtm_rtsolution_writefile ( character(*), intent(in)  Filename,
type(crtm_rtsolution_type), dimension(:,:), intent(in)  RTSolution,
logical, intent(in), optional  Quiet,
logical, intent(in), optional  Debug 
)

Definition at line 1033 of file CRTM_RTSolution_Define.f90.

Here is the call graph for this function:

◆ crtm_rtsolution_zero()

elemental subroutine, public crtm_rtsolution_define::crtm_rtsolution_zero ( type(crtm_rtsolution_type), intent(inout)  RTSolution)

Definition at line 321 of file CRTM_RTSolution_Define.f90.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ rank2_inspect()

subroutine crtm_rtsolution_define::rank2_inspect ( type(crtm_rtsolution_type), dimension(:,:), intent(in)  RTSolution,
integer, intent(in), optional  Unit 
)
private

Definition at line 416 of file CRTM_RTSolution_Define.f90.

Here is the call graph for this function:

◆ read_record()

integer function crtm_rtsolution_define::read_record ( integer, intent(in)  fid,
type(crtm_rtsolution_type), intent(out)  rts,
logical, intent(in), optional  old_version 
)
private

Definition at line 1575 of file CRTM_RTSolution_Define.f90.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ scalar_inspect()

subroutine crtm_rtsolution_define::scalar_inspect ( type(crtm_rtsolution_type), intent(in)  RTSolution,
integer, intent(in), optional  Unit 
)
private

Definition at line 377 of file CRTM_RTSolution_Define.f90.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ write_record()

integer function crtm_rtsolution_define::write_record ( integer, intent(in)  fid,
type(crtm_rtsolution_type), intent(in)  rts 
)
private

Definition at line 1701 of file CRTM_RTSolution_Define.f90.

Here is the call graph for this function:

Variable Documentation

◆ ml

integer, parameter crtm_rtsolution_define::ml = 256
private

Definition at line 105 of file CRTM_RTSolution_Define.f90.

◆ module_version_id

character(*), parameter crtm_rtsolution_define::module_version_id = '$Id: CRTM_RTSolution_Define.f90 60152 2015-08-13 19:19:13Z paul.vandelst@noaa.gov $'
private

Definition at line 100 of file CRTM_RTSolution_Define.f90.

◆ write_error_status

character(*), parameter crtm_rtsolution_define::write_error_status = 'DELETE'
private

Definition at line 107 of file CRTM_RTSolution_Define.f90.

◆ zero

real(fp), parameter crtm_rtsolution_define::zero = 0.0_fp
private

Definition at line 103 of file CRTM_RTSolution_Define.f90.