From: José Gómez (
Date: Thu Aug 04 2016 - 16:50:03 CDT

Hi everyone,
I need to get all the water's segid of a pdb file and write them in
different pdb file.
For example:

set water [atomselect top "segid W8"]
$water writepdb waterW8.pdb

In this case, my pdb file contains 8 different segid, so I could do it with
a tcl for bucle from 1 to 8, but the problem is what if I have more than 8
segid? How can I count them in the same tcl script??? do I need to get the
position of "WX" (X= segid number) of the line (as a string line)?

Hope you can help me!
Regards from Chile!

*José Fernando Gómez Ponce*
*Ingeniero en Bioinformática.*
*Computational Biology Lab (DLab)Fundación Ciencia para la Vida, *
*+569 66622520 <%2B569%2066622520>*