libsim Versione 7.2.6
|
◆ arrayof_gridinfo_packarray()
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.
Definizione alla linea 640 del file gridinfo_class.F90. 641
642IF (editionnumber == 1 .OR. editionnumber == 2) THEN
643
644 CALL grib_get(gaid,'dataDate',date )
645 CALL grib_get(gaid,'dataTime',time(:5) )
646
647 CALL init(this,simpledate=date(:8)//time(:4))
648
649 IF (editionnumber == 2) THEN
650
651 CALL grib_get(gaid,'typeOfProcessedData',tprocdata,status)
652 CALL grib_get(gaid,'typeOfTimeIncrement',ttimeincr,status)
|