REAL FUNCTION HWF ( NN, LL, ZZ, RT )
Argument Definitions (+ indicates altered content)
INTEGER            LL,         NN
REAL*8             RT,         ZZ
Description
  Copyright (C) 1978 Charlotte Froese Fisher 
  Copyright (C) 2012 Jacek Kobus 
 
 
hwf computes a value for an unnormalized hydrogenic function
Source file:hwf.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          EXP
Parameter Variables Used
INTEGER            MAXNO              (MAXNO = 29999)
INTEGER            MAXORB             (MAXORB = 20)
Local Variables (+ indicates altered content)
INTEGER           +I,         +K
REAL*8            +A,         +B,         +C,         +PP
REAL*8            +XX
Referenced Common Block Variables (+ indicates altered content)
INOUT              INTEGER            OUC
PARAM1             REAL*8             D0,        D1
PARAM1             REAL*8             D2