—

              
package PDL::LiteF;
use strict;
use warnings;
HideShow 28 lines of Pod
=head1 NAME
PDL::LiteF - minimum PDL module function loader
=head1 SYNOPSIS
 use PDL::LiteF; # Is equivalent to the following:
   use PDL::Core;
   use PDL::Ops;
   use PDL::Primitive;
   use PDL::Ufunc;
   use PDL::Basic;
   use PDL::Slices;
   use PDL::Bad;
=head1 DESCRIPTION
Loads the smallest possible set of modules for
PDL to work, making the functions available in
the current namespace. If you want something even
smaller see the L<PDL::Lite> module.
Note that unlike L<PDL>, this does I<not> load L<PDL::Math> or
L<PDL::MatrixOps>, nor any IO modules.
=cut
require PDL; # get the version
our $VERSION = $PDL::VERSION;
# Load the fundamental PDL packages, with imports
sub import {
  my $pkg = (caller())[0];
  eval <<EOD;
package $pkg;
use PDL::Core;
use PDL::Ops;
use PDL::Primitive;
use PDL::Ufunc;
use PDL::Basic;
use PDL::Slices;
use PDL::Bad;
EOD
  die $@ if $@;
}
1;