pieext.m

来自「一个用matlab编写的 关于笔画提取的仿真试验程序」· M 代码 · 共 13 行

function [t4,kk8,kk9]=pieext(A,kk8,kk9)

k1=0;k2=0;
k1=kk8+1;
k2=kk9-1;
if A(k1,k2)>0 
    t4=A(k1,k2);
    
kk8=k1;
kk9=k2;
else
    t4=0;
end