Mercurial > repos > public > sbplib

view +anim/setup_fig_mov.m @ 1009:87809b4762c9 feature/advectionRV

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Draft implementation of scheme for advection with RV - Implement standard advection scheme. No working support for RV
author Vidar Stiernström <vidar.stiernstrom@it.uu.se>
date Wed, 31 Oct 2018 09:31:34 -0700
parents 480ef676742f
children
line wrap: on
line source

function save_frame = setup_fig_mov(figure_handle,dirname)

    fresh_dir(dirname)

    figure_handle.Units = 'centimeters';
    figure_handle.PaperUnits = 'centimeters';
    figure_handle.PaperPosition(3:4) = figure_handle.Position(3:4);


    frame_nr = 0;
    function save_frame_F()
        saveas(figure_handle,sprintf('%s/%s%04d.png',dirname,'fig',frame_nr));
        frame_nr = frame_nr + 1;
    end
    save_frame = @save_frame_F;
end