comleng.m

数字通信第四版原书的例程

function y = comleng(y, x, str)
% Make y has at least same length as x

%       Copyright (c) 1995-96 by The MathWorks, Inc.
%       $Revision: 1.1 $  $Date: 1996/04/01 17:53:12 $

comempty(y, str);
if length(y) < length(x)
    y = [y; y(length(y))*ones(length(x) - length(y), 1)];
end;