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.
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))))
3049 if ( abs(xmin - (xmin_t+step_lon_t/2.d0)) < 1.d-3 .and. abs(xmax - (xmax_t+step_lon_t/2.d0)) < 1.d-3 )
then 3050 if ( abs(ymin - ymin_t) < 1.d-3 .and. abs(ymax - ymax_t) < 1.d-3 )
then 3053 call l4f_category_log(this(igrid)%category,l4f_debug,
"C grid: found U")