1function test59
2%TEST59 test GrB_mxm
3
4% SuiteSparse:GraphBLAS, Timothy A. Davis, (c) 2017-2021, All Rights Reserved.
5% SPDX-License-Identifier: Apache-2.0
6
7fprintf ('\n----- quick test for GB_mex_mxm\n') ;
8
9A = sparse (rand (4,3)) ;
10B = sparse (rand (3,5)) ;
11Cin = sparse (rand (4,5)) ;
12
13semiring.multiply = 'times' ;
14semiring.add = 'plus' ;
15semiring.class = 'double' ;
16accum = 'plus' ;
17Mask = [ ] ;
18accum = 'plus' ;
19
20GB_mex_semiring (semiring)
21
22C0 = Cin + A*B ;
23
24C = GB_mex_mxm (Cin, Mask, accum, semiring, A, B, [ ]) ;
25assert (isequal (C.matrix,  C0))
26
27C3 = GB_spec_mxm (Cin, Mask, accum, semiring, A, B, [ ]) ;
28assert (isequal (C3.matrix,  C0))
29
30fprintf ('\ntest59: all tests passed\n') ;
31
32