title: How to iterate nested list in tcl?
body: <p>There is a nested list x in tcl</p>
  
  <pre><code>set x {{A 0} {B 1} {C 2} {D 3}}
  </code></pre>
  
  <p>How to iterate over and print all the elements in this nested list?</p>