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