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,                  &
                               omp_limit, omp_limit2, omp_chunk,       &
                               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 Num_Recipes
 !
 use BLAS_interfaces
 use Lapack_interfaces
 !
 ! PUBLIC ENTITIES
 ! ===============
 !
 public