reversel.m

来自「阵列信号处理的工具箱」· M 代码 · 共 25 行

function outList = reversel(inList)

% RECVAR, A package for new data types in Matlab 4. 
% (c) FOA 1997. See the file rvright.m for copyright notice.
%
% function outList = reversel(inList)
%
% Reverses the elements of a list.
%
% outList, inList: ListT

%
% Start        : 970819 Svante Bj鰎klund (svabj).
% Latest change: $Date: 1998/05/12 10:42:10 $ $Author: svabj $.
% $Revision: 2.2 $
% *****************************************************************************

outList = [];
outList = put1stl(get1stl(inList),outList);

while (~islastl(inList))
  inList = getrestl(inList);
  outList = put1stl(get1stl(inList),outList);
end%while