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) |