Add transpose predicate to matrix.pl