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
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
|
function gbtest56
%GBTEST56 test GrB.empty
% SuiteSparse:GraphBLAS, Timothy A. Davis, (c) 2017-2022, All Rights Reserved.
% SPDX-License-Identifier: Apache-2.0
for m1 = -1:5
for n1 = -1:5
m = max (m1, 0) ;
n = max (n1, 0) ;
if (~ ((m == 0) || (n == 0)))
continue
end
C1 = GrB.empty (m1, n1) ;
C2 = GrB.empty ([m1, n1]) ;
C3 = GrB (m, n) ;
C0 = sparse (m, n) ;
assert (isequal (C0, C1)) ;
assert (isequal (C0, C2)) ;
assert (isequal (C0, C3)) ;
end
end
C1 = GrB.empty (0) ;
C2 = GrB.empty (-1) ;
C3 = GrB (0,0) ;
C0 = sparse (0,0) ;
assert (isequal (C0, C1)) ;
assert (isequal (C0, C2)) ;
assert (isequal (C0, C3)) ;
assert (length (C0) == 0) ; %#ok<*ISMT>
assert (length (C1) == 0) ;
assert (length (C2) == 0) ;
assert (length (C3) == 0) ;
C1 = GrB.empty (0,5) ;
C2 = GrB.empty (0,5) ;
C3 = GrB (0,5) ;
C0 = sparse (0,5) ;
assert (isequal (C0, C1)) ;
assert (isequal (C0, C2)) ;
assert (isequal (C0, C3)) ;
assert (length (C0) == 0) ;
assert (length (C1) == 0) ;
assert (length (C2) == 0) ;
assert (length (C3) == 0) ;
C1 = GrB.empty (5,0) ;
C2 = GrB.empty (5,0) ;
C3 = GrB (5,0) ;
C0 = sparse (5,0) ;
assert (isequal (C0, C1)) ;
assert (isequal (C0, C2)) ;
assert (isequal (C0, C3)) ;
assert (length (C0) == 0) ;
assert (length (C1) == 0) ;
assert (length (C2) == 0) ;
assert (length (C3) == 0) ;
fprintf ('gbtest56: all tests passed\n') ;
|
