Argument Definitions (+ indicates altered content) INTEGER NMI REAL*8 EDECAY(NNI,4), +PSI(*)
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. * * ### orbAsymptSet ### Recalculates asymptotic values of a given orbital at the practical infinity using exponential decay values prepared by calling orbAsymptDet.
Source file: orbAsymptSet.f
Local Variables (+ indicates altered content) INTEGER +I, +ITT, +J, +JJ INTEGER +KK
Referenced Common Block Variables (+ indicates altered content) GRIDI INTEGER NNI