GNU Octave
4.0.0
A high-level interpreted language, primarily intended for numerical computations, mostly compatible with Matlab
Main Page
Namespaces
Classes
Files
File List
File Members
All
Classes
Namespaces
Files
Functions
Variables
Typedefs
Enumerations
Enumerator
Properties
Friends
Macros
Pages
liboctave
cruft
slatec-err
xerclr.f
Go to the documentation of this file.
1
*DECK XERCLR
2
SUBROUTINE
xerclr
3
C***BEGIN PROLOGUE XERCLR
4
C***PURPOSE Reset current error number to zero.
5
C***LIBRARY SLATEC (XERROR)
6
C***CATEGORY R3C
7
C***TYPE ALL (XERCLR-A)
8
C***KEYWORDS ERROR, XERROR
9
C***AUTHOR Jones, R. E., (SNLA)
10
C***DESCRIPTION
11
C
12
C Abstract
13
C This routine simply resets the current error number to zero.
14
C This may be necessary in order to determine that a certain
15
C error has occurred again since the last time NUMXER was
16
C referenced.
17
C
18
C***REFERENCES R. E. Jones and D. K. Kahaner, XERROR, the SLATEC
19
C Error-handling Package, SAND82-0800, Sandia
20
C Laboratories, 1982.
21
C***ROUTINES CALLED J4SAVE
22
C***REVISION HISTORY (YYMMDD)
23
C 790801 DATE WRITTEN
24
C 861211 REVISION DATE from Version 3.2
25
C 891214 Prologue converted to Version 4.0 format. (BAB)
26
C 920501 Reformatted the REFERENCES section. (WRB)
27
C***END PROLOGUE XERCLR
28
C***FIRST EXECUTABLE STATEMENT XERCLR
29
junk =
j4save
(1,0,.true.)
30
RETURN
31
END
xerclr
subroutine xerclr
Definition:
xerclr.f:2
j4save
function j4save(IWHICH, IVALUE, ISET)
Definition:
j4save.f:2
Generated on Thu Jun 4 2015 23:30:24 for GNU Octave by
1.8.8