Argument Definitions (+ indicates altered content) INTEGER L2, M2, N2 REAL*8 EZ2, +ORBITAL(*)
Description * Copyright (C) 1996 Leif Laaksonen, Dage Sundholm * Copyright (C) 1996-2010 Jacek Kobus* * This program is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License version 2 as * published by the Free Software Foundation. * * ### hydrogenOrbB ### This routine returns an arrys containing a hydrogenic orbital centred on centre A for a given set of n,l,m and Z.
Source file: hydrogenOrbB.f
Intrinsic Functions Called DOUBLE PRECISION DBLE GENERIC*8 SQRT
External Functions and Subroutines Called REAL*8 FACTOR, PLAGUER, PLEGENDG
Local Variables (+ indicates altered content) INTEGER +IGP, +IMU, +IN, +INIOFF REAL*8 +COSTH2, +FN2, +R2T, +RR REAL*8 +SHN2, +Z
Referenced Common Block Variables (+ indicates altered content) CONSFP REAL*8 ONE, PII CONSFP REAL*8 ZERO GRIDI INTEGER MXNMU, NNI GRIDR REAL*8 VETA(1500) GRIDR REAL*8 VETASQ(1500) GRIDR REAL*8 VXI(2500) GRIDR REAL*8 VXISQ(2500) INPUTD2 REAL*8 R