fsml_con.f90 Source File


This file depends on

sourcefile~~fsml_con.f90~~EfferentGraph sourcefile~fsml_con.f90 fsml_con.f90 sourcefile~fsml_ini.f90 fsml_ini.f90 sourcefile~fsml_con.f90->sourcefile~fsml_ini.f90

Files dependent on this one

sourcefile~~fsml_con.f90~~AfferentGraph sourcefile~fsml_con.f90 fsml_con.f90 sourcefile~fsml_dst.f90 fsml_dst.f90 sourcefile~fsml_dst.f90->sourcefile~fsml_con.f90 sourcefile~fsml_err.f90 fsml_err.f90 sourcefile~fsml_dst.f90->sourcefile~fsml_err.f90 sourcefile~fsml_err.f90->sourcefile~fsml_con.f90 sourcefile~fsml_sts.f90 fsml_sts.f90 sourcefile~fsml_sts.f90->sourcefile~fsml_con.f90 sourcefile~fsml_sts.f90->sourcefile~fsml_err.f90 sourcefile~fsml_tst.f90 fsml_tst.f90 sourcefile~fsml_tst.f90->sourcefile~fsml_con.f90 sourcefile~fsml_tst.f90->sourcefile~fsml_dst.f90 sourcefile~fsml_tst.f90->sourcefile~fsml_err.f90 sourcefile~fsml_tst.f90->sourcefile~fsml_sts.f90 sourcefile~fsml.f90 fsml.f90 sourcefile~fsml.f90->sourcefile~fsml_dst.f90 sourcefile~fsml.f90->sourcefile~fsml_sts.f90 sourcefile~fsml.f90->sourcefile~fsml_tst.f90 sourcefile~fsml_lin.f90 fsml_lin.f90 sourcefile~fsml.f90->sourcefile~fsml_lin.f90 sourcefile~fsml_lin.f90->sourcefile~fsml_err.f90 sourcefile~fsml_lin.f90->sourcefile~fsml_sts.f90

Source Code

module fsml_con

! |--------------------------------------------------------------------|
! | fsml - fortran statistics and machine learning library             |
! |                                                                    |
! | about                                                              |
! | -----                                                              |
! | Module for constants.                                              |
! |                                                                    |
! | license : MIT                                                      |
! | author  : Sebastian G. Mutz (sebastian@sebastianmutz.com)          |
! |--------------------------------------------------------------------|

! FORD
!! Module for computational and mathematical constants.

  ! load modules
  use :: fsml_ini

  ! basic options
  implicit none
  private

  ! declare public procedures
  public :: c_pi
  public :: c_sentinel_r
  public :: c_bisect_tol, c_bisect_i

  ! mathematical constants
  real(wp), parameter    :: c_pi = 3.1415926535897932384626433832795028841972_wp !! pi

  ! computational constants
  real(wp), parameter    :: c_sentinel_r = -999.0_wp  !! real sentinel value
  real(wp), parameter    :: c_bisect_tol = 1.0e-12_wp !! convergence tolerance for bisection method (dst)
  integer(i4), parameter :: c_bisect_i   = 200        !! max. number of iterations for bisection method (dst)

end module fsml_con