Mercurial > repos > public > sbplib

view +anim/setup_img_mov.m @ 1124:c2d281633e14 feature/poroelastic

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Divergence and Gradient do not work for multi-block. Not sure how to fix, left error message for now.
author Martin Almquist <malmquist@stanford.edu>
date Sat, 11 May 2019 17:52:08 -0700
parents 48b6fb693025
children
line wrap: on
line source

function save_frame = setup_img_mov(dirname,filename_prefix,ulim,map,F)
    default_arg('map',parula(256));
    default_arg('F',@(x)x);

    fresh_dir(dirname);

    n = size(map,1);

    frame_nr = 0;
    function save_frame_F(Z)
        filename = sprintf('%s/%s%04d.png',dirname,filename_prefix, frame_nr);
        z = uint8(F(Z)/ulim(2)*n);
        imwrite(z,map,filename);
        frame_nr = frame_nr + 1;
    end

    save_frame = @save_frame_F;
end