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