Help for this page

Select Code to Download


  1. or download this
    my $p = zeroes(4,4,4);
    say 'p:        ', $p->info;
    say 'ndcoords: ', ndcoords($p)->info;
    say 'range:    ', $p->range(ndcoords($p), 2, 't')->info;
    
  2. or download this
    p:        PDL: Double D [4,4,4]
    ndcoords: PDL: Double D [3,4,4,4]
    range:    PDL: Double D [4,4,4,2,2,2]
    
  3. or download this
    my $q = zeroes(5,5,5,5);
    say 'q:        ', $q->info;
    say 'ndcoords: ', ndcoords($q)->info;
    say 'range:    ', $q->range(ndcoords($q), 2, 't')->info;
    
  4. or download this
    q:        PDL: Double D [5,5,5,5]
    ndcoords: PDL: Double D [4,5,5,5,5]
    range:    PDL: Double D [5,5,5,5,2,2,1,5]
    
  5. or download this
    #!/usr/bin/perl
    
    ...
    ndcoords: PDL: Double D [4,5,5,5,5]
    range:    PDL: Double D [5,5,5,5,2,2,1,5]
    Segmentation fault