Yet Another CPAN Grep

PDL-Algorithm-Center ( D/DJ/DJERIUS/PDL-Algorithm-Center-0.15.tar.gz, DJERIUS, 2024; MetaCPAN )

PDL-Algorithm-Center/lib/PDL/Algorithm/Center.pm ( view source; MetaCPAN )



























































































sub _to_json {
    my $obj = shift;

    require Data::Visitor::Tiny;
    require Data::Clone;
    require Sca

{ $_[1] } );
            ${ $_[1] }
              = defined( $object->can( 'TO_JSON' ) )
              ? $object->TO_JSON
              : $object->isa( 'PDL' ) ? $object->dims == 0
                  ?

 { TO_JSON => \&_to_json },
    },
    {
        -as      => '_return_iterate_results',
        -class   => 'PDL::Algorithm::Center::Iterate::Results',
        -methods => { TO_JSON => \&_to_json },