@@ -183,15 +183,15 @@ subtest 'Test if Matrix is in (R)REF' => sub {
183183subtest ' Transpose a Matrix' => sub {
184184 my $A = Matrix([ [ 1, 2, 3, 4 ], [ 5, 6, 7, 8 ], [ 9, 10, 11, 12 ] ]);
185185 my $B = Matrix([ [ 1, 5, 9 ], [ 2, 6, 10 ], [ 3, 7, 11 ], [ 4, 8, 12 ] ]);
186- is $A -> transpose-> TeX, $B -> TeX, ' Test the tranpose of a matrix' ;
186+ is $A -> transpose-> TeX, $B -> TeX, ' Test the transpose of a matrix' ;
187187
188188 my $row = Matrix([ 1, 2, 3, 4 ]);
189189 my $row_trans = Matrix([ [1], [2], [3], [4] ]);
190190 is $row -> transpose-> TeX, $row_trans -> TeX, ' Transpose of a degree 1 Matrix' ;
191191
192192 my $C = Matrix([ [ [ 1, 2 ], [ 3, 4 ] ], [ [ 5, 6 ], [ 7, 8 ] ] ]);
193193 my $D = Matrix([ [ [ 1, 3 ], [ 2, 4 ] ], [ [ 5, 7 ], [ 6, 8 ] ] ]);
194- is $C -> transpose-> TeX, $D -> TeX, ' Test the tranpose of a degree 3 tensor' ;
194+ is $C -> transpose-> TeX, $D -> TeX, ' Test the transpose of a degree 3 tensor' ;
195195};
196196
197197subtest ' Extract an element' => sub {
0 commit comments