line |
true |
false |
branch |
82
|
0 |
2 |
unless @mvrs > 1
|
95
|
0 |
2 |
unless ($self->count_atoms > 1)
|
104
|
0 |
2 |
unless ($sd > 0)
|
118
|
1 |
8 |
unless $self->count_atoms
|
123
|
1 |
7 |
if ($#vectors != $#charges)
|
134
|
1 |
39 |
unless $self->count_atoms
|
144
|
0 |
4 |
unless $self->count_atoms
|
154
|
1 |
5 |
unless $self->count_atoms
|
173
|
1 |
62 |
unless (@_)
|
180
|
1 |
4 |
unless $self->count_atoms
|
190
|
1 |
47 |
unless $self->count_atoms
|
199
|
1 |
6 |
unless $self->count_atoms
|
247
|
1 |
4 |
unless my $tvec = shift()
|
251
|
1 |
3 |
unless (@atoms)
|
252
|
2 |
1 |
unless defined $tf
|
265
|
1 |
7 |
unless my $rvec = shift()
|
266
|
1 |
6 |
unless my $ang = shift()
|
267
|
1 |
5 |
unless my $orig = shift()
|
272
|
1 |
4 |
unless defined $tf
|
296
|
0 |
0 |
unless defined $tf
|
316
|
1 |
2 |
unless defined $offset
|
337
|
1 |
5 |
unless (defined $ts)
|
341
|
1 |
4 |
unless (scalar @ts)
|
346
|
2 |
2 |
if $nt
|
369
|
2 |
32 |
unless $self->count_atoms
|
374
|
0 |
32 |
unless $atoms[0]->can($method)
|
388
|
1 |
11 |
if scalar @ts > 1
|
389
|
10 |
1 |
$ts[0] ? :
|
396
|
1 |
8 |
if scalar @ts > 1
|
405
|
11 |
0 |
unless $self->qcat_print
|
406
|
1 |
10 |
if defined $add_info_to_blank
|
442
|
5 |
1 |
unless $self->qcat_print
|
451
|
0 |
18 |
if (length $at->name > 3)
|
477
|
5 |
1 |
unless $self->qcat_print
|
531
|
9 |
7 |
if (defined $file)
|
532
|
6 |
3 |
if (ref $file) { }
|
533
|
5 |
1 |
if (&reftype($file) eq 'GLOB') { }
|
541
|
1 |
2 |
if -e $file
|