
addpath /home/grad/a/thelwell/re/cylinder/B90/continuation/

for i = 0:20
   i
   fname = sprintf('cfpc_R%d_B90_t21.00',100+i);
   load(strcat(fname,'.mat'));
   postmovie(fem,'tridata','sqrt(u^2+v^2)',...
                     'tribar','on',...
                     'contdata','p',...
                     'contbar','on',...
                     'flowdata',{'u' 'v'},...
                     'title', 'Surface: Velocity (U) Contour: pressure (p)  Flow: [x velocity (u),y velocity (v)]  ',...
                     'axisequal','on',...
                     'filename',strcat(fname,'.mpg'),...
                     'filetype','mpeg');
end

