MODULE Char_Constants

Module Char_Constants Char_Constants exports character constants, strings and errors messages for routines available in STATPACK.

The code of module Char_Constants is in the source file Modules_Constants.F90

Here is the list of the useful public character constants and strings exported by module Char_Constants:

!
! NAMES FOR COMMON CHARACTERS.
!
character(len=1), parameter ::    &
    ampersand   = achar(38)  ,    &
    apostrophe  = achar(39)  ,    &
    atSign      = achar(64)  ,    &
    backslash   = achar(92)  ,    &
    backquote   = achar(96)  ,    &
    bang        = achar(33)  ,    &
    blank       = achar(32)  ,    &
    caret       = achar(94)  ,    &
    cbrace      = achar(125) ,    &
    cbracket    = achar(93)  ,    &
    cparen      = achar(41)  ,    &
    colon       = achar(58)  ,    &
    comma       = achar(44)  ,    &
    dash        = achar(45)  ,    &
    dollar      = achar(36)  ,    &
    equals      = achar(61)  ,    &
    exclamation = achar(33)  ,    &
    greaterthan = achar(62)  ,    &
    hash        = achar(35)
!
character(len=1), parameter ::    &
    lessthan    = achar(60)  ,    &
    minus       = achar(45)  ,    &
    obrace      = achar(123) ,    &
    obracket    = achar(91)  ,    &
    oparen      = achar(40)  ,    &
    percent     = achar(37)  ,    &
    period      = achar(46)  ,    &
    plus        = achar(43)  ,    &
    quesmark    = achar(63)  ,    &
    quote       = achar(34)  ,    &
    semicolon   = achar(59)  ,    &
    slash       = achar(47)  ,    &
    star        = achar(42)  ,    &
    tilde       = achar(126) ,    &
    vertBar     = achar(124) ,    &
    underscore  = achar(95)
!
! NAME FOR NULL STRING.
!
character(len=0), parameter :: null = ''
!
! NAMES FOR ASCII COMMAND CHARACTERS.
!
character(len=1), parameter ::    &
    bell = achar(7) ,             & ! BELL
    bs   = achar(8) ,             & ! BACK SPACE
    ht   = achar(9) ,             & ! HORIZONTAL TABULATION
    lf   = achar(10) ,            & ! LINE FEED
    vt   = achar(11) ,            & ! VERTICAL TABULATION
    ff   = achar(12) ,            & ! FORM FEED
    cr   = achar(13) ,            & ! CARRIAGE RETURN
    so   = achar(14) ,            & ! SHIFT OUT
    si   = achar(15) ,            & ! SHIFT IN
    esc  = achar(27) ,            & ! ESCAPE
    del  = achar(127)               ! DELETE
!
! ERROR MESSAGE FOR allocate STATEMENT .
!
character(len=*), parameter ::                                   &
allocate_error  = ' : problem in attempt to allocate memory !'

In order to use one of these constants or strings, you must include an appropriate use Char_Constants or use Statpack statement in your Fortran program, like:

use Char_Constants, only: underscore

or :

use Statpack, only: underscore