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 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 582 del file grid_transform_class.F90. call raise_fatal_error() end if else if (this%sub_type == 'coordbb')then if (c_e(this%rect_coo%ilon) .and. c_e(this%rect_coo%ilat) .and. & c_e(this%rect_coo%flon) .and. c_e(this%rect_coo%flat)) then ! coordinates given else 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)))