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
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
|
function [m, n, type] = gb_parse_args (func, varargin)
%GB_PARSE_ARGS parse arguments for true, false, ones, zeros, eye,
% and speye.
%
% C = GrB.ones ;
% C = GrB.ones (n) ;
% C = GrB.ones (m,n) ;
% C = GrB.ones ([m n]) ;
% C = GrB.ones (... , 'like', G) ;
% C = GrB.ones (... , 'int8') ;
% SuiteSparse:GraphBLAS, Timothy A. Davis, (c) 2017-2022, All Rights Reserved.
% SPDX-License-Identifier: Apache-2.0
% parse the type
type = 'double' ;
nargs = length (varargin) ;
for k = 1:nargs
arg = varargin {k} ;
if (ischar (arg))
if (isequal (arg, 'like'))
if (nargs ~= k+1)
error ('GrB:error', 'usage: GrB.%s (m, n, ''like'', G)', func) ;
end
arg = varargin {k+1} ;
if (isobject (arg))
arg = arg.opaque ;
end
type = gbtype (arg) ;
else
if (nargs ~= k)
error ('GrB:error', 'usage: GrB.%s (m, n, type)', func) ;
end
type = arg ;
end
nargs = k-1 ;
break ;
end
end
% parse the dimensions
[m, n] = gb_parse_dimensions (varargin {1:nargs}) ;
|
