ps_HasLocalPotential Function

public function ps_HasLocalPotential(ps) result(p)

Arguments

Type IntentOptional AttributesName
type(ps_t), intent(in) :: ps

Return Value logical


Contents

Source Code


Source Code

function ps_HasLocalPotential(ps) result(p)
type(ps_t), intent(in) :: ps
logical                    :: p
!
p = (initialized(ps%local%Vlocal%grid))

end function ps_HasLocalPotential