1function gbtest2 2%GBTEST2 list all binary operators 3 4% SuiteSparse:GraphBLAS, Timothy A. Davis, (c) 2017-2021, All Rights Reserved. 5% SPDX-License-Identifier: GPL-3.0-or-later 6 7optype = gbtest_types ; 8opnames = gbtest_binops ; 9nbinop = 0 ; 10 11for k1 = 1:length(opnames) 12 13 opname = opnames {k1} ; 14 fprintf ('\n=================================== %s\n', opname) ; 15 16 for k2 = 0:length(optype) 17 18 op = opname ; 19 if (k2 > 0) 20 op = [op '.' optype{k2}] ; %#ok<*AGROW> 21 end 22 23 fprintf ('\nop: (%s)\n', op) ; 24 try 25 if (k2 > 0) 26 GrB.binopinfo (op) ; 27 nbinop = nbinop + 1 ; 28 else 29 GrB.binopinfo (op, 'double') ; 30 end 31 catch 32 end 33 end 34end 35 36fprintf ('\nhelp GrB.binopinfo:\n') ; 37GrB.binopinfo ; 38 39fprintf ('number of valid binary operators: %d\n', nbinop) ; 40assert (nbinop == 401) ; 41 42fprintf ('gbtest2: all tests passed\n') ; 43 44