|  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) { }  |