Argument Definitions (+ indicates altered content) REAL*8 CW_COUL(*), CW_EXCH(*) REAL*8 CW_ORB(*), CW_SCTCH(*), CW_SUPPL(*)
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. * * ### initOrbPot ### Initializes orbitals and potentials.
Source file: initOrbPot.f
I/O Operations: Unit ID Unit No Access Form Operation IINP14 SEQ FMTD O IOUT24 SEQ FMTD O 11 SEQ UNF O 12 SEQ UNF O 11 SEQ FMTD O 12 SEQ FMTD O 21 SEQ UNF O 22 SEQ UNF O 21 SEQ FMTD O 22 SEQ FMTD O 13 SEQ UNF O 13 SEQ A 13 SEQ FMTD O 23 SEQ UNF O 23 SEQ A 23 SEQ FMTD O 11 SEQ A 12 SEQ A 21 SEQ A 22 SEQ A * SEQ FMTD W Operation codes A=rewind,B=backspace,C=close,E=endfile I=inquire,O=open,R=read,W=write
External Functions and Subroutines Called SUBROUTINE INITDISK, INITGAUSS, INITHF, INITHYD SUBROUTINE INITPOT, PREPGAUSS, PREPGAUSSCUST
Local Variables (+ indicates altered content) CHARACTER*20 +CASEINP, +CASEOUT, +COULINP, +COULOUT CHARACTER*20 +EXCHINP, +EXCHOUT, +PSIINP, +PSIOUT
Referenced Common Block Variables (+ indicates altered content) ADDRESS1 INTEGER I4B(20), I5B(20) INPUTD1 INTEGER +IDUMP, IFORM INPUTD1 INTEGER INI, INI4 INPUTD1 INTEGER INPFORM, IOUTFORM IOCHAN INTEGER +IDAT, +IINP13 IOCHAN INTEGER IINP14, IOUT23 IOCHAN INTEGER IOUT24