subset_index.f90 File Reference
Functions/Subroutines | |
| subroutine | r_subset_index (tiny, abs_diff, na, a, nb, b, index, status) |
| Routine returns indices in real array a for elements of array b (b is a subset of a) More... | |
Function/Subroutine Documentation
◆ r_subset_index()
| subroutine r_subset_index | ( | real, intent(in) | tiny, |
| logical, intent(in) | abs_diff, | ||
| integer, intent(in) | na, | ||
| real, dimension(na), intent(in) | a, | ||
| integer, intent(in) | nb, | ||
| real, dimension(nb), intent(in) | b, | ||
| integer, dimension(nb), intent(out) | index, | ||
| logical, intent(out) | status | ||
| ) |
Routine returns indices in real array a for elements of array b (b is a subset of a)
- Parameters
-
[in] tiny - tiny value [in] abs_diff - flag for used differences (.T. - absolute, .F. - relative) [in] na - number of elements in array a [in] a - ascending order array [in] nb - number of elements in array b (b is a subset of a) [in] b - ascending order array (subset of array a) [out] index - indices of array b elements in array a [out] status - status of return (false or true)