comparison libinterp/corefcn/matrix_type.cc @ 30712:61134c8dd8e8

maint: Use documented pattern for disabling BIST assert test. * matrix_type.cc (Fmatrix_type): Use pattern '%!#" to comment out and disable a BIST test.
author Rik <rik@octave.org>
date Sat, 05 Feb 2022 21:44:56 -0800
parents 83f9f8bda883
children e88a07dec498
comparison
equal deleted inserted replaced
30709:8b522a359143 30712:61134c8dd8e8
539 539
540 %!assert (matrix_type (1i*speye (10,11)), "Diagonal") 540 %!assert (matrix_type (1i*speye (10,11)), "Diagonal")
541 %!assert (matrix_type (1i*speye (10,11)([2:10,1],:)), "Permuted Diagonal") 541 %!assert (matrix_type (1i*speye (10,11)([2:10,1],:)), "Permuted Diagonal")
542 %!assert (matrix_type (1i*speye (11,10)), "Diagonal") 542 %!assert (matrix_type (1i*speye (11,10)), "Diagonal")
543 %!assert (matrix_type (1i*speye (11,10)([2:11,1],:)), "Permuted Diagonal") 543 %!assert (matrix_type (1i*speye (11,10)([2:11,1],:)), "Permuted Diagonal")
544 %#!assert (matrix_type ([[speye(10,10);sparse(1,10)],[[1i,1i];sparse(9,2);[1i,1i]]]), "Upper") 544 %!#assert (matrix_type ([[speye(10,10);sparse(1,10)],[[1i,1i];sparse(9,2);[1i,1i]]]), "Upper")
545 %#!assert (matrix_type ([[speye(10,10);sparse(1,10)],[[1i,1i];sparse(9,2);[1i,1i]]](:,[2,1,3:12])), "Permuted Upper") 545 %!#assert (matrix_type ([[speye(10,10);sparse(1,10)],[[1i,1i];sparse(9,2);[1i,1i]]](:,[2,1,3:12])), "Permuted Upper")
546 %!assert (matrix_type ([speye(11,9),[1i;sparse(8,1);1i;0]]), "Upper") 546 %!assert (matrix_type ([speye(11,9),[1i;sparse(8,1);1i;0]]), "Upper")
547 %!assert (matrix_type ([speye(11,9),[1i;sparse(8,1);1i;0]](:,[2,1,3:10])), 547 %!assert (matrix_type ([speye(11,9),[1i;sparse(8,1);1i;0]](:,[2,1,3:10])),
548 %! "Permuted Upper") 548 %! "Permuted Upper")
549 %#!assert (matrix_type ([speye(10,10),sparse(10,1);[1i;1i],sparse(2,9),[1i;1i]]), "Lower") 549 %!#assert (matrix_type ([speye(10,10),sparse(10,1);[1i;1i],sparse(2,9),[1i;1i]]), "Lower")
550 %#!assert (matrix_type ([speye(10,10),sparse(10,1);[1i;1i],sparse(2,9),[1i;1i]]([2,1,3:12],:)), "Permuted Lower") 550 %!#assert (matrix_type ([speye(10,10),sparse(10,1);[1i;1i],sparse(2,9),[1i;1i]]([2,1,3:12],:)), "Permuted Lower")
551 %!assert (matrix_type ([speye(9,11);[1i,sparse(1,8),1i,0]]), "Lower") 551 %!assert (matrix_type ([speye(9,11);[1i,sparse(1,8),1i,0]]), "Lower")
552 %!assert (matrix_type ([speye(9,11);[1i,sparse(1,8),1i,0]]([2,1,3:10],:)), 552 %!assert (matrix_type ([speye(9,11);[1i,sparse(1,8),1i,0]]([2,1,3:10],:)),
553 %! "Permuted Lower") 553 %! "Permuted Lower")
554 %!assert (matrix_type (1i*spdiags(randn(10,4),[-2:1],10,9)), "Rectangular") 554 %!assert (matrix_type (1i*spdiags(randn(10,4),[-2:1],10,9)), "Rectangular")
555 555