libsim Versione 7.2.6
|
◆ vg6d_wind_rot()
Rotate the wind components. It converts u and v components of vector quantities relative to easterly and notherly direction to defined grid in the direction of increasing x and y coordinates. The original fields are overwritten.
Definizione alla linea 3032 del file volgrid6d_class.F90. 3033 call get_val(this(jgrid)%griddim,xmin=xmin, xmax=xmax, ymin=ymin, ymax=ymax,proj_type=type)
3034
3035 if (type_t /= type )cycle
3036
3037#ifdef DEBUG
3038 call l4f_category_log(this(igrid)%category,l4f_debug,"C grid: test U "//&
3039 to_char(xmin)//to_char(xmax)//to_char(ymin)//to_char(ymax))
3040
3041 call l4f_category_log(this(igrid)%category,l4f_debug,"diff coordinate lon"//&
3042 to_char(abs(xmin - (xmin_t+step_lon_t/2.d0)))//&
3043 to_char(abs(xmax - (xmax_t+step_lon_t/2.d0))))
3044 call l4f_category_log(this(igrid)%category,l4f_debug,"diff coordinate lat"//&
3045 to_char(abs(ymin - (ymin_t+step_lat_t/2.d0)))//&
3046 to_char(abs(ymax - (ymax_t+step_lat_t/2.d0))))
3047#endif
3048
|