SABER
type_diag_blk Module Reference

Diagnostic block derived type. More...

Data Types

type  diag_blk_type
 

Functions/Subroutines

subroutine diag_blk_alloc (diag_blk, mpl, nam, geom, bpar, samp, ic2a, ib, prefix)
 Allocation. More...
 
subroutine diag_blk_dealloc (diag_blk)
 Release memory. More...
 
subroutine diag_blk_write (diag_blk, mpl, nam, geom, bpar, filename)
 Write. More...
 
subroutine diag_blk_normalization (diag_blk, geom, bpar)
 Compute diagnostic block normalization. More...
 
subroutine diag_blk_fitting (diag_blk, mpl, rng, nam, geom, bpar, samp, coef)
 Compute a fit of a raw function. More...
 
subroutine diag_blk_localization (diag_blk, mpl, geom, bpar, avg_blk)
 Diag_blk localization. More...
 
subroutine diag_blk_hybridization (diag_blk, mpl, nam, geom, bpar, avg_blk)
 Diag_blk hybridization. More...
 
subroutine diag_blk_dualens (diag_blk, mpl, geom, bpar, avg_blk, avg_lr_blk, diag_lr_blk)
 Diag_blk dualens. More...
 

Variables

integer, parameter nsc = 50
 
real(kind_real), parameter maxfactor = 2.0_kind_real
 

Detailed Description

Diagnostic block derived type.

Function/Subroutine Documentation

◆ diag_blk_alloc()

subroutine type_diag_blk::diag_blk_alloc ( class(diag_blk_type), intent(inout)  diag_blk,
type(mpl_type), intent(inout)  mpl,
type(nam_type), intent(in)  nam,
type(geom_type), intent(in)  geom,
type(bpar_type), intent(in)  bpar,
type(samp_type), intent(in)  samp,
integer, intent(in)  ic2a,
integer, intent(in)  ib,
character(len=*), intent(in)  prefix 
)
private

Allocation.

Parameters
[in,out]diag_blkDiagnostic block
[in,out]mplMPI data
[in]namNamelist
[in]geomGeometry
[in]bparBlock parameters
[in]sampSampling
[in]ic2aLocal index
[in]ibBlock index
[in]prefixBlock prefix

Definition at line 64 of file type_diag_blk.F90.

◆ diag_blk_dealloc()

subroutine type_diag_blk::diag_blk_dealloc ( class(diag_blk_type), intent(inout)  diag_blk)
private

Release memory.

Parameters
[in,out]diag_blkDiagnostic block

Definition at line 135 of file type_diag_blk.F90.

◆ diag_blk_dualens()

subroutine type_diag_blk::diag_blk_dualens ( class(diag_blk_type), intent(inout)  diag_blk,
type(mpl_type), intent(inout)  mpl,
type(geom_type), intent(in)  geom,
type(bpar_type), intent(in)  bpar,
type(avg_blk_type), intent(in)  avg_blk,
type(avg_blk_type), intent(in)  avg_lr_blk,
type(diag_blk_type), intent(inout)  diag_lr_blk 
)
private

Diag_blk dualens.

Parameters
[in,out]diag_blkDiagnostic block (localization)
[in,out]mplMPI data
[in]geomGeometry
[in]bparBlock parameters
[in]avg_blkAveraged statistics block
[in]avg_lr_blkLR averaged statistics block
[in,out]diag_lr_blkDiagnostic block (LR localization)

Definition at line 786 of file type_diag_blk.F90.

◆ diag_blk_fitting()

subroutine type_diag_blk::diag_blk_fitting ( class(diag_blk_type), intent(inout)  diag_blk,
type(mpl_type), intent(inout)  mpl,
type(rng_type), intent(inout)  rng,
type(nam_type), intent(in)  nam,
type(geom_type), intent(in)  geom,
type(bpar_type), intent(in)  bpar,
type(samp_type), intent(in)  samp,
logical, intent(in), optional  coef 
)
private

Compute a fit of a raw function.

Parameters
[in,out]diag_blkDiagnostic block
[in,out]mplMPI data
[in,out]rngRandom number generator
[in]namNamelist
[in]geomGeometry
[in]bparBlock parameters
[in]sampSampling
[in]coefCoefficient estimation flag

Definition at line 294 of file type_diag_blk.F90.

◆ diag_blk_hybridization()

subroutine type_diag_blk::diag_blk_hybridization ( class(diag_blk_type), intent(inout)  diag_blk,
type(mpl_type), intent(inout)  mpl,
type(nam_type), intent(in)  nam,
type(geom_type), intent(in)  geom,
type(bpar_type), intent(in)  bpar,
type(avg_blk_type), intent(in)  avg_blk 
)
private

Diag_blk hybridization.

Parameters
[in,out]diag_blkDiagnostic block (localization)
[in,out]mplMPI data
[in]namNamelist
[in]geomGeometry
[in]bparBlock parameters
[in]avg_blkAveraged statistics block

Definition at line 649 of file type_diag_blk.F90.

◆ diag_blk_localization()

subroutine type_diag_blk::diag_blk_localization ( class(diag_blk_type), intent(inout)  diag_blk,
type(mpl_type), intent(inout)  mpl,
type(geom_type), intent(in)  geom,
type(bpar_type), intent(in)  bpar,
type(avg_blk_type), intent(in)  avg_blk 
)
private

Diag_blk localization.

Parameters
[in,out]diag_blkDiagnostic block (localization)
[in,out]mplMPI data
[in]geomGeometry
[in]bparBlock parameters
[in]avg_blkAveraged statistics block

Definition at line 602 of file type_diag_blk.F90.

◆ diag_blk_normalization()

subroutine type_diag_blk::diag_blk_normalization ( class(diag_blk_type), intent(inout)  diag_blk,
type(geom_type), intent(in)  geom,
type(bpar_type), intent(in)  bpar 
)
private

Compute diagnostic block normalization.

Parameters
[in,out]diag_blkDiagnostic block
[in]geomGeometry
[in]bparBlock parameters

Definition at line 264 of file type_diag_blk.F90.

◆ diag_blk_write()

subroutine type_diag_blk::diag_blk_write ( class(diag_blk_type), intent(inout)  diag_blk,
type(mpl_type), intent(inout)  mpl,
type(nam_type), intent(in)  nam,
type(geom_type), intent(in)  geom,
type(bpar_type), intent(in)  bpar,
character(len=*), intent(in)  filename 
)
private

Write.

Parameters
[in,out]diag_blkDiagnostic block
[in,out]mplMPI data
[in]namNamelist
[in]geomGeometry
[in]bparBlock parameters
[in]filenameFile name

Definition at line 157 of file type_diag_blk.F90.

Variable Documentation

◆ maxfactor

real(kind_real), parameter type_diag_blk::maxfactor = 2.0_kind_real

Definition at line 28 of file type_diag_blk.F90.

◆ nsc

integer, parameter type_diag_blk::nsc = 50

Definition at line 27 of file type_diag_blk.F90.