SUBROUTINE NMRVS ( NJ, DELTA, MM, PDE, F )
Argument Definitions (+ indicates altered content)
INTEGER           +MM,         NJ
REAL*8            +DELTA,      F(*),      +PDE(*)
Description
  Copyright (C) 1978 Charlotte Froese Fisher 
  Copyright (C) 2012 Jacek Kobus 
 
 
The nmrvs subroutine integrates the equation Y''=F(r)Y+G(r) 
outward nj steps by the Numerov method, then applies a tail 
procedure for a solution
Source file:nmrvs.f
I/O Operations:
Unit ID  Unit No       Access  Form   Operation
    OUC                   SEQ  FMTD           W  

Operation codes A=rewind,B=backspace,C=close,E=endfile
                I=inquire,O=open,R=read,W=write
Intrinsic Functions Called
GENERIC*8          ABS,        EXP,        SQRT
Parameter Variables Used
INTEGER            MAXNO              (MAXNO = 29999)
INTEGER            MAXORB             (MAXORB = 20)
Local Variables (+ indicates altered content)
INTEGER           +I,         +II,        +J,         +K
INTEGER           +M
REAL*8            +A(MAXNO),  +CON,       +D(MAXNO),  +G
REAL*8            +G1,        +G2,        +G3,        +RATIO
REAL*8            +Y1,        +Y2,        +Y3
Referenced Equivalenced Variables (+ indicates altered content)

EQUIV              REAL*8            +G          Local Var
                   REAL*8            +G3         Local Var
Referenced Common Block Variables (+ indicates altered content)
INOUT              INTEGER            OUC
MCOMMBLOCK         REAL*8             R(MAXNO),  RR(MAXNO)
MCOMMBLOCK         REAL*8             YR(MAXNO)
PARAM              INTEGER            ND,        NO
PARAM              REAL*8             CH,        EH
PARAM              REAL*8             TOL
PARAM1             REAL*8             D0,        D1
PARAM1             REAL*8             D10,       D2