632020195a
Former-commit-id:fda897d2d0[formerly253e8bc948] [formerlyfda897d2d0[formerly253e8bc948] [formerly295cbf95e5[formerly 0816cd253c86acc699cb90866131619c4679f631]]] Former-commit-id:295cbf95e5Former-commit-id:2a3bf4ec32[formerlyae3d17c698] Former-commit-id:a610dcde73
26 lines
772 B
Text
Executable file
26 lines
772 B
Text
Executable file
C************************************************************************
|
|
C* ERCMN *
|
|
C* *
|
|
C* This common block contains variables for the ER-library subroutines. *
|
|
C* *
|
|
C** *
|
|
C* Log: *
|
|
C* K. Tyle/GSC 12/96 *
|
|
C* S. Maxwell/GSC 6/97 Documentation changes *
|
|
C************************************************************************
|
|
LOGICAL etmflg
|
|
C*
|
|
COMMON / ERCMN /
|
|
+ ielevl,
|
|
C! Error level
|
|
C! 0 = always logged
|
|
C! 2 = detailed information
|
|
C! 4 = debug information
|
|
+ iebuff,
|
|
C! Output destination
|
|
C! -1 = No output
|
|
C! 0 = Standard output
|
|
C! 1 = Output to buffer
|
|
+ etmflg
|
|
C! Time flag
|
|
C------------------------------------------------------------------------
|