version 1.9 | version 1.10 |
---|
| |
} | } |
if ( first ) { | if ( first ) { |
first = 0; | first = 0; |
| if ( ! strncasecmp("IOFORMAT",tok[0],8) ) { |
| first = 1; |
| continue; |
| } else if ( ntok == 2 && sscanf(tok[0],"%u",&utmp) == 1 |
| && sscanf(tok[1],"%u",&utmp) == 1 ) { |
| sprintf(msgbuf,"Created by CHARMM version %s %s",tok[0],tok[1]); |
| print_msg(v,msgbuf); |
| continue; |
| } else if ( ntok == 1 && sscanf(tok[0],"%u",&utmp) == 1 ) { |
| sprintf(msgbuf,"Created by CHARMM version %s",tok[0]); |
| print_msg(v,msgbuf); |
| continue; |
| } |
| } |
| |
if ( ! strncasecmp("READ",tok[0],4) && ! strncasecmp("RTF",tok[1],4) ) { | if ( ! strncasecmp("READ",tok[0],4) && ! strncasecmp("RTF",tok[1],4) ) { |
print_msg (v, "reading topology from stream file"); | print_msg (v, "reading topology from stream file"); |
| skip = 0; |
first = 1; | first = 1; |
stream = 1; | stream = 1; |
continue; | continue; |
| |
print_msg (v, "skipping unknown section in stream file"); | print_msg (v, "skipping unknown section in stream file"); |
skip = 1; | skip = 1; |
continue; | continue; |
} else if ( ! strncasecmp("IOFORMAT",tok[0],8) ) { | |
first = 1; | |
continue; | |
} else if ( ntok == 2 && sscanf(tok[0],"%u",&utmp) == 1 | |
&& sscanf(tok[1],"%u",&utmp) == 1 ) { | |
sprintf(msgbuf,"Created by CHARMM version %s %s",tok[0],tok[1]); | |
print_msg(v,msgbuf); | |
continue; | |
} else if ( ntok == 1 && sscanf(tok[0],"%u",&utmp) == 1 ) { | |
sprintf(msgbuf,"Created by CHARMM version %s",tok[0]); | |
print_msg(v,msgbuf); | |
continue; | |
} | |
} | } |
| |
if ( skip ) { | if ( skip ) { |