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
|
function gbtest71
%GBTEST71 test GrB.selectopinfo
% SuiteSparse:GraphBLAS, Timothy A. Davis, (c) 2017-2022, All Rights Reserved.
% SPDX-License-Identifier: Apache-2.0
ops = {
'tril'
'triu'
'diag'
'offdiag'
'rowne'
'rowle'
'rowgt'
'colne'
'colle'
'colgt'
'~=0'
'nonzero'
'==0'
'zero'
'>0'
'positive'
'>=0'
'nonnegative'
'<0'
'negative'
'<=0'
'nonpositive'
'~='
'=='
'>'
'>='
'<'
'<=' } ;
nops = length (ops) ;
for k = 1:nops
GrB.selectopinfo (ops {k}) ;
end
ops = {
'~='
'=='
'>'
'>='
'<'
'<=' } ;
nops = length (ops) ;
types = gbtest_types ;
ntypes = length (types) ;
for k1 = 1:nops
fprintf ('\n-------------- %s with specific types:\n', ops {k1}) ;
for k2 = 1:ntypes
if (gb_contains (types {k2}, 'complex') && k1 > 2)
% skip this
else
GrB.selectopinfo (ops {k1}, types {k2}) ;
end
end
end
fprintf ('\n\n') ;
GrB.selectopinfo
fprintf ('gbtest71: all tests passed\n') ;
|