mask_mesh.m.html
Source file:   mask_mesh.m
Directory:   /Users/rjl/git/rjleveque/clawpack-4.6.3/matlab
Converted:   Mon Jan 21 2013 at 20:16:02   using clawcode2html
This documentation file will not reflect any later changes in the source file.

 
function mask_mesh(p,sdir,xlow,xhigh,ylow,yhigh,zlow,zhigh)

% Internal matlab routine for Clawpack graphics.

udata = get(p,'UserData');

s = 1e-5;

[xlow_like, ylow_like, zlow_like]    = get_xyzlike(xlow,ylow,zlow,sdir);
[xhigh_like, yhigh_like, zhigh_like] = get_xyzlike(xhigh,yhigh,zhigh,sdir);

names = {'xlines','ylines'};

% Now mask any contour lines
mesh = udata.mesh;
for n = 1:2,
  hlines = getfield(mesh,names{n});
  for j = 1:length(hlines),  % loop over contour lines on this patch
    udata = get(hlines(j),'UserData');
    vc = udata.cartCoords;
    [xdata_like,ydata_like, zdata_like]  = get_xyzlike(vc(:,1),vc(:,2), vc(:,3),sdir);

    nan_mask = ydata_like > ylow_like+s & ydata_like < yhigh_like-s & ...
	zdata_like > zlow_like+s & zdata_like < zhigh_like-s;

    % Mask out values in physical data
    xdata = get(hlines(j),'XData');
    ydata = get(hlines(j),'YData');
    zdata = get(hlines(j),'ZData');

    xdata(nan_mask) = nan;
    ydata(nan_mask) = nan;
    zdata(nan_mask) = nan;

    set(hlines(j),'XData',xdata,'YData',ydata,'ZData',zdata);
  end;
end;