Evaluated proc dd {name field} { a $name [remval [a $name] $field] }