Test2::Tools::PDL - Test2 tools for verifying Perl Data Language piddles

version 0.001

use Test2::Tools::PDL;

# Functions are exported by default.

# Ensure something is a piddle.
pdl_ok($x);

# Compare two piddles.
pdl_is($got, $expected, 'Same piddle.');

Checks that the given $thing is a PDL object.

Checks that piddle $got is same as $exp.

Now this method is internally similar as is($got->unpdl, $exp->unpdl). It's possible to work with both numeric PDLs as well as non-numeric PDLs (like PDL::Char, PDL::SV).

This module contains tools for verifying PDL piddles.

This module can be configured by some module variables.

These two variables are used when comparing float piddles. For pdl_is($got, $exp, ...), the effective tolerance is $TOLERANCE + abs($TOLERANCE_REL * $exp).

Default value of $TOLERANCE is same as $Test2::Compare::Float::DEFAULT_TOLERANCE, which is 1e-8. Default value of $TOLERANCE_REL is 0.

For example, to use only relative tolerance,

{
    local $Test2::Tools::PDL::TOLERANCE = 0;
    local $Test2::Tools::PDL::TOLERANCE_REL = 1e-6;
    ...
}

PDL, Test2::Suite, Test::PDL

Stephan Loyd [email protected]

Mohammad S Anwar [email protected]

This software is copyright (c) 2018-2023 by Stephan Loyd.

This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.