/usr/share/psychtoolbox-3/PsychSignal/HalfRect.m is in psychtoolbox-3-common 3.0.9+svn2579.dfsg1-1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 | function output = HalfRect(input)
% output = HalfRect(input)
%
% Rectify column vector input at zero and value of its last entry.
%
% 3/15/94 dhb, jms Modified to truncate at last value, too.
output = real(input);
[m,n] = size(input);
if (n > 1)
error('cannot handle more than 1 column');
end
normVal = input(m,1);
index = find(input < 0);
if (~isempty(index))
output(index) = zeros(length(index),1);
end
index = find(input > normVal);
if (~isempty(index))
output(index) = normVal*ones(length(index),1);
end
|