diff options
| author | Mohammad S Anwar <Mohammad.Anwar@yahoo.com> | 2022-06-23 10:14:51 +0100 |
|---|---|---|
| committer | GitHub <noreply@github.com> | 2022-06-23 10:14:51 +0100 |
| commit | ce7662034ce47eba6cf3f70bb3010aed9080cd12 (patch) | |
| tree | 5c47457e80340320714abdd55b850155875bef0b | |
| parent | ac2b70c4d472ca66ce0cd9241c93002ac7a0bf26 (diff) | |
| parent | 5b6a0be1ce89804651c1a09838fe269eebf8e470 (diff) | |
| download | perlweeklychallenge-club-ce7662034ce47eba6cf3f70bb3010aed9080cd12.tar.gz perlweeklychallenge-club-ce7662034ce47eba6cf3f70bb3010aed9080cd12.tar.bz2 perlweeklychallenge-club-ce7662034ce47eba6cf3f70bb3010aed9080cd12.zip | |
Merge pull request #6321 from mattneleigh/pwc170
modified: challenge-170/mattneleigh/perl/ch-2.pl
| -rwxr-xr-x | challenge-170/mattneleigh/perl/ch-2.pl | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/challenge-170/mattneleigh/perl/ch-2.pl b/challenge-170/mattneleigh/perl/ch-2.pl index ac26f973d0..36b7f321b0 100755 --- a/challenge-170/mattneleigh/perl/ch-2.pl +++ b/challenge-170/mattneleigh/perl/ch-2.pl @@ -41,9 +41,7 @@ my @matrix_pairs = ( print("\n"); foreach my $pair (@matrix_pairs){ - my @k_prod = @{kronecker_product($pair->[0], $pair->[1])}; - - print_matrix(\@k_prod, " "); + print_matrix(kronecker_product($pair->[0], $pair->[1]), " "); print("\n"); } |