public function nuclear_repulsion_energy_crystal(g, a) result(e_nuc)
nuclear_repulsion_energy_crystal() for the crystalline case
Arguments
| Type |
Intent | Optional | Attributes |
|
Name |
|
|
type(grid3d),
|
intent(in) |
|
|
:: |
g |
|
|
type(atom_set),
|
intent(in) |
|
|
:: |
a(:) |
|
Return Value
real(kind=long)