libsim Versione 7.2.6
|
◆ arrayof_gridinfo_insert_array()
Method for inserting a number of elements of the array at a desired position. If necessary, the array is reallocated to accomodate the new elements.
Definizione alla linea 440 del file gridinfo_class.F90. 441!TYPE(gdalrasterbandh) :: gdalid
442#endif
443
444#ifdef DEBUG
445call l4f_category_log(this%category,l4f_debug,"export to gaid" )
446#endif
447
448! griddim is exported separately in grid_class
449CALL export(this%griddim, this%gaid)
450
451#ifdef HAVE_LIBGRIBAPI
452IF (grid_id_get_driver(this%gaid) == 'grib_api') THEN
453 gaid = grid_id_get_gaid(this%gaid)
454 IF (c_e(gaid)) CALL gridinfo_export_gribapi(this, gaid)
455ENDIF
456#endif
457#ifdef HAVE_LIBGDAL
458IF (grid_id_get_driver(this%gaid) == 'gdal') THEN
459!gdalid = grid_id_get_gdalid(this%gaid)
460 CALL l4f_category_log(this%category,l4f_warn,"export to gdal not implemented" )
461ENDIF
462#endif
463
464END SUBROUTINE gridinfo_export
465
466
467!> Export an arrayof_gridinfo object to a file.
468!! It receives an \a arrayof_gridinfo object which will be exported to
469!! the given file. The driver for writing to file is chosen according
470!! to the gaid associated to the first gridinfo element, and it must
471!! be the same for all the elements.
472SUBROUTINE gridinfo_export_to_file(this, filename, categoryappend)
473TYPE(arrayof_gridinfo) :: this !< array of gridinfo objects which will be written to file
474CHARACTER(len=*),INTENT(in) :: filename !< name of file to open and import, in the form [driver:]pathname
|