view +anim/func.m @ 290:d32f674bcbe5 feature/hypsyst

A first attempt to make a general scheme fo hyperbolic systems
author Ylva Rydin <ylva.rydin@telia.com>
date Fri, 16 Sep 2016 14:51:17 +0200
parents 7f54cef985de
children
line wrap: on
line source

% Animates a function F(x,t) for x in lim from t to tend
function func(F, xrange, yrange, T, timeMod)
    default_arg('timeMod', 1);
    x = linspace(xrange(1),xrange(2), 200);

    fig_handle = figure;
    plot_handle = plot(x,F(x,T(1)));
    xlim(xrange)
    ylim(yrange)
    axis_handle = gca;


    function t = G(t)
        set(plot_handle,'YData',F(x,t))
        title(axis_handle,sprintf('T=%.3f',t));
        drawnow
    end

    anim.animate(@G, T(1), T(2), timeMod);
end