view spyh.m @ 961:2efeedf8c34f feature/poroelastic

Make ElasticVariable2d.boundary_condition use get_boundary_operator for penalty strength.
author Martin Almquist <malmquist@stanford.edu>
date Mon, 17 Dec 2018 21:07:59 -0800
parents 12db86a8ec7b
children
line wrap: on
line source

% spyh mimics the built in spy but returns a handle which allows modifying the plot.
function h = spyh(A)
    [n,m] = size(A);
    [I,J] = find(A);

    if ~isempty(J)
        h = plot(J,I);
        h.LineStyle = 'none';
        h.Marker = '.';
        h.MarkerSize = 14;
    else
        h = [];
    end

    a = gca;
    xlim([0 m+1]);
    ylim([0 n+1]);
    axis square
    a.YDir = 'reverse';
end