libsim Versione 7.2.6

◆ 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 3007 del file volgrid6d_class.F90.

3008
3009do igrid=1,ngrid
3010
3011 call init(griddim_t)
3012
3013 call get_val(this(igrid)%griddim,xmin=xmin_t, xmax=xmax_t, ymin=ymin_t, ymax=ymax_t,proj_type=type_t)
3014 step_lon_t=(xmax_t-xmin_t)/dble(this(igrid)%griddim%dim%nx-1)
3015 step_lat_t=(ymax_t-ymin_t)/dble(this(igrid)%griddim%dim%ny-1)
3016
3017 do jgrid=1,ngrid
3018
3019 ugrid=imiss
3020 vgrid=imiss
3021 tgrid=imiss
3022
3023#ifdef DEBUG

Generated with Doxygen.