line |
true |
false |
branch |
122
|
0 |
0 |
if ($check ne 0) |
130
|
0 |
0 |
if ($dproj ne 0) |
132
|
0 |
0 |
if (dot(@proj, @target) < 0) |
145
|
0 |
0 |
unless $name |
151
|
0 |
0 |
unless open FILE1, $filename or open FILE1, $filename2 |
165
|
0 |
0 |
unless $file |
168
|
0 |
0 |
if ($file =~ /\.gz$/) { } |
172
|
0 |
0 |
unless open $fh, "< $file" |
189
|
0 |
0 |
unless $pdb_code |
192
|
0 |
0 |
unless $pdb_code =~ /[A-z0-9]{4}/ |
202
|
0 |
0 |
if (-e $uncompressed) { } |
|
0 |
0 |
elsif (-e $compressed) { } |
227
|
0 |
0 |
unless $pdb_code |
230
|
0 |
0 |
unless $pdb_code =~ /[A-z0-9]{4}/ |
240
|
0 |
0 |
if (-e $uncompressed) { } |
|
0 |
0 |
elsif (-e $compressed) { } |
266
|
0 |
0 |
unless $pdb_code |
267
|
0 |
0 |
unless $chain |
270
|
0 |
0 |
unless $pdb_code =~ /[A-z0-9]{4}/ |
280
|
0 |
0 |
if (-e $uncompressed) { } |
|
0 |
0 |
elsif (-e $compressed) { } |
306
|
0 |
0 |
unless $pdb_code |
307
|
0 |
0 |
unless $chain |
310
|
0 |
0 |
unless $pdb_code =~ /[A-z0-9]{4}/ |
320
|
0 |
0 |
if (-e $uncompressed) { } |
|
0 |
0 |
elsif (-e $compressed) { } |
344
|
0 |
0 |
if ($DEBUG) |
352
|
0 |
0 |
unless $pdb_code |
353
|
0 |
0 |
unless $chain |
356
|
0 |
0 |
unless $pdb_code =~ /[A-z0-9]{4}/ |
362
|
0 |
0 |
if $path |
365
|
0 |
0 |
if $path |
367
|
0 |
0 |
unless $path |
382
|
0 |
0 |
if ($DEBUG) |
390
|
0 |
0 |
unless $pdb_code |
393
|
0 |
0 |
unless $pdb_code =~ /[A-z0-9]{4}/ |
398
|
0 |
0 |
if $path |
401
|
0 |
0 |
if $path |
404
|
0 |
0 |
if $path |
406
|
0 |
0 |
unless $path |
450
|
0 |
0 |
if ($$data[0] =~ m[/]) { } |
453
|
0 |
0 |
if ($filename =~ /pdb(\w{4}).*/) { } |
|
0 |
0 |
elsif ($filename =~ /(\w{4}).*/) { } |
483
|
0 |
0 |
if ($string ne 'CB') { } |
487
|
0 |
0 |
if ($line =~ /ATOM\s+-*\d+\s+$string\s+(\w+)\s$chain\s*(-*\d+\w?\s)/) |
492
|
0 |
0 |
if ($id =~ /(-*\d+)\D/) |
493
|
0 |
0 |
if ($id ne $prevres) |
494
|
0 |
0 |
if ($id > $endres) { } |
|
0 |
0 |
elsif ($id >= $startres) { } |
522
|
0 |
0 |
if ($line =~ /ATOM\s+-*\d+\s+CB\s+(\w+)\s$chain\s*(-*\d+\w?\s)/) { } |
|
0 |
0 |
elsif ($prevline =~ /ATOM\s+-*\d+\s+O\s+(\w+)\s$chain\s*(-*\d+\w?\s)/) { } |
525
|
0 |
0 |
if ($id =~ /(-*\d+)\D/) |
526
|
0 |
0 |
if ($id ne $prevres) |
527
|
0 |
0 |
if ($id > $endres) { } |
|
0 |
0 |
elsif ($id >= $startres) { } |
551
|
0 |
0 |
if ($id =~ /(-*\d+)\D/) |
552
|
0 |
0 |
if ($id ne $prevres) |
553
|
0 |
0 |
if ($id > $endres) { } |
|
0 |
0 |
elsif ($id >= $startres) { } |
579
|
0 |
0 |
if ($inp eq 'ALA') { } |
|
0 |
0 |
elsif ($inp eq 'CYS') { } |
|
0 |
0 |
elsif ($inp eq 'ASP') { } |
|
0 |
0 |
elsif ($inp eq 'GLU') { } |
|
0 |
0 |
elsif ($inp eq 'PHE') { } |
|
0 |
0 |
elsif ($inp eq 'GLY') { } |
|
0 |
0 |
elsif ($inp eq 'HIS') { } |
|
0 |
0 |
elsif ($inp eq 'ILE') { } |
|
0 |
0 |
elsif ($inp eq 'LYS') { } |
|
0 |
0 |
elsif ($inp eq 'LEU') { } |
|
0 |
0 |
elsif ($inp eq 'MET') { } |
|
0 |
0 |
elsif ($inp eq 'ASN') { } |
|
0 |
0 |
elsif ($inp eq 'PRO') { } |
|
0 |
0 |
elsif ($inp eq 'GLN') { } |
|
0 |
0 |
elsif ($inp eq 'ARG') { } |
|
0 |
0 |
elsif ($inp eq 'SER') { } |
|
0 |
0 |
elsif ($inp eq 'THR') { } |
|
0 |
0 |
elsif ($inp eq 'VAL') { } |
|
0 |
0 |
elsif ($inp eq 'TRP') { } |
609
|
0 |
0 |
if ($aa eq 'A') |
610
|
0 |
0 |
if ($aa eq 'C') |
611
|
0 |
0 |
if ($aa eq 'D') |
612
|
0 |
0 |
if ($aa eq 'E') |
613
|
0 |
0 |
if ($aa eq 'F') |
614
|
0 |
0 |
if ($aa eq 'G') |
615
|
0 |
0 |
if ($aa eq 'H') |
616
|
0 |
0 |
if ($aa eq 'I') |
617
|
0 |
0 |
if ($aa eq 'K') |
618
|
0 |
0 |
if ($aa eq 'L') |
619
|
0 |
0 |
if ($aa eq 'M') |
620
|
0 |
0 |
if ($aa eq 'N') |
621
|
0 |
0 |
if ($aa eq 'P') |
622
|
0 |
0 |
if ($aa eq 'Q') |
623
|
0 |
0 |
if ($aa eq 'R') |
624
|
0 |
0 |
if ($aa eq 'S') |
625
|
0 |
0 |
if ($aa eq 'T') |
626
|
0 |
0 |
if ($aa eq 'V') |
627
|
0 |
0 |
if ($aa eq 'W') |
628
|
0 |
0 |
if ($aa eq 'Y') |
702
|
0 |
0 |
if (abs $evec[0] >= abs $evec[1] and abs $evec[0] >= abs $evec[2]) { } |
|
0 |
0 |
elsif (abs $evec[1] >= abs $evec[2]) { } |
710
|
0 |
0 |
if ($evec[$i] * ($p[0][-1][$i] - $p[0][0][$i]) < 0) { } |
745
|
0 |
0 |
if ($type eq 'H') |
749
|
0 |
0 |
if ($ss == 1) { } |
775
|
0 |
0 |
if ($ss == 1) { } |
807
|
0 |
0 |
if ($type eq 'H') { } |
864
|
0 |
0 |
if ($evec[0] ** 2 + $evec[1] ** 2 + $evec[2] ** 2 < 0.01) |
870
|
0 |
0 |
if ($evec[0] ** 2 + $evec[1] ** 2 + $evec[2] ** 2 < 0.01) |
931
|
0 |
0 |
if ($eigs[0] > $eigs[1] and $eigs[0] > $eigs[2]) { } |
|
0 |
0 |
elsif ($eigs[1] > $eigs[2]) { } |
933
|
0 |
0 |
if ($eigs[1] > $eigs[2]) { } |
944
|
0 |
0 |
if ($eigs[0] > $eigs[2]) { } |
955
|
0 |
0 |
if ($eigs[0] > $eigs[1]) { } |
1109
|
0 |
0 |
if ($cos ne 1) |
1217
|
0 |
0 |
if ($_ > $m) |
1231
|
0 |
0 |
if ($_ < $m) |
1244
|
0 |
0 |
if ($val <= 40) |
1373
|
0 |
0 |
if ($t ne 0) |
1463
|
0 |
0 |
if ($t ne 0) |
1470
|
0 |
0 |
if ($rms > 0) { } |
1509
|
0 |
0 |
if (abs($evec[0]) + abs($evec[1]) + abs($evec[2]) + abs($evec[3]) < 0.001) |
1545
|
0 |
0 |
if ($evec[0] ** 2 + $evec[1] ** 2 + $evec[2] ** 2 + $evec[3] ** 2 < 0.001) |
1577
|
0 |
0 |
if ($evec[0] ** 2 + $evec[1] ** 2 + $evec[2] ** 2 + $evec[3] ** 2 < 0.001) |
1666
|
0 |
0 |
if (dot(@v23, @dirvec) < 0) |