1function gbtest59
2%GBTEST59 test end
3
4% SuiteSparse:GraphBLAS, Timothy A. Davis, (c) 2017-2021, All Rights Reserved.
5% SPDX-License-Identifier: GPL-3.0-or-later
6
7A = rand (4,7) ;
8G = GrB (A) ;
9
10A = A (2:end, 3:end) ;
11G = G (2:end, 3:end) ;
12assert (isequal (G, A)) ;
13
14A = A (2:2:end, 3:2:end) ;
15G = G (2:2:end, 3:2:end) ;
16assert (isequal (G, A)) ;
17
18A = rand (7, 1) ;
19G = GrB (A) ;
20
21A = A (2:2:end) ;
22G = G (2:2:end) ;
23assert (isequal (G, A)) ;
24
25fprintf ('gbtest59: all tests passed\n') ;
26
27