|
◆ volgrid6d_export_to_file()
subroutine volgrid6d_class::volgrid6d_export_to_file |
( |
type(volgrid6d), dimension(:) |
this, |
|
|
character(len=*), intent(in) |
filename, |
|
|
type(grid_id), intent(in), optional |
gaid_template, |
|
|
character(len=*), intent(in), optional |
categoryappend |
|
) |
| |
|
private |
High level method for exporting a volume array to file.
All the information contained into an array of volgrid6d objects, i.e. dimension descriptors and data, is exported to a file using the proper output driver (typically grib_api for grib format). If a template is provided, it will determine the characteristic of the output file, otherwise the grid_id descriptors contained in the volgrid6d object will be used
- Parametri
-
| this | volume(s) to be exported |
[in] | filename | output file name |
[in] | gaid_template | template for the output file, if provided the grid_id information stored in the volgrid6d objects will be ignored |
[in] | categoryappend | append this suffix to log4fortran namespace category |
Definizione alla linea 1601 del file volgrid6d_class.F90.
1606 CALL volgrid_get_vol_3d(volgrid6d_in, itime, itimerange, ivar, & 1608 IF ( ASSOCIATED(volgrid6d_out%voldati)) & 1609 CALL volgrid_get_vol_3d(volgrid6d_out, itime, itimerange, ivar, & 1611 IF (c_e(lvar_coord_vol)) THEN 1612 CALL compute(this, voldatiin, voldatiout, convert(volgrid6d_in%var(ivar)), & 1613 coord_3d_in(:,:,levshift+1:levshift+levused)) 1615 CALL compute(this, voldatiin, voldatiout, convert(volgrid6d_in%var(ivar))) 1617 CALL volgrid_set_vol_3d(volgrid6d_out, itime, itimerange, ivar, & 1623 IF (c_e(lvar_coord_vol)) THEN 1624 DEALLOCATE(coord_3d_in) 1626 IF (.NOT. ASSOCIATED(volgrid6d_in%voldati)) THEN 1627 DEALLOCATE(voldatiin) 1629 IF (.NOT. ASSOCIATED(volgrid6d_out%voldati)) THEN 1630 DEALLOCATE(voldatiout) 1634 END SUBROUTINE volgrid6d_transform_compute
|