N.I.M.R.O.D.  
Functions/Subroutines

dlsode.f90 File Reference

Go to the source code of this file.

Functions/Subroutines

subroutine DLSODE (F, NEQ, Y, T, TOUT, ITOL, RTOL, ATOL, ITASK, ISTATE, IOPT, RWORK, LRW, IWORK, LIW, JAC, MF)
 ODE Livermore Solver.
DOUBLE PRECISION DUMACH ()
subroutine DUMSUM (A, B, C)
subroutine DCFODE (METH, ELCO, TESCO)
subroutine DINTDY (T, K, YH, NYH, DKY, IFLAG)
subroutine DPREPJ (NEQ, Y, YH, NYH, EWT, FTEM, SAVF, WM, IWM, F, JAC)
subroutine DSOLSY (WM, IWM, X, TEM)
subroutine DSRCOM (RSAV, ISAV, JOB)
subroutine DSTODE (NEQ, Y, YH, NYH, YH1, EWT, SAVF, ACOR, WM, IWM, F, JAC, PJAC, SLVS)
subroutine DEWSET (N, ITOL, RTOL, ATOL, YCUR, EWT)
DOUBLE PRECISION DVNORM (N, V, W)
subroutine DGEFA (A, LDA, N, IPVT, INFO)
subroutine DGESL (A, LDA, N, IPVT, B, JOB)
subroutine DGBFA (ABD, LDA, N, ML, MU, IPVT, INFO)
subroutine DGBSL (ABD, LDA, N, ML, MU, IPVT, B, JOB)
subroutine DAXPY (N, DA, DX, INCX, DY, INCY)
DOUBLE PRECISION DDOT (N, DX, INCX, DY, INCY)
subroutine DSCAL (N, DA, DX, INCX)
INTEGER IDAMAX (N, DX, INCX)
subroutine XERRWD (MSG, NMES, NERR, LEVEL, NI, I1, I2, NR, R1, R2)
subroutine XSETF (MFLAG)
subroutine XSETUN (LUN)
INTEGER IXSAV (IPAR, IVALUE, ISET)
INTEGER IUMACH ()

Function Documentation

subroutine DAXPY ( ,
DOUBLE PRECISION  DA,
DOUBLE PRECISION,dimension(*)  DX,
INCX  ,
DOUBLE PRECISION,dimension(*)  DY,
INCY   
)

Definition at line 3574 of file dlsode.f90.

Referenced by DGBFA(), DGBSL(), DGEFA(), and DGESL().

Here is the caller graph for this function:

subroutine DCFODE ( INTEGER  METH,
DOUBLE PRECISION,dimension(13,12),dimension  ELCO,
DOUBLE PRECISION,dimension(3,12),dimension  TESCO 
)

Definition at line 1830 of file dlsode.f90.

Referenced by DSTODE().

Here is the caller graph for this function:

DOUBLE PRECISION DDOT ( ,
DOUBLE PRECISION,dimension(*)  DX,
INCX  ,
DOUBLE PRECISION,dimension(*)  DY,
INCY   
)

Definition at line 3665 of file dlsode.f90.

subroutine DEWSET ( INTEGER  N,
INTEGER  ITOL,
DOUBLE PRECISION,dimension(*),dimension  RTOL,
DOUBLE PRECISION,dimension(*),dimension  ATOL,
DOUBLE PRECISION,dimension(n),dimension  YCUR,
DOUBLE PRECISION,dimension(n),dimension  EWT 
)

Definition at line 2911 of file dlsode.f90.

Referenced by DLSODE().

Here is the caller graph for this function:

subroutine DGBFA ( DOUBLE PRECISION,dimension(lda,*)  ABD,
INTEGER  LDA,
INTEGER  N,
INTEGER  ML,
INTEGER  MU,
INTEGER,dimension(*)  IPVT,
INTEGER  INFO 
)

Definition at line 3240 of file dlsode.f90.

