mod_global_variables Module



Contents


Variables

TypeVisibilityAttributesNameInitial
integer, public, parameter:: sp =real32

single-precision value

integer, public, parameter:: dp =real64

double-precision value

integer, public, parameter:: qp =real128

quadruple-precision value

integer, public, parameter:: str_len =500

default length for strings

integer, public, parameter:: str_len_arr =16

default length for strings in arrays

real(kind=dp), public, parameter:: dp_LIMIT =5.0d-15

tolerance for real(dp) zero, bit higher than machine precision

real(kind=dp), protected :: NaN

NaN value (ieee_quiet_nan)

complex(kind=dp), public, parameter:: ic =(0.0d0, 1.0d0)

complex number i

complex(kind=dp), public, parameter:: ir =(1.0d0, 0.0d0)

complex real

integer, public, parameter:: n_gauss =4

number of Gaussian nodes

real(kind=dp), public, parameter:: gaussian_nodes(n_gauss) =[-0.861136311594053_dp, -0.339981043584856_dp, 0.339981043584856_dp, 0.861136311594053_dp]

values for the Gaussian nodes in [-1, 1]

real(kind=dp), public, parameter:: gaussian_weights(n_gauss) =[0.347854845137454_dp, 0.652145154862546_dp, 0.652145154862546_dp, 0.347854845137454_dp]

weights for the Gaussian nodes in [-1, 1]


Subroutines

public subroutine initialise_globals()

Arguments

None