0001 function plot_quivervel(md,options_structure,width,i);
0002
0003
0004
0005
0006
0007
0008
0009
0010 [x y z elements is2d]=processmesh(md,options_structure);
0011 [vx isongrid]=processdata(md,md.vx,options_structure);
0012 [vy isongrid]=processdata(md,md.vy,options_structure);
0013
0014
0015 subplot(width,width,i);
0016
0017
0018 quiver(x,y,vx,vy);
0019
0020
0021 if isnan(options_structure.title)
0022 options_structure.title='Velocity vectors';
0023 end
0024 if isnan(options_structure.colorbar)
0025 options_structure.colorbar=0;
0026 end
0027 applyoptions(md,[],options_structure);