display_volgrid6d display_volgrid6dv export_to_gridinfo export_to_gridinfov export_to_gridinfovv import_from_gridinfo import_from_gridinfovv v7d_v7d_transform v7d_volgrid6d_transform vg6d_c2a vg6d_reduce vg6d_rounding vg6d_wind_rot vg6d_wind_unrot vg6dv_rounding volgrid6d_alloc volgrid6d_alloc_vol volgrid6d_delete volgrid6d_export_to_file volgrid6d_import_from_file volgrid6d_init volgrid6d_read_from_file volgrid6d_transform volgrid6d_v7d_transform volgrid6d_v7d_transform_compute volgrid6d_write_on_file volgrid6dv_delete volgrid6dv_transform volgrid6dv_v7d_transform volgrid_get_vol_2d volgrid_get_vol_3d volgrid_set_vol_2d volgrid_set_vol_3d

volgrid6dv_v7d_transform() subroutine volgrid6d_class::volgrid6dv_v7d_transform ( type(transform_def), intent(in)  this, type(volgrid6d), dimension(:), intent(inout)  volgrid6d_in, type(vol7d), intent(out)  vol7d_out, type(vol7d), intent(in), optional  v7d, real, dimension(:,:), intent(in), optional  maskgrid, real, dimension(:), intent(in), optional  maskbounds, character(len=*), intent(in), optional  networkname, logical, intent(in), optional  noconvert, procedure(basic_find_index), optional, pointer  find_index, character(len=*), intent(in), optional  categoryappend  ) private Performs the specified abstract transformation on the arrays of data provided. The abstract transformation is specified by this parameter; the corresponding specifical transformation (grid_transform object) is created and destroyed internally. The output transformed object is created internally and it does not require preliminary initialisation. The transformation performed on each element of the input volgrid6d array object is merged into a single vol7d output object. Parametri [in] this object specifying the abstract transformation [in,out] volgrid6d_in object to be transformed, it is an array of volgrid6d objects, each of which will be transformed, it is not modified, despite the INTENT(inout) [out] vol7d_out transformed object, it does not require initialisation [in] v7d object containing a list of points over which transformation has to be done (required by some transformation types) [in] maskgrid 2D field to be used for defining subareas according to its values, it must have the same shape as the field to be interpolated (for transformation type 'maskinter') [in] maskbounds array of boundary values for defining subareas from the values of maskgrid, the number of subareas is SIZE(maskbounds) - 1, if not provided a default based on extreme values of makgrid is used [in] networkname set the output network name in vol7d_out (default='generic') [in] noconvert do not try to match variable and convert values during transform [in] categoryappend append this suffix to log4fortran namespace category Definizione alla linea 2478 del file volgrid6d_class.F90. CALL delete(grid_trans) END SUBROUTINE v7d_volgrid6d_transform ! Internal method for performing sparse point to sparse point computations SUBROUTINE v7d_v7d_transform_compute(this, vol7d_in, vol7d_out, lev_out, & var_coord_vol) TYPE(grid_transform),INTENT(in) :: this ! oggetto di trasformazione per grigliato type(vol7d), INTENT(in) :: vol7d_in ! oggetto da trasformare type(vol7d), INTENT(inout) :: vol7d_out ! oggetto trasformato TYPE(vol7d_level),INTENT(in),OPTIONAL :: lev_out(:) ! vol7d_level object defining target vertical grid, for vertical interpolations INTEGER,INTENT(in),OPTIONAL :: var_coord_vol ! index of variable defining vertical coordinate values in input volume INTEGER :: itime, itimerange, ilevel, ivar, inetwork, & levshift, levused, lvar_coord_vol, spos REAL,ALLOCATABLE :: coord_3d_in(:,:,:) TYPE(vol7d_level) :: output_levtype lvar_coord_vol = optio_i(var_coord_vol) vol7d_out%time(:) = vol7d_in%time(:) vol7d_out%timerange(:) = vol7d_in%timerange(:) IF (PRESENT(lev_out)) THEN vol7d_out%level(:) = lev_out(:) ELSE vol7d_out%level(:) = vol7d_in%level(:)