libsim  Versione8.0.0

◆ arrayof_ttr_mapper_insert_unique()

subroutine, private stat_proc_engine::arrayof_ttr_mapper_insert_unique ( type(arrayof_ttr_mapper)  this,
type(ttr_mapper), intent(in)  content,
integer, intent(in), optional  pos 
)
private

Method for inserting an element of the array at a desired position only if it is not present in the array yet.

If necessary, the array is reallocated to accomodate the new element.

Parametri
thisarray object to extend
[in]contentobject of TYPE TYPE(ttr_mapper) to insert
[in]posposition where to insert, if it is out of range, it is clipped, if it is not provided, the object is appended

Definizione alla linea 577 del file stat_proc_engine.F90.

577 ! allow starting before first reftime but restrict dtstart to -steps
578 ! dstart = MAX(0, dstart)
579  IF (dstart < 0) dstart = mod(dstart, steps)
580  DO p1 = steps + dstart, maxp1, steps
581  CALL insert_unique(a_otimerange, vol7d_timerange_new(stat_proc, p1, steps))
582  ENDDO
583 
584  ELSE ! verification time
585 
586 ! verification time in forecast mode is the ugliest case, because we
587 ! don't know a priori how many different (thus incompatible) reference
588 ! times we have, so some assumption of regularity has to be made. For

Generated with Doxygen.