libsim Versione 7.1.11

◆ vg6d_wind_unrot()

subroutine vg6d_wind_unrot ( type(volgrid6d this)
private

Unrotate the wind components.

It converts u and v components of vector quantities relative to the defined grid in the direction of increasing x and y coordinates to u and v components relative to easterly and notherly direction. The original fields are overwritten.

Da fare:
Check and correct wind component flag (to be moved in griddim_def?)
Parametri
thisobject containing wind to be unrotated

Definizione alla linea 2965 del file volgrid6d_class.F90.

2966 step_lon_t=(xmax_t-xmin_t)/dble(this(igrid)%griddim%dim%nx-1)
2967 step_lat_t=(ymax_t-ymin_t)/dble(this(igrid)%griddim%dim%ny-1)
2968
2969 do jgrid=1,ngrid
2970
2971 ugrid=imiss
2972 vgrid=imiss
2973 tgrid=imiss
2974
2975#ifdef DEBUG
2976 call l4f_category_log(this(igrid)%category,l4f_debug,"C grid: search U/V/T points:"//to_char(igrid)//to_char(jgrid))
2977 call l4f_category_log(this(igrid)%category,l4f_debug,"C grid: test delta: "//to_char(step_lon_t)//to_char(step_lat_t))
2978#endif
2979
2980 if (this(igrid)%griddim == this(jgrid)%griddim ) cycle
2981

Generated with Doxygen.