1function gbtest69 2%GBTEST69 test flip 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 9A = rand (10,8) ; 10G = GrB (A) ; 11assert (isequal (flip (A), flip (G))) ; 12assert (isequal (flip (A,1), flip (G,1))) ; 13assert (isequal (flip (A,2), flip (G,2))) ; 14assert (isequal (flip (A,3), flip (G,3))) ; 15 16assert (isequal (flip (A,GrB (1)), flip (G,1))) ; 17assert (isequal (flip (A,GrB (2)), flip (G,2))) ; 18assert (isequal (flip (A,GrB (3)), flip (G,3))) ; 19 20A = rand (10,1) ; 21G = GrB (A) ; 22assert (isequal (flip (A), flip (G))) ; 23assert (isequal (flip (A,1), flip (G,1))) ; 24assert (isequal (flip (A,2), flip (G,2))) ; 25assert (isequal (flip (A,3), flip (G,3))) ; 26 27assert (isequal (flip (A, GrB(1)), flip (G,1))) ; 28assert (isequal (flip (A, GrB(2)), flip (G,2))) ; 29assert (isequal (flip (A, GrB(3)), flip (G,3))) ; 30 31A = rand (1,9) ; 32G = GrB (A) ; 33assert (isequal (flip (A), flip (G))) ; 34assert (isequal (flip (A,1), flip (G,1))) ; 35assert (isequal (flip (A,2), flip (G,2))) ; 36assert (isequal (flip (A,3), flip (G,3))) ; 37 38assert (isequal (flip (A,GrB(1)), flip (G,1))) ; 39assert (isequal (flip (A,GrB(2)), flip (G,2))) ; 40assert (isequal (flip (A,GrB(3)), flip (G,3))) ; 41 42fprintf ('gbtest69: all tests passed\n') ; 43 44