|
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 More...
|
|
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. More...
|
|