libsim  Versione7.2.6

◆ vg6d_wind_unrot()

subroutine volgrid6d_class::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 3018 del file volgrid6d_class.F90.

3018 
3019  ugrid=imiss
3020  vgrid=imiss
3021  tgrid=imiss
3022 
3023 #ifdef DEBUG
3024  call l4f_category_log(this(igrid)%category,l4f_debug,"C grid: search U/V/T points:"//to_char(igrid)//to_char(jgrid))
3025  call l4f_category_log(this(igrid)%category,l4f_debug,"C grid: test delta: "//to_char(step_lon_t)//to_char(step_lat_t))
3026 #endif
3027 
3028  if (this(igrid)%griddim == this(jgrid)%griddim ) cycle
3029 
3030  if (this(igrid)%griddim%dim%nx == this(jgrid)%griddim%dim%nx .and. &
3031  this(igrid)%griddim%dim%ny == this(jgrid)%griddim%dim%ny ) then
3032 
3033  call get_val(this(jgrid)%griddim,xmin=xmin, xmax=xmax, ymin=ymin, ymax=ymax,proj_type=type)

Generated with Doxygen.