Searched defs:pelib_init (Results 1 – 1 of 1) sorted by relevance
| /dports/science/dalton/dalton-66052b3af5ea7225e31178bf9a8b031913c72190/external/pelib/src/ |
| H A D | pelib.F90 | 56 integer(ip) :: lupri
60 integer(ip) :: i, j, k, l local
61 integer(ip) :: idx, jdx, kdx, nidx
64 logical(lp) :: lexist, skip
65 real(rp) :: rclose, mass, totmas, redist_charge
66 real(rp), dimension(3) :: Rsm, Rji
161 10 format(4x,a)
162 20 format(/6x,a)
163 30 format(/8x,a)
164 40 format(8x,a)
[all …]
|