line |
true |
false |
branch |
81
|
0 |
2 |
unless @mvrs > 1
|
94
|
0 |
2 |
unless ($self->count_atoms > 1)
|
103
|
0 |
2 |
unless ($sd > 0)
|
117
|
1 |
8 |
unless $self->count_atoms
|
122
|
1 |
7 |
if ($#vectors != $#charges)
|
133
|
1 |
39 |
unless $self->count_atoms
|
143
|
0 |
4 |
unless $self->count_atoms
|
153
|
1 |
5 |
unless $self->count_atoms
|
172
|
1 |
62 |
unless (@_)
|
179
|
1 |
4 |
unless $self->count_atoms
|
189
|
1 |
47 |
unless $self->count_atoms
|
198
|
1 |
6 |
unless $self->count_atoms
|
246
|
1 |
4 |
unless my $tvec = shift()
|
250
|
1 |
3 |
unless (@atoms)
|
251
|
2 |
1 |
unless defined $tf
|
264
|
1 |
7 |
unless my $rvec = shift()
|
265
|
1 |
6 |
unless my $ang = shift()
|
266
|
1 |
5 |
unless my $orig = shift()
|
271
|
1 |
4 |
unless defined $tf
|
295
|
0 |
0 |
unless defined $tf
|
315
|
1 |
2 |
unless defined $offset
|
336
|
1 |
5 |
unless (defined $ts)
|
340
|
1 |
4 |
unless (scalar @ts)
|
345
|
2 |
2 |
if $nt
|
368
|
2 |
32 |
unless $self->count_atoms
|
373
|
0 |
32 |
unless $atoms[0]->can($method)
|
387
|
1 |
11 |
if scalar @ts > 1
|
388
|
10 |
1 |
$ts[0] ? :
|
395
|
1 |
8 |
if scalar @ts > 1
|
404
|
11 |
0 |
unless $self->qcat_print
|
405
|
1 |
10 |
if defined $add_info_to_blank
|
441
|
5 |
1 |
unless $self->qcat_print
|
450
|
0 |
18 |
if (length $at->name > 3)
|
476
|
5 |
1 |
unless $self->qcat_print
|
530
|
9 |
7 |
if (defined $file)
|
531
|
6 |
3 |
if (ref $file) { }
|
532
|
5 |
1 |
if (&reftype($file) eq 'GLOB') { }
|
540
|
1 |
2 |
if -e $file
|