(Perl Data Language) aims to turn perl into an efficient numerical language for scientific computing (similar to IDL and MatLab).
| Matrix.pm (PDL-2.080) | : | Matrix.pm (PDL-2.081) |
|---|
| | |
| skipping to change at line 206 | | skipping to change at line 206 |
|---|
| ref(\$arg[0]) ne 'PDL::Type' ? (\@arg = (\$arg[0],1)) : | | ref(\$arg[0]) ne 'PDL::Type' ? (\@arg = (\$arg[0],1)) : |
| (\@arg = (\$arg[0],\$arg[1],1)); | | (\@arg = (\$arg[0],\$arg[1],1)); |
| PDL::Matrix->$func(\@arg); | | PDL::Matrix->$func(\@arg); |
| } | | } |
| | |
| EOE | | EOE |
| # print "evaluating $code\n"; | | # print "evaluating $code\n"; |
| eval $code; | | eval $code; |
| } | | } |
| | |
|
| eval "use PDL::Slatec"; | | sub inv { shift->transpose->SUPER::inv->transpose } |
| | |
| my $has_slatec = ($@ ? 0 : 1); | | |
| sub inv { | | |
| my $self = shift; | | |
| croak "inv: PDL::Slatec not available" unless $has_slatec; | | |
| return $self->matinv; | | |
| } | | |
| | |
| =head2 kroneckerproduct | | =head2 kroneckerproduct |
| | |
| =for ref | | =for ref |
| | |
| returns kroneckerproduct of two matrices. This is not efficiently | | returns kroneckerproduct of two matrices. This is not efficiently |
| implemented. | | implemented. |
| | |
| =for example | | =for example |
| print kroneckerproduct(msequence(2,2),mones(2,2)) | | print kroneckerproduct(msequence(2,2),mones(2,2)) |
| | | |
| End of changes. 1 change blocks. |
|---|
| 8 lines changed or deleted | | 1 lines changed or added |
|---|
"Fossies" - the Fresh Open Source Software Archive 