GBTOlib: library for evaluation of molecular integrals in mixed Gaussian / B-spline basis 111
Loading...
Searching...
No Matches
utils.f90 File Reference

Modules

module  utils

Functions/Subroutines

real(kind=wp) function utils::D1MACH (i)
real(kind=ep1) function utils::Q1MACH (i)
subroutine utils::FDUMP
integer function utils::I1MACH (i)
function utils::J4SAVE (iwhich, ivalue, iset)
function utils::R1MACH (i)
subroutine utils::XERCNT (librar, subrou, messg, nerr, level, kontrl)
subroutine utils::XERHLT (messg)
subroutine utils::XERMSG (librar, subrou, messg, nerr, level)
subroutine utils::XERPRN (prefix, npref, messg, nwrap)
subroutine utils::XERSVE (librar, subrou, messg, kflag, nerr, level, icount)
subroutine utils::XGETUA (iunita, n)
subroutine utils::XERCLR
 *DECK XERCLR ***BEGIN PROLOGUE XERCLR ***PURPOSE Reset current error number to zero. ***LIBRARY SLATEC (XERROR) ***CATEGORY R3C ***TYPE ALL (XERCLR-A) ***KEYWORDS ERROR, XERROR ***AUTHOR Jones, R. E., (SNLA) ***DESCRIPTION
logical function utils::search_string (unit_no, string, rew, fmted)
 This function searches an input unit for the given string and returns the logical value .true. if the string has been found. In that case the input unit is positioned one line after the sought string. If the string is not found then the returned value is .false. and the input unit is positioned at its end.