|
◆ 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 591 del file grid_transform_class.F90.
592 call l4f_category_log(this%category,l4f_error, "zoom: coordbb parameters missing")
593 call raise_fatal_error()
597 else if (this%sub_type == 'index') then
599 IF (c_e(this%rect_ind%ix) .AND. c_e(this%rect_ind%iy) .AND. &
600 c_e(this%rect_ind%fx) .AND. c_e(this%rect_ind%fy)) THEN
603 IF (this%rect_ind%ix > this%rect_ind%fx .OR. &
604 this%rect_ind%iy > this%rect_ind%fy) THEN
606 CALL l4f_category_log(this%category,l4f_error, 'invalid zoom indices: ')
607 CALL l4f_category_log(this%category,l4f_error, &
608 trim(to_char(this%rect_ind%ix))// '/'// &
609 trim(to_char(this%rect_ind%fx)))
610 CALL l4f_category_log(this%category,l4f_error, &
611 trim(to_char(this%rect_ind%iy))// '/'// &
612 trim(to_char(this%rect_ind%fy)))
614 CALL raise_fatal_error()
619 CALL l4f_category_log(this%category,l4f_error,&
620 'zoom: index parameters ix, iy, fx, fy not provided')
621 CALL raise_fatal_error()
|