line |
true |
false |
branch |
121
|
0 |
0 |
unless open PRMTOPFILE, $$prmtop{'FILENAME'} |
126
|
0 |
0 |
if /^$/ |
129
|
0 |
0 |
if (/^\%FLAG\s+TITLE/) |
133
|
0 |
0 |
if ($Titleflag == 1 and /^[\w\d\-\(\)]+/) |
144
|
0 |
0 |
if (/^%FLAG\s+ATOM_NAME/) |
149
|
0 |
0 |
if ($atomflag == 1 and /^((?:[a-zA-Z]{1,2}\d*\s+){1,20})/) |
160
|
0 |
0 |
if ($atomflag == 1 and /^%FLAG/) |
164
|
0 |
0 |
if (/^%FLAG\s+CHARGE/) |
169
|
0 |
0 |
if ($chargeflag == 1 and /^\s+((?:-*\d\.\d+E[-+]\d{1,2}\s+){1,5})/) |
178
|
0 |
0 |
if ($chargeflag == 1 and /^%FLAG/) |
183
|
0 |
0 |
if (/^%FLAG\s+MASS/) |
188
|
0 |
0 |
if ($massflag == 1 and /^\s+((?:-*\d\.\d+E[-+]\d{1,2}\s+){1,5})/) |
198
|
0 |
0 |
if ($massflag == 1 and /^%FLAG/) |
207
|
0 |
0 |
if (/ArCa|CoNi|BiPo|CmBk/) |
208
|
0 |
0 |
if (exists $atomicsymbol[$i]) |
226
|
0 |
0 |
if $$prmtop{'CHARGE'} eq '-0' |
343
|
0 |
0 |
if (defined $result) { } |