title: Find the intersection of two lists in tcl
body: <p>Is there a command that will allow me to get the intersection (members that apear in both lists) of two lists?</p>
  
  <p>For example, if the lists are:</p>
  
  <p><code>a b c d h</code> and <code>c e f g h</code></p>
  
  <p>the result should be <code>c h</code></p>