constants Module


Uses


Variables

Type Visibility Attributes Name Initial
integer, public, parameter :: sp = selected_real_kind(6, 37)
integer, public, parameter :: dp = selected_real_kind(15, 307)
integer, public, parameter :: qp = selected_real_kind(33, 4931)
integer, public, parameter :: int32 = selected_int_kind(8)
integer, public, parameter :: int64 = selected_int_kind(15)
integer, public, parameter :: int128 = selected_int_kind(38)
real(kind=dp), public, parameter :: PI = 4._dp*atan(1._dp)
real(kind=dp), public, parameter :: PI2 = 2._dp*PI
real(kind=dp), public, parameter :: THIRD = 1._dp/3._dp
real(kind=dp), public, parameter :: Root2 = sqrt(2._dp)
real(kind=dp), public, parameter :: OverR2 = 1.0_dp/Root2
real(kind=dp), public, parameter :: EPS = 1e-13_dp
real(kind=dp), public, parameter :: INFINITY = huge(1.0_dp)
integer, public, parameter :: sizeof_int = sizeof(0)
integer, public, parameter :: bits_int = bit_size(0)
integer, public, parameter :: sizeof_log = sizeof(.true.)
integer, public, parameter :: sizeof_int32 = sizeof(0_int32)
integer, public, parameter :: sizeof_int64 = sizeof(0_int64)
integer, public, parameter :: sizeof_dp = sizeof(0._dp)
integer, public, parameter :: sizeof_complexdp = sizeof(complex(0._dp, 0._dp))
integer, public, parameter :: sizeof_sp = sizeof(0._sp)
integer, public, parameter :: maxExcit = 3
integer, public, parameter :: rep_size = 1
integer, public, parameter :: nreplicas = 1
integer, public, parameter :: lenof_sign = 1
integer, public, parameter :: inum_runs = 1
integer, public, parameter :: lenof_sign_kp = 1
integer, public, parameter :: lenof_sign_max = lenof_sign
integer, public, parameter :: inum_runs_max = inum_runs
integer, public, parameter :: sizeof_helement = 8
real(kind=dp), public, parameter :: HEl_zero = 0.0_dp
real(kind=dp), public, parameter, dimension(lenof_sign_max) :: null_part = 0.0_dp
integer, public, parameter :: MPIArg = int32
integer, public, parameter :: n_int = int64
logical, public :: build_64bit = .true.
integer, public, parameter :: int_rdm = int64
integer(kind=n_int), public :: temp3 = 0
integer, public, parameter :: bits_n_int = bit_size(temp3)
integer, public, parameter :: bni_ = bits_n_int
integer, public, parameter :: bn2_ = bits_n_int/2
integer, public, parameter :: size_n_int = bits_n_int/8
integer, public, parameter :: end_n_int = bits_n_int-1
integer(kind=int_rdm), public :: temp4 = 0
integer, public, parameter :: bits_int_rdm = bit_size(temp4)
integer, public, parameter :: size_int_rdm = bits_int_rdm/8
integer, public, parameter :: end_int_rdm = bits_int_rdm-1
integer, public, parameter :: hdf_err = int32
integer, public, parameter :: hdf_log = int32
integer, public, parameter :: NEL_UNINITIALIZED = -1

Derived Types

type, public ::  write_state_t

Components

Type Visibility Attributes Name Initial
integer, public :: funit
integer, public :: cols
integer, public :: cols_mc
logical, public :: init
logical, public :: mc_out
logical, public :: prepend