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