References DAXPY(), and DSCAL().

Referenced by DPREPJ().

Here is the call graph for this function:

Here is the caller graph for this function:

subroutine DGBSL ( DOUBLE PRECISION,dimension(lda,*)  ABD,
INTEGER  LDA,
INTEGER  N,
INTEGER  ML,
INTEGER  MU,
INTEGER,dimension(*)  IPVT,
DOUBLE PRECISION,dimension(*)  B,
INTEGER  JOB 
)

Definition at line 3426 of file dlsode.f90.

References DAXPY().

Referenced by DSOLSY().

Here is the call graph for this function:

Here is the caller graph for this function:

subroutine DGEFA ( DOUBLE PRECISION,dimension(lda,*)  A,
INTEGER  LDA,
INTEGER  N,
INTEGER,dimension(*)  IPVT,
INTEGER  INFO 
)

Definition at line 2994 of file dlsode.f90.

References DAXPY(), and DSCAL().

Referenced by DPREPJ().

Here is the call graph for this function:

Here is the caller graph for this function:

subroutine DGESL ( DOUBLE PRECISION,dimension(lda,*)  A,
INTEGER  LDA,
INTEGER  N,
INTEGER,dimension(*)  IPVT,
DOUBLE PRECISION,dimension(*)  B,
INTEGER  JOB 
)

Definition at line 3110 of file dlsode.f90.

References DAXPY().

Referenced by DSOLSY().

Here is the call graph for this function:

Here is the caller graph for this function:

subroutine DINTDY ( DOUBLE PRECISION  T,
INTEGER  K,
DOUBLE PRECISION,dimension(nyh,*),dimension  YH,
INTEGER  NYH,
DOUBLE PRECISION,dimension(*),dimension  DKY,
INTEGER  IFLAG 
)

Definition at line 1958 of file dlsode.f90.

References XERRWD().

Referenced by DLSODE().

Here is the call graph for this function:

Here is the caller graph for this function:

subroutine DLSODE ( ,
INTEGER,dimension(*),dimension  NEQ,
DOUBLE PRECISION,dimension(*),dimension  Y,
DOUBLE PRECISION  T,
DOUBLE PRECISION  TOUT,
INTEGER  ITOL,
DOUBLE PRECISION,dimension(*),dimension  RTOL,
DOUBLE PRECISION,dimension(*),dimension  ATOL,
INTEGER  ITASK,
INTEGER  ISTATE,
INTEGER  IOPT,
DOUBLE PRECISION,dimension(lrw),dimension  RWORK,
INTEGER  LRW,
INTEGER,dimension(liw),dimension  IWORK,
INTEGER  LIW,
JAC  ,
INTEGER  MF 
)

ODE Livermore Solver.

AUTHOR : Hindmarsh, Alan C.

DESCRIPTION:

DLSODE classique de ODEPACK

MODIFICATION:

07/10/06 - Guedj - line 3977 Remove "stop" to avoid program exit if the solver fail

22/02/2011 - Prague - Double precision (sqrt,min,max,abs)

01/09/2012 - Prague - Refactoring

INFORMATIONS:

Definition at line 30 of file dlsode.f90.

References DEWSET(), DINTDY(), DPREPJ(), DSOLSY(), DSTODE(), and XERRWD().

Referenced by solution().

Here is the call graph for this function:

Here is the caller graph for this function:

subroutine DPREPJ ( INTEGER,dimension(*),dimension  NEQ,
DOUBLE PRECISION,dimension(*),dimension  Y,
DOUBLE PRECISION,dimension(nyh,*),dimension  YH,
INTEGER  NYH,
DOUBLE PRECISION,dimension(*),dimension  EWT,
DOUBLE PRECISION,dimension(*),dimension  FTEM,
DOUBLE PRECISION,dimension(*),dimension  SAVF,
DOUBLE PRECISION,dimension(*),dimension  WM,
INTEGER,dimension(*),dimension  IWM,
,
JAC   
)

