grid_transform_c_e grid_transform_compute grid_transform_delete grid_transform_get_val grid_transform_grid_vol7d_init grid_transform_init grid_transform_levtype_levtype_init grid_transform_v7d_grid_compute grid_transform_vol7d_grid_init grid_transform_vol7d_vol7d_init interval_info_new transform_delete transform_get_val transform_init

interval_info_new() type(interval_info) function, public grid_transform_class::interval_info_new ( real, intent(in), optional  interv_gt, real, intent(in), optional  interv_ge, real, intent(in), optional  interv_lt, real, intent(in), optional  interv_le  ) Parametri [in] interv_gt greater than condition for defining interval [in] interv_ge greater equal condition for defining interval [in] interv_lt less than condition for defining interval [in] interv_le less equal condition for defining interval Definizione alla linea 593 del file grid_transform_class.F90. call l4f_category_log(this%category,l4f_error,"zoom: coordbb parameters missing") call raise_fatal_error() end if else if (this%sub_type == 'index')then IF (c_e(this%rect_ind%ix) .AND. c_e(this%rect_ind%iy) .AND. & c_e(this%rect_ind%fx) .AND. c_e(this%rect_ind%fy)) THEN ! check IF (this%rect_ind%ix > this%rect_ind%fx .OR. & this%rect_ind%iy > this%rect_ind%fy) THEN CALL l4f_category_log(this%category,l4f_error,'invalid zoom indices: ') CALL l4f_category_log(this%category,l4f_error, & trim(to_char(this%rect_ind%ix))//'/'// & trim(to_char(this%rect_ind%fx))) CALL l4f_category_log(this%category,l4f_error, & trim(to_char(this%rect_ind%iy))//'/'// & trim(to_char(this%rect_ind%fy))) CALL raise_fatal_error() ENDIF ELSE CALL l4f_category_log(this%category,l4f_error,& 'zoom: index parameters ix, iy, fx, fy not provided') CALL raise_fatal_error() ENDIF