Документ взят из кэша поисковой машины. Адрес
оригинального документа
: http://xmm.vilspa.esa.es/sas/6.5.0/doc/ssclib/node126.html
Дата изменения: Tue Aug 16 01:58:16 2005 Дата индексирования: Sat Dec 22 08:54:18 2007 Кодировка: Поисковые слова: http astrokuban.info astrokuban |
logical(bool) function intervalsAreWellFormed(intervals) type(IntervalT), intent(in) :: intervals(:) end function intervalsAreWellFormed
Many of the other functions in the present section don't work unless the intervals are `well-formed'. I define a well-formed vector of type IntervalT as obeying two conditions: (i) for each interval, the lower value must be < the upper; (ii) the upper value of interval i must be < the lower value of interval i+1. The function returns FALSE if either condition is disobeyed.
See section 9.5.1 for analogous conditions on structures of RangeT type.