Definition at line 2066 of file dlsode.f90.

References DGBFA(), and DGEFA().

Referenced by DLSODE().

Here is the call graph for this function:

Here is the caller graph for this function:

subroutine DSCAL ( INTEGER  N,
DOUBLE PRECISION  DA,
DOUBLE PRECISION,dimension(*)  DX,
INTEGER  INCX 
)

Definition at line 3753 of file dlsode.f90.

Referenced by DGBFA(), and DGEFA().

Here is the caller graph for this function:

subroutine DSOLSY ( DOUBLE PRECISION,dimension(*),dimension  WM,
INTEGER,dimension(*),dimension  IWM,
DOUBLE PRECISION,dimension(*),dimension  X,
DOUBLE PRECISION,dimension(*),dimension  TEM 
)

Definition at line 2260 of file dlsode.f90.

References DGBSL(), and DGESL().

Referenced by DLSODE().

Here is the call graph for this function:

Here is the caller graph for this function:

subroutine DSRCOM ( DOUBLE PRECISION,dimension(*),dimension  RSAV,
INTEGER,dimension(*),dimension  ISAV,
INTEGER  JOB 
)

Definition at line 2351 of file dlsode.f90.

subroutine DSTODE ( INTEGER,dimension(*),dimension  NEQ,
DOUBLE PRECISION,dimension(*),dimension  Y,
DOUBLE PRECISION,dimension(nyh,*),dimension  YH,
INTEGER  NYH,
DOUBLE PRECISION,dimension(*),dimension  YH1,
DOUBLE PRECISION,dimension(*),dimension  EWT,
DOUBLE PRECISION,dimension(*),dimension  SAVF,
DOUBLE PRECISION,dimension(*),dimension  ACOR,
DOUBLE PRECISION,dimension(*),dimension  WM,
INTEGER,dimension(*),dimension  IWM,
,
JAC  ,
PJAC  ,
SLVS   
)

Definition at line 2413 of file dlsode.f90.

References DCFODE().

Referenced by DLSODE().

Here is the call graph for this function:

Here is the caller graph for this function:

DOUBLE PRECISION DUMACH ( )

Definition at line 1785 of file dlsode.f90.

References DUMSUM().

Here is the call graph for this function:

subroutine DUMSUM ( DOUBLE PRECISION  A,
DOUBLE PRECISION  B,
DOUBLE PRECISION  C 
)

Definition at line 1823 of file dlsode.f90.

Referenced by DUMACH().

Here is the caller graph for this function:

DOUBLE PRECISION DVNORM ( INTEGER  N,
DOUBLE PRECISION,dimension(n),dimension  V,
DOUBLE PRECISION,dimension(n),dimension  W 
)

Definition at line 2959 of file dlsode.f90.

INTEGER IDAMAX ( INTEGER  N,
DOUBLE PRECISION,dimension(*)  DX,
INTEGER  INCX 
)

Definition at line 3832 of file dlsode.f90.

INTEGER IUMACH ( )

Definition at line 4150 of file dlsode.f90.

INTEGER IXSAV ( INTEGER  IPAR,
INTEGER  IVALUE,
LOGICAL  ISET 
)

Definition at line 4077 of file dlsode.f90.

subroutine XERRWD ( CHARACTER*(*)  MSG,
INTEGER  NMES,
INTEGER  NERR,
INTEGER  LEVEL,
INTEGER  NI,
INTEGER  I1,
INTEGER  I2,
INTEGER  NR,
DOUBLE PRECISION  R1,
DOUBLE PRECISION  R2 
)

Definition at line 3913 of file dlsode.f90.

Referenced by DINTDY(), and DLSODE().

Here is the caller graph for this function:

subroutine XSETF ( INTEGER  MFLAG)

Definition at line 4009 of file dlsode.f90.

subroutine XSETUN ( INTEGER  LUN)

Definition at line 4044 of file dlsode.f90.