libsim  Versione 7.1.7

◆ gridinfo_import()

subroutine gridinfo_import ( type(gridinfo_def), intent(inout)  this)

Import grid_id information into a gridinfo object.

This method imports into the descriptors of the gridinfo object this the information carried on by the grid_id object thisgaid, previously set, typically by reading from a file with a supported driver (e.g. grib_api or gdal). An amount of information is deduced from thisgaid and stored in the descriptors of gridinfo object this.

Parametri
[in,out]thisgridinfo object

Definizione alla linea 865 del file gridinfo_class.F90.

866 ! for forecast-like timeranges p1 has to be shifted to the end of interval
867  CALL grib_get(gaid,'typeOfProcessedData',tprocdata,status)
868  CALL grib_get(gaid,'typeOfTimeIncrement',ttimeincr)
869  IF (ttimeincr == 2 .AND. tprocdata /= 0) THEN
870  p1 = p1 + p2
871  ELSE
872  IF (p1 > 0) THEN
873  CALL l4f_log(l4f_warn,'Found p1>0 in grib2 analysis data, strange things may happen')
874  ENDIF
875  ENDIF
876  ELSE ! point in time
877  statproc = 254
878  p2 = 0
879 
880  ENDIF
881 
882 ELSE
883 
884  CALL l4f_log(l4f_error,'GribEditionNumber '//t2c(editionnumber)//' not supported')
885  CALL raise_error()
886 
887 ENDIF
888 
889 CALL init(this, statproc, p1, p2)
890 

Generated with Doxygen.