◆ transform_get_val()

subroutine transform_get_val	(	type(transform_def), intent(in)	this,
		integer, intent(out), optional	time_definition,
		character(len=*), intent(out), optional	trans_type,
		character(len=*), intent(out), optional	sub_type,
		type(vol7d_level), intent(out), optional	input_levtype,
		type(vol7d_level), intent(out), optional	output_levtype )

Method for returning the contents of the object.

Parametri

[in]	this	object to examine
[out]	time_definition	0=time is reference time, 1=time is validity time
[out]	trans_type	type of transformation
[out]	sub_type	subtype of transformation
[out]	input_levtype	type of vertical level of input data (only type of first and second surface are used, level values are ignored)
[out]	output_levtype	type of vertical level of output data (only type of first and second surface are used, level values are ignored)

Definizione alla linea 1020 del file grid_transform_class.F90.

           'grid_transform_levtype_levtype_init: autogenerating '//t2c(inused-1) &
           //'/'//t2c(iend-istart)//' output levels (f->h)')
          DO i = istart, iend - 1
            CALL init(this%output_level_auto(i-istart+1), &
             trans%vertint%input_levtype%level1, lev_in(i)%l2)
          ENDDO
        ELSE
          CALL l4f_category_log(this%category, l4f_error, &
           'grid_transform_levtype_levtype_init: automatic generation of output levels &
           &available only for hybrid levels')
          CALL raise_error()
          RETURN
        ENDIF
      ELSE IF (.NOT.c_e(trans%vertint%input_levtype%level2) .AND. &
       c_e(trans%vertint%output_levtype%level2)) THEN ! half -> full
        ALLOCATE(this%output_level_auto(inused-1))