fmutilbase Module Reference

FMUTIL Base Module. More...

Variables
integer, parameter, public	dp = real64
	import the fortran environment module for precision-related constants More...
integer, parameter, public	double
integer, parameter, public	precision
integer, parameter, public	kind
integer, parameter, public	parameter
integer, parameter, public	qp = real128
integer, parameter, public	quadruple
integer, parameter, public	wp = DP
integer, parameter, public	default
integer, parameter, public	word
integer, parameter, public	used
real(wp), parameter, public	eps = epsilon(1.0_WP)
	Smallest positive real satisfying 1.0_WP + eps > 1.0_WP. More...
real(wp), parameter, public	inf = huge(1.0_WP)
	Infinity definition. More...
integer, private	ind
	Identity matrix - 3x3. More...
logical, dimension(*), parameter	nzind3 = [ (ind == (3*(ind/3)+(ind/3+1)), ind=1,8), .TRUE.]
real(wp), dimension(*, *), parameter, public	i3 = reshape([merge([(1.0_WP, ind=1,9)], [(0.0_WP, ind=1,9)], nzind3)], [3,3])
logical, dimension(*), parameter	nzind6 = [ (ind == (6*(ind/6)+(ind/6+1)), ind=1,6**2-1), .TRUE.]
	Identity matrix - 6x6. More...
real(wp), dimension(*, *), parameter, public	i6 = reshape([merge([(1.0_WP, ind=1,6**2)], [(0.0_WP, ind=1,6**2)], nzind6)], [6,6])

Detailed Description

FMUTIL Base Module.

This module provides basic objects and functionality common to all the FMUTIL internal modules.

Author

Bharat Mahajan

Date

Created: 02/11/2020

Variable Documentation

default

integer, parameter, public fmutilbase::default

Definition at line 41 of file fmutil_base.F90.

double

integer, parameter, public fmutilbase::double

Definition at line 39 of file fmutil_base.F90.

dp

integer, parameter, public fmutilbase::dp = real64

import the fortran environment module for precision-related constants

By default, use 64-bit double precision (IEEE-754)

Definition at line 39 of file fmutil_base.F90.

eps

real(wp), parameter, public fmutilbase::eps = epsilon(1.0_WP)

Smallest positive real satisfying 1.0_WP + eps > 1.0_WP.

Definition at line 44 of file fmutil_base.F90.

i3

real(wp), dimension(*,*), parameter, public fmutilbase::i3 = reshape([merge([(1.0_WP, ind=1,9)], [(0.0_WP, ind=1,9)], nzind3)], [3,3])

Definition at line 52 of file fmutil_base.F90.

i6

real(wp), dimension(*,*), parameter, public fmutilbase::i6 = reshape([merge([(1.0_WP, ind=1,6**2)], [(0.0_WP, ind=1,6**2)], nzind6)], [6,6])

Definition at line 58 of file fmutil_base.F90.

ind

integer, private fmutilbase::ind

private

Identity matrix - 3x3.

Definition at line 50 of file fmutil_base.F90.

inf

real(wp), parameter, public fmutilbase::inf = huge(1.0_WP)

Infinity definition.

Definition at line 47 of file fmutil_base.F90.

Referenced by rootfinding::polyroots().

kind

integer parameter public fmutilbase::kind

Definition at line 39 of file fmutil_base.F90.

nzind3

logical, dimension(*), parameter fmutilbase::nzind3 = [ (ind == (3*(ind/3)+(ind/3+1)), ind=1,8), .TRUE.]

Definition at line 51 of file fmutil_base.F90.

nzind6

logical, dimension(*), parameter fmutilbase::nzind6 = [ (ind == (6*(ind/6)+(ind/6+1)), ind=1,6**2-1), .TRUE.]

Identity matrix - 6x6.

Definition at line 57 of file fmutil_base.F90.

parameter

integer parameter public fmutilbase::parameter

Definition at line 39 of file fmutil_base.F90.

precision

integer parameter public fmutilbase::precision

Definition at line 39 of file fmutil_base.F90.

qp

integer, parameter, public fmutilbase::qp = real128

Definition at line 40 of file fmutil_base.F90.

quadruple

integer, parameter, public fmutilbase::quadruple

Definition at line 40 of file fmutil_base.F90.

used

integer, parameter, public fmutilbase::used

Definition at line 41 of file fmutil_base.F90.

word

integer, parameter, public fmutilbase::word

Definition at line 41 of file fmutil_base.F90.

wp

integer, parameter, public fmutilbase::wp = DP

Definition at line 41 of file fmutil_base.F90.

Referenced by search::func::func(), and rootfinding::func::func().