Searched refs:qmLJs (Results 1 – 4 of 4) sorted by relevance
/dports/science/dalton/dalton-66052b3af5ea7225e31178bf9a8b031913c72190/external/pelib/src/ |
H A D | pelib_mpi.F90 | 243 if (myid /= master .and. .not. allocated(qmLJs)) allocate(qmLJs(2,qmLJsites)) 244 call mpi_bcast(qmLJs(1,1), 2 * qmLJsites, rmpi, master, comm, ierr)
|
H A D | pelib_options.F90 | 258 real(rp), dimension(:,:), allocatable, save :: qmLJs variable
|
H A D | pelib_operators.F90 | 1716 r_sm = 0.5 * (LJs(1,site) + qmLJs(1,i)) * aa2bohr 1717 eps_sm = sqrt(LJs(2,site) * qmLJs(2,i)) * kcal2hartree 1754 r_sm = 0.5 * (LJs(1,site) + qmLJs(1,i)) * aa2bohr 1755 eps_sm = (sqrt(LJs(2,site) * qmLJs(2,i))) * kcal2hartree
|
/dports/science/dalton/dalton-66052b3af5ea7225e31178bf9a8b031913c72190/DALTON/pelib/ |
H A D | pelib_interface.F90 | 368 allocate(qmLJs(2,qmLJsites)) 371 qmLJs(1,i) = temp(1) * 2.0_rp 372 qmLJs(2,i) = temp(2)
|