1function gbtest32
2%GBTEST32 test nonzeros
3
4% SuiteSparse:GraphBLAS, Timothy A. Davis, (c) 2017-2021, All Rights Reserved.
5% SPDX-License-Identifier: GPL-3.0-or-later
6
7rng ('default') ;
8
9for d = 0:.1:1
10    for n = 0:10
11        A = sprandn (n, n, d) ;
12        X = nonzeros (A) ;
13        G = GrB (A) ;
14        Y = nonzeros (G) ;
15        assert (isequal (X, Y)) ;
16    end
17end
18
19fprintf ('gbtest32: all tests passed\n') ;
20
21