function G=imptoacargo(L)
[M,N]=size(L);
G=zero(n);
for i=1:N
if L(i)<1090;
G(i)=L(i)*0
elseif (L(i)>1090)&&(L(i)<1700);
G(i)=(L(i)*0.19)
elseif (L(i)>1700)&&(L(i)<4100);
G(i)=(L(i)*0.28)+116
else
G(i)=(L(i)*0.33)+788
end
end
function G=imptoacargo(L)
if nargin==0
L=round(10000*rand(1,20));
end
N=size(L,2);
G=zeros(1,N);
for i=1:N
if L(i)<1090
G(i)=L(i)*0;
elseif (L(i)>1090) && (L(i)<1700)
G(i)=L(i)*0.19;
elseif (L(i)>1700) && (L(i)<4100)
G(i)=L(i)*0.28+116;
else
G(i)=L(i)*0.33+788;
end
end