Branch Coverage

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


line true false branch
35 0 1 if (@_ == 1 and ref $_[0] eq 'HASH')
69 0 0 if ($s = $v21->[0] ** 2 + $v21->[1] ** 2 + $v21->[2] ** 2) { }
75 0 0 if ($hash->{'limit0'} and $t < 0) { }
0 0 elsif ($hash->{'limit1'} and $t > 1) { }
125 0 0 if ($s = $v21->[0] ** 2 + $v21->[1] ** 2 + $v21->[2] ** 2) { }
131 0 0 if ($hash->{'limit0'} and $t < 0) { }
0 0 elsif ($hash->{'limit1'} and $t > 1) { }
195 0 0 if (wantarray) { }
218 0 0 if (defined $points)
221 0 0 unless ref $points eq 'ARRAY' and @{$points;} == grep({ref $_ eq 'ARRAY';} @{$points;})
224 0 0 unless @{$points;} == 2
227 0 0 unless @{$points->[0];} == 3 and 3 == grep({&Scalar::Util::looks_like_number($_);} @{$$points[0];})
230 0 0 unless @{$points->[1];} == 3 and 3 == grep({&Scalar::Util::looks_like_number($_);} @{$$points[1];})
233 0 0 unless $points->[0][0] != $points->[1][0] or $points->[0][1] != $points->[1][1] or $points->[0][2] != $points->[1][2]
258 0 0 ref $p eq 'ARRAY' ? :
0 0 defined $p ? :
261 0 0 defined $p->[0] && !ref($p->[0]) ? :
294 0 0 if ($r == 0) { }
327 0 0 if ($points = $hash->{'points'})
330 0 0 unless ref $points eq 'ARRAY' and @{$points;} == grep({ref $_ eq 'ARRAY';} @{$points;})
333 0 0 unless @{$points;} == 2
336 0 0 unless @{$points->[0];} == 3 and 3 == grep({&Scalar::Util::looks_like_number($_);} @{$$points[0];})
339 0 0 unless @{$points->[1];} == 3 and 3 == grep({&Scalar::Util::looks_like_number($_);} @{$$points[1];})
342 0 0 unless $points->[0][0] != $points->[1][0] or $points->[0][1] != $points->[1][1] or $points->[0][2] != $points->[1][2]