MODULE Statpack

Module Statpack is an interface module, which exports all the constants, subroutines and functions publicly available from other modules available in the STATPACK library.

Using the Statpack module in your Fortran program is the simplest and standard way of accessing the routines and constants available in the STATPACK library.

Note that the Statpack module exports also interface blocks for several routines/drivers available in the BLAS and LAPACK libraries as defined in the modules BLAS_interfaces and Lapack_interfaces.

Since BLAS and LAPACK libraries provide routines only for single and double precision real/complex data, the interface blocks defined in the modules BLAS_interfaces and Lapack_interfaces and exported by the Statpack module will work obviously only if the real/complex kind type stnd defined in module Select_Parameters is equivalent to single or double precision real/complex data.

The Statpack module contains just use statements for the different STATPACK modules and a public statement for exporting all the public constants and routines from these modules:

!
! USED MODULES
! ============
!
use Select_Parameters, only : i1b, i2b, i4b, i8b, lgl, stnd, extd,    &
                              n1_def, n2_def, n3_def,                 &
                              defunit, urandom_file, blksz_util,      &
                              blksz_lin, blksz_fft, blksz_qr,         &
                              blksz_eig, blksz2_eig, blksz2_svd,      &
                              max_francis_steps_svd,                  &
                              max_francis_steps_eig,                  &
                              omp_limit, omp_limit2, omp_chunk,       &
                              max_num_threads_symtrid_cmp,            &
                              max_num_threads_symtrid_cmp2,           &
                              max_num_threads_bd_cmp,                 &
                              max_num_threads_bd_cmp2,                &
                              npar_arth, npar2_arth,                  &
                              npar_geop, npar2_geop,                  &
                              npar_cumsum, npar_cumprod,              &
                              npar_poly, npar_polyterm
!
use Derived_Types, only     : sprs2_stnd, sprs2_stndc, sprs2_extd,    &
                              sprs2_extdc
!
use Logical_Constants
use Reals_Constants
use Num_Constants
use Char_Constants
use Utilities
use Utilities_With_Pnter
use Random
!
use String_Procedures
use Print_Procedures
use Time_Procedures
use Sort_Procedures
!
use FFT_Procedures
use Giv_Procedures
use Hous_Procedures
use Lin_Procedures
use Eig_Procedures
use QR_Procedures
use SVD_Procedures
use LLSQ_Procedures
use Prob_Procedures
use Stat_Procedures
use Mul_Stat_Procedures
use Time_Series_Procedures
!
use BLAS_interfaces
use Lapack_interfaces
!
! PUBLIC ENTITIES
! ===============
!
public