/usr/share/freemat/toolbox/numerical/teps.m is in freemat-data 4.0-5.
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 22 23 24 25 | % TEPS TEPS Type-based Epsilon Calculation
%
% Usage
%
% Returns eps for double precision arguments and
% feps for single precision arguments. The syntax for
% teps is
%
% y = teps(x)
%
% The teps function is most useful if you need to
% compute epsilon based on the type of the array.
% Copyright (c) 2002-2006 Samit Basu
% Licensed under the GPL
function y = teps(x)
switch(typeof(x))
case {'single'}
y = feps;
case {'double','int8','uint8','int16','uint16','int32','uint32','int64','uint64'}
y = eps;
otherwise
error('teps only applies to numerical arrays');
end
|