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