| line |
true |
false |
branch |
|
77
|
0 |
0 |
if /^#[npt]*\Z/ |
|
81
|
0 |
0 |
if m[.+/.+] and $gauss->get('JOBTYPE') eq 'undef' |
|
84
|
0 |
0 |
if m[.+/.+//.+/.+] and $gauss->get('JOBTYPE') eq 'undef' |
|
87
|
0 |
0 |
if (/^([fp]*$jt)/) |
|
90
|
0 |
0 |
if ($$gauss{'COMPLETE'} == 0 and $$gauss{'JOBTYPE'} =~ /OPT/) { } |
|
102
|
0 |
0 |
if (m[^((?:[ur]*)${theory}[a-b0-9\(\)]*)/*]) |
|
104
|
0 |
0 |
unless m[/] |
|
109
|
0 |
0 |
if /[=\(](?![1-3dpf,]{1,7}\))/ |
|
113
|
0 |
0 |
if (m[^((?:[ur])*$functional(?:[13]*)t*[belmnpsvwy125-9]*)/*]) |
|
117
|
0 |
0 |
unless m[/] |
|
122
|
0 |
0 |
if (m[/*($basis(?:.*))]) |
|
127
|
0 |
0 |
unless m[/] |
|
132
|
0 |
0 |
if $$gauss{'DEBUG'} >= 1 |