tcl中如何实现列表元素的删除？

set mylist {a b c}

# 按索引删除元素c

set mylist [lreplace $mylist 2 2]

# 按值除去元素b

set idx [lsearch $mylist "b"]

set mylist [lreplace $mylist $idx $idx]