Mercurial > repos > public > sbplib
view +anim/setup_time_quantity_plot.m @ 1317:34997aced843 feature/poroelastic
Add some interface forcing penalties in ElasticCurvilinearAnisotropic
author | Martin Almquist <malmquist@stanford.edu> |
---|---|
date | Sun, 26 Jul 2020 20:06:06 -0700 |
parents | 2ffa82fb5172 |
children |
line wrap: on
line source
function [update_data, plot_handles] = setup_time_quantity_plot(yfun) default_arg('yfun',@(y)y); if isa(yfun,'function_handle') yfun = {yfun}; end t = []; for i = 1:length(yfun) plot_handles(i) = animatedline(); end axis_handle = gca; function update(t_now,varargin) if ishandle(axis_handle) % t = [t t_now]; for j = 1:length(yfun) addpoints(plot_handles(j),t_now,full(yfun{j}(varargin{:}))); end [t,~] = getpoints(plot_handles(1)); if t(1) < t(end) xlim(axis_handle, [t(1) t(end)]); end end end update_data = @update; end