title: Compute min and max of a tuple list in F#
body: <p>In F#, given 
  <code>game: (int*int) list</code>
  I'd like to compute minx, maxx, miny, maxy the min and max values for each tuple dimension.</p>
  
  <p>This code works but seems a bit clumsy:</p>
  
  <pre><code>let minX (game: (int*int) list) =  game |&gt; List.map (fun (x,y) -&gt; x) |&gt; Seq.min 
  let maxX (game: (int*int) list) =  game |&gt; List.map (fun (x,y) -&gt; x) |&gt; Seq.max 
  let minY (game: (int*int) list) =  game |&gt; List.map (fun (x,y) -&gt; y) |&gt; Seq.min 
  let maxY (game: (int*int) list) =  game |&gt; List.map (fun (x,y) -&gt; y) |&gt; Seq.max 
  </code></pre>
  
  <p>Any hint for improvement?</p>