libsim  Versione 7.1.8

◆ arrayof_ttr_mapper_packarray()

subroutine arrayof_ttr_mapper_packarray ( type(arrayof_ttr_mapper this)

Method for packing the array object reducing at a minimum the memory occupation, without destroying its contents.

The value of this::overalloc remains unchanged. After the call to the method, the object can continue to be used, extended and shortened as before. If the object is empty the array is allocated to zero length.

Parametri
thisobject to be packed

Definizione alla linea 756 del file stat_proc_engine.F90.

757 p2 = timedelta_new(sec=timerange%p2) ! length of period
758 
759 IF (time == datetime_miss .OR. .NOT.c_e(timerange%p1) .OR. .NOT.c_e(timerange%p2) .OR. &
760 ! (timerange%p1 > 0 .AND. timerange%p1 < timerange%p2) .OR. &
761  timerange%p1 < 0 .OR. timerange%p2 < 0) THEN ! is this too pedantic and slow?
762  pstart = datetime_miss
763  pend = datetime_miss
764  reftime = datetime_miss
765  RETURN
766 ENDIF
767 
768 IF (time_definition == 0) THEN ! time == reference time

Generated with Doxygen.