congen_distribution.f90 File Reference

Go to the source code of this file.

Modules
module	congen_distribution
	Distribute electrons to available orbitals.

Functions/Subroutines
subroutine, private	congen_distribution::assign (nshl, ndist, nused, refcon, excon, qnstor, nx, nftw)
	Assign quantum numbers to real shells.
subroutine, private	congen_distribution::cgcoef (j1, j2, j3, m3, n, ms, c, intpfg)
	Clebsch-Gordan coefficients.
subroutine, private	congen_distribution::getsa (ne, l, is, isz, m, nc, c, iso)
	Form ne electrons in a shell coupled to (l,is).
subroutine, private	congen_distribution::getsm (ne, isz, nc, c, iso)
	Form ne electrons in a shell coupled to (l,is).
subroutine, private	congen_distribution::getso (ns, intpfg, nti, iqns, ci, nd, id, cd, last)
	?
subroutine, private	congen_distribution::cplea (nncsf, nadel, x, nftw)
	Loop through (and fill) all allowed couplings for a given electron distribution into shells.
subroutine, private	congen_distribution::cplem (nncsf, nadel, x, nftw, noex)
	?
subroutine, public	congen_distribution::distrb (nelecp, nshlp, shlmx, occshl, nslsv, kdssv, loopf, ksss, pqn, occst, shlmx1, pqnst, mshl, mshlst, gushl, gushst, cup, cupst, ndprod, symtyp, confpf, sshl, sshlst, ncsf, nncsf, nadel, nndel, x, nftw, noex)
	Distribute electrons to spin-orbitals.
subroutine, private	congen_distribution::packdet (iqn, ni, jqn, nj, ci, cj, nt)
	Copy determinant data.
subroutine, private	congen_distribution::print1 (qnstor)
	?
subroutine, private	congen_distribution::print2 (iidis1)
	?
subroutine, private	congen_distribution::print3 (iidis1, i13)
	?
subroutine, private	congen_distribution::print4 (nd, x, ix)
	?
subroutine, private	congen_distribution::print5 (nd, ndi)
	?
subroutine, private	congen_distribution::state (ns, x, last, nd, confpf)
	?
subroutine	congen_distribution::wfcple (nam, iqn, isz, icup, iqns, c, last, lc2, intpfg)
	?
subroutine, private	congen_distribution::wfn (nncsf, nadel, iidist, iidis3, nodi, ndi, cdi, ndel, pqnshl, x, ix, nx)
	TODO...