xerrwd Subroutine

public subroutine xerrwd(Msg, Nmes, Nerr, Level, Ni, I1, I2, Nr, R1, R2)

xerrwd(3f) - [M_odepack::Matrix] Write error message with values.

  subroutine xerrwd(Msg,Nmes,Nerr,Level,Ni,I1,I2,Nr,R1,R2)

  character(len=*),intent(in) :: Msg
  integer                     :: Nmes
  integer                     :: Nerr
  integer,intent(in)          :: Level
  integer,intent(in)          :: Ni
  integer,intent(in)          :: I1
  integer,intent(in)          :: I2
  integer,intent(in)          :: Nr
  real(kind=dp),intent(in)    :: R1
  real(kind=dp),intent(in)    :: R2

DESCRIPTION

Subroutines XERRWD, XSETF, XSETUN, and the function routine IXSAV, as given here, constitute a simplified version of the SLATEC error handling package.

OPTIONS

All arguments are input arguments.

MSG

The message (character array).

NMES

The length of MSG (number of characters).

NERR

The error number (not used).

LEVEL

The error level.. 0 or 1 means recoverable (control returns to caller). 2 means fatal (run is aborted–see note below).

NI

Number of integers (0, 1, or 2) to be printed with message.

I1,I2

Integers to be printed, depending on NI.

NR

Number of reals (0, 1, or 2) to be printed with message.

R1,R2

Reals to be printed, depending on NR.

Note.. this routine is machine-dependent and specialized for use in limited context, in the following ways..

  1. The argument MSG is assumed to be of type CHARACTER, and the message is printed with a format of (1X,A).
  2. The message is assumed to take only one line. Multi-line messages are generated by repeated calls.
  3. If LEVEL = 2, control passes to the statement STOP to abort the run. This statement may be machine-dependent.
  4. R1 and R2 are assumed to be in double precision and are printed in D21.13 format.

Arguments

Type IntentOptional Attributes Name
character(len=*), intent(in) :: Msg
integer :: Nmes
integer :: Nerr
integer, intent(in) :: Level
integer, intent(in) :: Ni
integer, intent(in) :: I1
integer, intent(in) :: I2
integer, intent(in) :: Nr
real(kind=dp), intent(in) :: R1
real(kind=dp), intent(in) :: R2

Called by

proc~~xerrwd~2~~CalledByGraph proc~xerrwd~2 M_odepack::xerrwd proc~dintdy~2 M_odepack::dintdy proc~dintdy~2->proc~xerrwd~2 proc~dlsodar~2 M_odepack::dlsodar proc~dlsodar~2->proc~xerrwd~2 proc~dlsodar~2->proc~dintdy~2 proc~drchek M_odepack::drchek proc~dlsodar~2->proc~drchek proc~dlsoda~2 M_odepack::dlsoda proc~dlsoda~2->proc~xerrwd~2 proc~dlsoda~2->proc~dintdy~2 proc~dlsodes~2 M_odepack::dlsodes proc~dlsodes~2->proc~xerrwd~2 proc~dlsodes~2->proc~dintdy~2 proc~dlsode~2 M_odepack::dlsode proc~dlsode~2->proc~xerrwd~2 proc~dlsode~2->proc~dintdy~2 proc~dlsodis~2 M_odepack::dlsodis proc~dlsodis~2->proc~xerrwd~2 proc~dlsodis~2->proc~dintdy~2 proc~dlsodi~2 M_odepack::dlsodi proc~dlsodi~2->proc~xerrwd~2 proc~dlsodi~2->proc~dintdy~2 proc~dlsodkr~2 M_odepack::dlsodkr proc~dlsodkr~2->proc~xerrwd~2 proc~dlsodkr~2->proc~dintdy~2 proc~dlsodkr~2->proc~drchek proc~dlsodpk~2 M_odepack::dlsodpk proc~dlsodpk~2->proc~xerrwd~2 proc~dlsodpk~2->proc~dintdy~2 proc~dlsoibt~2 M_odepack::dlsoibt proc~dlsoibt~2->proc~xerrwd~2 proc~dlsoibt~2->proc~dintdy~2 proc~drchek->proc~dintdy~2