arrayof_ttr_mapper_append arrayof_ttr_mapper_append_unique arrayof_ttr_mapper_delete arrayof_ttr_mapper_insert arrayof_ttr_mapper_insert_array arrayof_ttr_mapper_insert_sorted arrayof_ttr_mapper_insert_unique arrayof_ttr_mapper_packarray arrayof_ttr_mapper_remove count_distinct_sorted_ttr_mapper count_distinct_ttr_mapper index_sorted_ttr_mapper index_ttr_mapper inssor_ttr_mapper map_distinct_ttr_mapper map_inv_distinct_ttr_mapper pack_distinct_sorted_ttr_mapper pack_distinct_ttr_mapper sort_ttr_mapper

arrayof_ttr_mapper_append_unique() integer function, private stat_proc_engine::arrayof_ttr_mapper_append_unique ( type(arrayof_ttr_mapper)  this, type(ttr_mapper), intent(in)  content  ) private Quick function to append an element to the array only if it is not present in the array yet. The return value is the position at which the element has been appended or at which it has been found. Parametri this array object to extend [in] content object of TYPE TYPE(ttr_mapper) to append Definizione alla linea 597 del file stat_proc_engine.F90. msteps = stepms/1000_int_ll IF (mod(steps, msteps) == 0) mstepms = stepms ENDIF ENDDO msteps = mstepms/1000_int_ll tmptime = lstart + step DO WHILE(tmptime < lend) ! < since lend has been extended CALL insert_unique(a_otime, tmptime) tmptime = tmptime + step ENDDO ! in next loop, we used initially steps instead of msteps (see comment