libsim  Versione6.3.0

◆ grid_file_id_delete()

subroutine grid_file_id_delete ( type(grid_file_id), intent(inout)  this)

Destructor for the grid_file_id class.

It closes the associated file(s) and releases the associated memory, but, in some drivers like grib_api, it may not release the memory associated to the grid_id objects read from that file, which continue their life in memory.

Parametri
[in,out]thisobject to be deleted

Definizione alla linea 551 del file grid_id_class.F90.

551 INTEGER :: ier
552 
553 IF (c_e(this) .AND. c_e(file_id)) THEN
554 #ifdef HAVE_LIBGRIBAPI
555  IF (this%driver == grid_id_grib_api .AND. file_id%driver == grid_id_grib_api) &
556  CALL grib_write(this%gaid, file_id%gaid, ier) ! log ier?
557 #endif
558 ENDIF
559 #ifdef HAVE_LIBGDAL
560 IF (this%driver == grid_id_gdal .AND. file_id%driver == grid_id_gdal) THEN
561  ! not implemented, log?
562 ENDIF
563 #endif
564 
565 END SUBROUTINE grid_id_export
566 
567 
568 ! Function to check whether a \a _file_id object has been correctly associated
569 ! to a grid. It returns \a .FALSE. if the grid has not been correctly

Generated with Doxygen.