Determine if any of the known species are non-Maxwellian
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
type(specie), | intent(in), | dimension (:) | :: | spec |
pure logical function has_nonmaxw_species (spec)
implicit none
type (specie), dimension (:), intent (in) :: spec
has_nonmaxw_species = .NOT. all(spec%f0type == f0_maxwellian)
end function has_nonmaxw_species