nuclear_repulsion_energy Function

public function nuclear_repulsion_energy(a, p) result(e_nuc)

nuclear repulsion energy

Arguments

Type	Intent	Optional	Attributes		Name
type(atom_set),	intent(in)			::	a(:)
type(param),	intent(in)			::	p

Return Value real(kind=long)