libsim Versione 7.2.1
|
◆ 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 ENDIF
818
819 CALL grib_set(gaid,'typeOfSecondFixedSurface',ltype2)
820 IF (ltype2 == 255 .OR. .NOT.c_e(scalef2) .OR. .NOT.c_e(scalev2)) THEN ! code missing values correctly
821 CALL grib_set_missing(gaid,'scaleFactorOfSecondFixedSurface')
822 CALL grib_set_missing(gaid,'scaledValueOfSecondFixedSurface')
823 ELSE
824 CALL grib_set(gaid,'scaleFactorOfSecondFixedSurface',scalef2)
825 CALL grib_set(gaid,'scaledValueOfSecondFixedSurface',scalev2)
826 ENDIF
827
828else
829
830 CALL l4f_log(l4f_error,'GribEditionNumber '//t2c(editionnumber)//' not supported')
831 CALL raise_error()
832
833end if
834
|