title: Sum of elements/numbers in N lists in Tcl?
body: <p>How to add elements/numbers from n lists in tcl ?
  I have tried in python and it worked using below:</p>
  
  <pre><code>[sum(x) for x in zip(*C)]
  </code></pre>
  
  <p>How to do this in tcl?
  Is there a zip function in tcl?</p>
  
  <p>Is there any other way to achieve this ?</p>
  
  <p>I have 2 lists for now:</p>
  
  <pre><code>l1 {11 333 4 567 129}
  l2 {23 47 56 10 13}
  </code></pre>
  
  <p>I can have N-number of lists</p>
  
  <p>I need to return element wise sum from these lists.</p>
  
  <p>for two lists I implemented below :</p>
  
  <pre><code>set result {}
  foreach x $l1 y $l2 {
      lappend result [expr {$x + $y}]
  }
  </code></pre>
  
  <p>My concern is: I can have one or many lists. So in that scenario how do I implement?</p>