indexing typo in phys/module_fr_sfire_atm.F/interpolate_wind2fire_height/interpolate_h

[wrf-fire.git] / standalone / matlab / vis_wind.m

function vis_wind(vx,vy,dx,dy)\r
    [m,n]=size(vx);\r
    x=[0:m-1]*dx;\r
    y=[0:n-1]*dy;\r
    s=20;\r
    ix=1:ceil(m/s):m;\r
    iy=1:ceil(n/s):n;\r
    [xx,yy]=ndgrid(x,y);\r
    quiver(yy(ix,iy),xx(ix,iy),vy(ix,iy),vx(ix,iy))\r
end