NMRWish TCL Library Procedures lselect: Select items in one list according to 1 and 0 values in a corresponding list.