Kod för faltning funktionen i matlab?

% programmet är utvecklat min Mohendra Roy
% Bioelektronik division, Institutionen för ECE, Tezpur Central University, Indien,
en = input (' Vänligen ge The RANGE: ');
k =-en: + 1: + en;
x = input ('ingång x:")
h = input ('ingång h:")
% x = [1 5. 25]
% h = [1 5. 25]
f=fliplr(h);
L1=length(x);
L2=length(h);
L3 = l1 + l2-1.
L4 = l2-1;
y=Zeros(1,L3);
för p = 1:1:l3
P1 = p + l4;
H2=Zeros(1,L3);
H2 ([p:p1]) = f;
L5=length(H2);
H1=Zeros(1,L5);
H1 ([l2:l3]) = x
C1 = h1. * h2
C2 = 0;
för i = 1:1:l3
C2=C2+C1([i]);
slutet
summa = c2
y ([p]) = summa
slutet
% temp1=length(x);
% temp2=length(h);
t=length(y);
T2 =(t-1)/2.
v =-t2:1:t2;
subplot(3,1,1),Stem(k,x,'*');
subplot(3,1,2),Stem(k,h,'g*');
subplot(3,1,3),Stem(v,y,'r*');
n = input (' den nedre gränsen för X-axeln är: ')
m = input (' den övre gränsen för X-axeln är: ')
o = input (' den nedre gränsen för Y-axeln är: ')
p = input (' den övre gränsen för Y-axeln är: ')
delyta (3,1,1), hejda (k, x, "*"), axel ([n m o p]), rutnät på
delyta (3,1,2), stem (k, h, 'g *'); axel ([n m o p]); rutnät på
delyta (3,1,3), stem (v, y, 'r *'), axel ([n m o p]), rutnät på
% subplot(3,1,1);stem(x);
% subplot(3,1,2);stem(h);
% subplot(3,1,3);stem(y);