perimeter_new/propagate_init.m

   1 function [t,d]=propagate_init(tign,distance)
   2 % [t,d]=propagate_init(tign,distance)
   3 % create the initial state before the first call of propagate
   4 [m,n]=size(tign);
   5 t=zeros(m,n,3,3);
   6 for i=1:m,
   7     for j=1:n
   8         t(i,j,:,:)=tign(i,j);
   9     end
  10 end
  11 d=distance;
  12 end