%程序L9_2.m: 細化%
[image,map]=bmpread('L9_2.bmp');%image像素值為1或2
image=image-1;					  %原圖像素值設為1或0
x=double(image);                %將圖像變換為double格式
check=0;
while check==0
   [y count1]=thin(x,1);        %type=1:做一次東南邊界的細化
   [x count2]=thin(y,2);        %type=2:做一次西北邊界的細化
   if (count1&count2)==0        %count1=0,count2=0: