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