1function test190 2%TEST190 test dense matrix for C<!M>=A*B 3 4% SuiteSparse:GraphBLAS, Timothy A. Davis, (c) 2017-2021, All Rights Reserved. 5% SPDX-License-Identifier: Apache-2.0 6 7fprintf ('test190 ----------- dense matrix for C<!M>=A*B\n') ; 8 9rng ('default') ; 10n = 1000 ; 11M.matrix = eye (n) ; 12M.sparsity = 2 ; 13desc.mask = 'structural complement' ; 14A = sprand (n, n, 0.001) ; 15B = sprand (n, n, 0.001) ; 16C = sparse (n, n) ; 17 18semiring.multiply = 'times' ; 19semiring.add = 'plus' ; 20semiring.class = 'double' ; 21 22C1 = GB_mex_mxm (C, M, [ ], semiring, A, B, desc) ; 23 24assert (nnz (C1.matrix) == 0) ; 25 26fprintf ('test190 all tests passed\n') ; 27