vis/oneframe.m

   1 function oneframe(k,dt)\r
   2     ext=sprintf('_%5.5i.txt',k);\r
   3     f=read_array_m(['fgrnhfx',ext]);\r
   4     u=read_array_m(['uf',ext]);\r
   5     v=read_array_m(['vf',ext]);\r
   6     l=read_array_m(['lfn',ext]); \r
   7     sf(f,u,v,l)\r
   8     if ~exist('dt','var'),dt=1,end\r
   9     title(sprintf('time %i s',k*dt))\r
  10     drawnow\r
  11 end