/usr/share/freemat/toolbox/array/iscellstr.m is in freemat-data 4.0-5build1.
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 26 27 28 | % ISCELLSTR ISCELLSTR Test For Cell Array of Strings
%
% Usage
%
% The syntax for iscellstr is
%
% x = iscellstr(y)
%
% and it returns a logical 1 if the argument is a cell array
% in which every cell is a character array (or is empty), and
% a logical 0 otherwise.
% Copyright (c) 2002-2006 Samit Basu
% Licensed under the GPL
function x = iscellstr(y)
if (~iscell(y))
x = logical(0);
return;
end
m = numel(y);
all_strings = logical(1);
i = 1;
while (all_strings & (i <= m))
all_strings = all_strings & (isstr(y{i}) | isempty(y{i}));
i = i + 1;
end
x = all_strings;
|