libsim Versione 7.2.0
|
◆ gridinfov_display()
The same as gridinfo_display(), but it receives an array of gridinfo objects.
Definizione alla linea 816 del file gridinfo_class.F90. 817
818 CALL grib_set(gaid,'typeOfSecondFixedSurface',ltype2)
819 IF (ltype2 == 255 .OR. .NOT.c_e(scalef2) .OR. .NOT.c_e(scalev2)) THEN ! code missing values correctly
820 CALL grib_set_missing(gaid,'scaleFactorOfSecondFixedSurface')
821 CALL grib_set_missing(gaid,'scaledValueOfSecondFixedSurface')
822 ELSE
823 CALL grib_set(gaid,'scaleFactorOfSecondFixedSurface',scalef2)
824 CALL grib_set(gaid,'scaledValueOfSecondFixedSurface',scalev2)
825 ENDIF
826
827else
828
829 CALL l4f_log(l4f_error,'GribEditionNumber '//t2c(editionnumber)//' not supported')
830 CALL raise_error()
831
832end if
833
834END SUBROUTINE level_export_gribapi
|