Branch Coverage

blib/lib/PDL/Transform/Cartography.pm
Criterion Covered Total %
branch 29 332 8.7


line true false branch
333 0 0 unless defined $hash
338 0 0 unless defined $grid
339 0 0 if ref $grid eq 'PDL'
341 0 0 unless defined $step
342 0 0 if ref $step eq 'PDL'
351 0 0 if $two_cols
356 0 0 if $two_cols
359 0 0 if ($two_cols) { }
367 0 0 if (wantarray) { }
423 0 0 if -e $file
454 0 0 $nd =~ /^n/i ? :
461 0 0 if (-e $file)
465 0 0 if defined $im
468 0 0 unless defined $found
470 0 0 unless defined $im
538 0 0 if (defined $y) { }
541 0 0 $x->is_inplace ? :
544 0 0 if (not defined $x) { }
0 0 elsif (UNIVERSAL::isa($x, 'PDL') and $lines->slice([0, 0, 0])->nelem == $x->nelem) { }
547 0 0 $lines->is_inplace ? :
552 0 0 $x->is_inplace ? :
556 0 0 $lines->is_inplace ? :
575 0 0 if (wantarray) { }
597 0 0 /^mile/ ? :
0 0 /^Mm/ ? :
0 0 /^km/ ? :
0 0 /^kilometer/ ? :
0 0 /^meter/ ? :
1 0 /^rad(ian)?s?$/i ? :
0 1 /^millirad/i ? :
0 1 /^microrad/i ? :
0 1 /^min/i ? :
0 1 /^hour/i ? :
0 1 /^arcsec/i ? :
1 1 /^arcmin/i ? :
1 2 /^deg/i ? :
613 0 0 if not defined $x || $silent and $PDL::debug || $PDL::verbose
636 2 0 unless ref $o eq 'HASH'
647 0 2 if ($or->nelem != 2)
654 0 2 if defined $l
655 0 2 if defined $b_angle
668 0 2 if (defined $ou) { }
669 0 0 if (not ref $ou) { }
702 0 0 if ($me->{'params'}{'o'}->slice(0) != 0 or $me->{'params'}{'o'}->slice(1) != 0 or $me->{'params'}{'roll'} != 0)
795 0 8 defined $o->{'conv'} && $o->{'conv'} != 1 ? :
808 0 8 if ($d->dim(0) > 2)
828 0 0 if ($d->dim(0) > 3)
833 0 0 if defined $o->{'conv'} and $o->{'conv'} != 1
969 0 0 if ($m =~ /^b/i) { }
0 0 elsif ($m =~ /^n/i) { }
0 0 elsif ($m =~ /^f/i) { }
996 0 0 if $roll->at(0)
1006 0 0 if ($o->{'m'})
1009 0 0 if $o->{'m'} == 1
1011 0 0 if $o->{'m'} == 2
1012 0 0 if (defined $idx and ref $idx eq 'PDL' and $idx->nelem)
1021 0 0 $d0 > 3 ? :
1034 0 0 if $dims[0] > 3
1038 0 0 if $o->{'m'} == 2
1091 0 0 $d->is_inplace ? :
1099 0 0 $d->is_inplace ? :
1166 0 0 if (defined $p->{'c'}) { }
1172 0 0 if $p->{'c'}->nelem == 1
1181 0 0 if ($p->{'std'} == 0) { }
1183 0 0 unless defined $me->{'ounit'}
1186 0 0 unless defined $me->{'ounit'}
1194 0 0 $d->is_inplace ? :
1200 0 0 unless $o->{'c'}[0] == $o->{'c'}[1]
1203 0 0 if defined $o->{'oconv'}
1210 0 0 $d->is_inplace ? :
1212 0 0 if defined $o->{'oconv'}
1315 0 0 unless defined $x->{'ounit'}
1316 0 0 unless ref $x->{'ounit'}
1323 0 0 $subzone < 0 ? :
1336 0 0 $gk ? :
1341 0 0 $zone < 0 ? :
1387 0 0 if ($me->{'params'}{'std'} == 0) { }
1399 0 0 $d->is_inplace ? :
1409 0 0 $d->is_inplace ? :
1453 0 0 $d->is_inplace ? :
1462 0 0 $d->is_inplace ? :
1503 0 0 $p->{'std'} < 0 ? :
0 0 if $p->{'std'}->nelem == 1
1506 0 0 if approx($p->{'std'}->slice(0), -$p->{'std'}->slice(1))
1565 0 0 if ($p->{'cylindrical'})
1566 0 0 if $PDL::verbose
1582 0 0 $d->is_inplace ? :
1595 0 0 $d->is_inplace ? :
1600 0 0 if $o->{'n'} < 0
1602 0 0 $o->{'n'} < 0 ? :
1682 0 0 if ($p->{'cylindrical'})
1683 0 0 if $PDL::verbose
1698 0 0 $d->is_inplace ? :
1711 0 0 $d->is_inplace ? :
1716 0 0 $o->{'n'} < 0 ? :
1784 0 0 if ($p->{'cylindrical'})
1785 0 0 if $PDL::verbose
1792 0 0 if (defined $p->{'c'}) { }
1797 0 0 if $p->{'c'}->nelem == 1
1801 0 0 if (approx($p->{'std'}->slice([0, 0, 0]), $p->{'std'}->slice([1, 0, 0]))) { }
1825 0 0 $d->is_inplace ? :
1830 0 0 $o->{'c'}[0] == $o->{'c'}[1] ? :
1842 0 0 $d->is_inplace ? :
1848 0 0 if $o->{'n'} < 0
1849 0 0 $o->{'n'} < 0 ? :
1912 0 0 $d->is_inplace ? :
1930 0 0 $d->is_inplace ? :
1997 0 0 $d->is_inplace ? :
2011 0 0 if ($idx->nelem)
2021 0 0 $d->is_inplace ? :
2034 0 0 if ($idx->nelem)
2097 0 0 $d->is_inplace ? :
2113 0 0 if ($idx->nelem)
2123 0 0 $d->is_inplace ? :
2133 0 0 if ($idx->nelem)
2185 0 0 $d->is_inplace ? :
2199 0 0 if ($idx->nelem)
2209 0 0 $d->is_inplace ? :
2269 0 0 $d->is_inplace ? :
2282 0 0 $d->is_inplace ? :
2371 0 0 if ($m =~ /^b/i) { }
0 0 elsif ($m =~ /^n/i) { }
0 0 elsif ($m =~ /^f/i) { }
2387 0 0 if ($p->{'r0'} == 0)
2388 0 0 if $PDL::verbose
2393 0 0 if ($p->{'r0'} == 1)
2394 0 0 if $PDL::verbose
2410 0 0 if $p->{'f'} and not defined $p->{'t'}
2413 0 0 if defined $p->{'t'}
2417 0 0 $d->is_inplace ? :
2430 0 0 if ($o->{'t'})
2435 0 0 $o->{'f'} ? :
0 0 if $o->{'t'}
2446 0 0 if ($o->{'m'})
2449 0 0 if $o->{'m'} == 1
2451 0 0 if $o->{'m'} == 2
2453 0 0 if (defined $idx and ref $idx eq 'PDL' and $idx->nelem)
2465 0 0 $d->is_inplace ? :
2468 0 0 $o->{'m'} == 2 ? :
2471 0 0 $o->{'f'} ? :
0 0 if $o->{'t'}
2481 0 0 if ($P < 0)
2483 0 0 if $idx->nelem > 0
2502 0 0 if $p->{'f'}
2683 0 1 if $m =~ /^b/i
2684 0 1 if $m =~ /^n/i
2685 0 1 if $m =~ /^f/i
2719 0 1 if (defined $p->{'c'})
2728 0 1 if ($p->{'r0'} < 1)
2780 0 8 $d->is_inplace ? :
2785 0 8 if (abs $o->{'r0'} < 1) { }
2797 8 0 if ($o->{'m'} == 1) { }
0 0 elsif ($o->{'m'} == 2) { }
2816 8 0 if ($o->{'mag'} == 1) { }
2819 0 0 if $PDL::verbose
2829 0 8 if (ref $o->{'f'} eq 'ARRAY') { }
2838 0 0 $idx->nelem ? :
0 8 if $w->nelem
2841 8 0 if ($idx->nelem)
2859 0 0 $d->is_inplace ? :
2865 0 0 if ($o->{'mag'} != 1)
2882 0 0 if ($o->{'m'} == 2) { }
2901 0 0 if (abs $o->{'r0'} < 1) { }
2913 0 0 if ($o->{'m'} == 1) { }
0 0 elsif ($o->{'m'} == 2) { }
2927 0 0 if ($idx->nelem)