libsim Versione 7.1.11
|
◆ gridinfo_export()
Export gridinfo descriptors information into a message/band on file. This method exports the contents of the descriptors of the gridinfo object this in the grid_id object thisgaid, previously set, for the successive write to a file. The information stored in the descriptors of gridinfo object this is inserted, when possible, in the grid_id object.
Definizione alla linea 964 del file gridinfo_class.F90. 965 CALL grib_set(gaid,'indicatorOfUnitForTimeRange',unit)
966 CALL grib_set(gaid,'lengthOfTimeRange',p2)
967
968! warn about local use
969 IF (this%timerange >= 192) THEN
970 CALL l4f_log(l4f_warn, &
971 'coding in grib2 a nonstandard typeOfStatisticalProcessing '// &
972 t2c(this%timerange))
973 ENDIF
974 ELSE ! bad timerange
975 CALL l4f_log(l4f_error, &
976 'Timerange with 0>p1>p2 cannot be exported in grib2')
977 CALL raise_fatal_error()
978 ENDIF
979 ELSE
980 CALL l4f_log(l4f_error, &
981 'typeOfStatisticalProcessing not supported: '//trim(to_char(this%timerange)))
982 CALL raise_fatal_error()
983 ENDIF
984
985ELSE
986 CALL l4f_log(l4f_error,'GribEditionNumber '//t2c(editionnumber)//' not supported')
987 CALL raise_fatal_error()
988ENDIF
989
990CONTAINS
991
992! Explicitely compute and code in grib2 template 4.8 the end of
993! overalltimeinterval which is not done automatically by grib_api
|