www.pudn.com > RobustSF.zip > Atransfunc.m, change:1998-12-07,size:232b


function y=Atransfunc(x)
% y=Atransfunc(x)
% Testfunction returning the transpose of a linear operator applied to x.
% Used for testing lansvd.
%
% y = A'*x

% Rasmus Munk Larsen, DAIMI, 1998

global A MxV
y = A'*x;
MxV = MxV + 1;