libsim  Versione 7.2.4

◆ count_distinct_sorted_ttr_mapper()

integer function stat_proc_engine::count_distinct_sorted_ttr_mapper ( type(ttr_mapper), dimension(:), intent(in)  vect,
logical, dimension(:), intent(in), optional  mask 
)

conta gli elementi distinti in un sorted array

Definizione alla linea 831 del file stat_proc_engine.F90.

832 
833 IF (time == datetime_miss .OR. .NOT.c_e(timerange%p1) .OR. .NOT.c_e(timerange%p2) .OR. &
834 ! (timerange%p1 > 0 .AND. timerange%p1 < timerange%p2) .OR. &
835  timerange%p1 < 0 .OR. timerange%p2 < 0) THEN ! is this too pedantic and slow?
836  pstart = datetime_miss
837  pend = datetime_miss
838  reftime = datetime_miss
839  RETURN
840 ENDIF
841 
842 IF (time_definition == 0) THEN ! time == reference time
843  reftime = time
844  pend = time + p1
845  pstart = pend - step
846 ELSE IF (time_definition == 1) THEN ! time == verification time
847  pend = time
848  pstart = time - step
849  reftime = time - p1
850 ELSE
851  pstart = datetime_miss
852  pend = datetime_miss
853  reftime = datetime_miss
854 ENDIF
855 
856 END SUBROUTINE time_timerange_get_period_pop
857 
858 
859 ! set time, timerange%p1, timerange%p2 according to pstart, pend,
860 ! reftime and time_definition.

Generated with Doxygen.