Answers for "how to combine list in TCL"

0

how to combine list in TCL

set d2_O4 [atomselect top "((residue 22) and (type O4')) "]
set d2_C1 [atomselect top "((residue 22) and (type C1')) "]
set d2_C2 [atomselect top "((residue 22) and (type C2')) "]
set d2_C3 [atomselect top "((residue 22) and (type C3')) "]

set d2_four_index_list [concat [$d2_O4 get index] [$d2_C1 get index] [$d2_C2 get index] [$d2_C3 get index]]
set d2_tor [measure dihed $d2_four_index_list]
Posted by: Guest on January-20-2022

Browse Popular Code Answers by Language