Branch Coverage

blib/lib/ICC/Support/geo2.pm
Criterion Covered Total %
branch 1 48 2.0


line true false branch
32 0 1 if (@_ == 1 and ref $_[0] eq 'HASH')
66 0 0 if ($s = $v21->[0] ** 2 + $v21->[1] ** 2 + $v21->[2] ** 2) { }
72 0 0 if ($hash->{'limit0'} and $t < 0) { }
0 0 elsif ($hash->{'limit1'} and $t > 1) { }
122 0 0 if ($s = $v21->[0] ** 2 + $v21->[1] ** 2 + $v21->[2] ** 2) { }
128 0 0 if ($hash->{'limit0'} and $t < 0) { }
0 0 elsif ($hash->{'limit1'} and $t > 1) { }
192 0 0 if (wantarray) { }
215 0 0 if (defined $points)
218 0 0 unless ref $points eq 'ARRAY' and @{$points;} == grep({ref $_ eq 'ARRAY';} @{$points;})
221 0 0 unless @{$points;} == 2
224 0 0 unless @{$points->[0];} == 3 and 3 == grep({&Scalar::Util::looks_like_number($_);} @{$$points[0];})
227 0 0 unless @{$points->[1];} == 3 and 3 == grep({&Scalar::Util::looks_like_number($_);} @{$$points[1];})
230 0 0 unless $points->[0][0] != $points->[1][0] or $points->[0][1] != $points->[1][1] or $points->[0][2] != $points->[1][2]
255 0 0 ref $p eq 'ARRAY' ? :
0 0 defined $p ? :
258 0 0 defined $p->[0] && !ref($p->[0]) ? :
291 0 0 if ($r == 0) { }
324 0 0 if ($points = $hash->{'points'})
327 0 0 unless ref $points eq 'ARRAY' and @{$points;} == grep({ref $_ eq 'ARRAY';} @{$points;})
330 0 0 unless @{$points;} == 2
333 0 0 unless @{$points->[0];} == 3 and 3 == grep({&Scalar::Util::looks_like_number($_);} @{$$points[0];})
336 0 0 unless @{$points->[1];} == 3 and 3 == grep({&Scalar::Util::looks_like_number($_);} @{$$points[1];})
339 0 0 unless $points->[0][0] != $points->[1][0] or $points->[0][1] != $points->[1][1] or $points->[0][2] != $points->[1][2]