set vari PROTEIN char local segm \ sele .not resi name H2O .a segm name WORK_SEGM end