Determine if any of the known species are electron like
This should be effectively constant, could cache during init
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| type(specie), | intent(in), | dimension (:) | :: | spec |
pure logical function has_electron_species (spec)
implicit none
type (specie), dimension (:), intent (in) :: spec
has_electron_species = any(is_electron_species(spec))
end function has_electron_species