v7d_v7d_transform v7d_volgrid6d_transform volgrid6d_transform volgrid6d_v7d_transform volgrid6dv_transform volgrid6dv_v7d_transform

volgrid6dv_transform() subroutine volgrid6dv_transform ( type(transform_def), intent(in) this, type(griddim_def), intent(in), optional griddim, type(volgrid6d), dimension(:), intent(inout) volgrid6d_in, type(volgrid6d), dimension(:), pointer volgrid6d_out, type(vol7d_level), dimension(:), intent(in), optional lev_out, type(volgrid6d), intent(in), optional volgrid6d_coord_in, real, dimension(:,:), intent(in), optional maskgrid, real, dimension(:), intent(in), optional maskbounds, logical, intent(in), optional clone, logical, intent(in), optional decode, character(len=*), intent(in), optional categoryappend ) 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. According to the input data and to the transformation type, the output array may have of one or more volgrid6d elements on different grids. Parametri [in] this object specifying the abstract transformation [in] griddim griddim specifying the output grid (required by most transformation types) [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) volgrid6d_out transformed object, it is a non associated pointer to an array of volgrid6d objects which will be allocated by the method [in] lev_out vol7d_level object defining target vertical grid [in] volgrid6d_coord_in object providing time constant input vertical coordinate for some kind of vertical interpolations [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 subtype 'maskfill') [in] maskbounds array of boundary values for defining a subset of valid points where the values of maskgrid are within the first and last value of maskbounds (for transformation type 'metamorphosis:maskfill') [in] clone if provided and .TRUE. , clone the gaid's from volgrid6d_in to volgrid6d_out [in] decode if provided and .FALSE. the data volume is not allocated, but work is performed on grid_id's [in] categoryappend append this suffix to log4fortran namespace category Definizione alla linea 2142 del file volgrid6d_class.F90. !! is created internally and it does not require preliminary !! initialisation. SUBROUTINE volgrid6d_v7d_transform(this, volgrid6d_in, vol7d_out, v7d, & maskgrid, maskbounds, networkname, noconvert, find_index, categoryappend) TYPE(transform_def),INTENT(in) :: this !< object specifying the abstract transformation TYPE(volgrid6d),INTENT(inout) :: volgrid6d_in !< object to be transformed, it is not modified, despite the INTENT(inout) TYPE(vol7d),INTENT(out) :: vol7d_out !< transformed object, it does not requires initialisation TYPE(vol7d),INTENT(in),OPTIONAL :: v7d !< object containing a list of points over which transformation has to be done (required by some transformation types) REAL,INTENT(in),OPTIONAL :: 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') REAL,INTENT(in),OPTIONAL :: maskbounds(:) !< array of boundary values for defining subareas from the values of \a maskgrid, the number of subareas is SIZE(maskbounds) - 1, if not provided a default based on extreme values of \a makgrid is used CHARACTER(len=*),OPTIONAL,INTENT(in) :: networkname !< set the output network name in vol7d_out (default='generic') LOGICAL,OPTIONAL,INTENT(in) :: noconvert !< do not try to match variable and convert values during transform PROCEDURE(basic_find_index),POINTER,OPTIONAL :: find_index CHARACTER(len=*),INTENT(in),OPTIONAL :: categoryappend !< append this suffix to log4fortran namespace category type(grid_transform) :: grid_trans INTEGER :: ntime, ntimerange, nlevel, nvar, nana, time_definition, nnetwork, stallo INTEGER :: itime, itimerange, inetwork TYPE(datetime),ALLOCATABLE :: validitytime(:,:) INTEGER,ALLOCATABLE :: point_index(:) TYPE(vol7d) :: v7d_locana #ifdef DEBUG call l4f_category_log(volgrid6d_in%category,l4f_debug,"start volgrid6d_v7d_transform") #endif call vg6d_wind_unrot(volgrid6d_in)