Mercurial > repos > public > sbplib

view scaleAxisLim.m @ 718:71aa5828cbbf feature/utux2D

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Add Schrödinger scheme for 2d single block. Will develop to multiblock with interpolation.
author Martin Almquist <malmquist@stanford.edu>
date Sat, 03 Mar 2018 16:18:33 -0800
parents 0976e579a6f0
children
line wrap: on
line source

function scaleAxisLim(ah, s)
    x = ah.XLim;
    y = ah.YLim;

    xl = x(2) - x(1);
    yl = y(2) - y(1);

    dx = xl*(s-1);
    dy = yl*(s-1);

    ah.XLim = x + [-dx/2 dx/2];
    ah.YLim = y + [-dy/2 dy/2];
end