|
◆ grid_transform_delete()
subroutine grid_transform_class::grid_transform_delete |
( |
type(grid_transform), intent(inout) |
this | ) |
|
|
private |
Destructor of grid_tranform object.
It releases any memory and data associated to grid_transform object this, the logger category will be deleted too.
- Parametri
-
Definizione alla linea 3025 del file grid_transform_class.F90.
3025 t2c(this%outnz)// " /= "//t2c(outnz)) 3030 IF (innx /= outnx .OR. inny /= outny) THEN 3031 CALL l4f_category_log(this%category,l4f_error, "vertical interpolation") 3032 CALL l4f_category_log(this%category,l4f_error, "inconsistent hor. sizes: "//& 3033 t2c(innx)// ","//t2c(inny)// " /= "//& 3034 t2c(outnx)// ","//t2c(outny)) 3041 IF (innx /= this%innx .OR. inny /= this%inny) THEN 3042 CALL l4f_category_log(this%category,l4f_error, "horizontal interpolation") 3043 CALL l4f_category_log(this%category,l4f_error, "inconsistent input shape: "//& 3044 t2c(this%innx)// ","//t2c(this%inny)// " /= "//& 3045 t2c(innx)// ","//t2c(inny)) 3050 IF (outnx /= this%outnx .OR. outny /= this%outny) THEN 3051 CALL l4f_category_log(this%category,l4f_error, "horizontal interpolation") 3052 CALL l4f_category_log(this%category,l4f_error, "inconsistent output shape: "//& 3053 t2c(this%outnx)// ","//t2c(this%outny)// " /= "//& 3054 t2c(outnx)// ","//t2c(outny)) 3059 IF (innz /= outnz) THEN 3060 CALL l4f_category_log(this%category,l4f_error, "horizontal interpolation") 3061 CALL l4f_category_log(this%category,l4f_error, "inconsistent vert. sizes: "//& 3062 t2c(innz)// " /= "//t2c(outnz))
|