anchor.diff:                          let f = GenericHashWithComparerIntrinsic_inline iec x.Item6
                           let g = GenericHashWithComparerIntrinsic_inline iec x.Item7
                           let h = GenericHashWithComparerIntrinsic_inline iec x.Rest
  -                        eliminate_tail_call_int (cth (cth (cth (cth (cth (cth (cth (cth 0 a) b) c) d) e) f) g) h)
  +                        eliminate_tail_call_int (cth (cth (cth a b) (cth c d)) (cth (cth e f) (cth g h)))
   
                   let makeTupleEqualityComparerDelegate (ty:Type) (types:array<Type>) (def:Type) =
                       let concrete = def.MakeGenericType types
  
positive.code:                         let b = GenericHashWithComparerIntrinsic_inline iec x.Item2 
                          let c = GenericHashWithComparerIntrinsic_inline iec x.Item3
                          let d = GenericHashWithComparerIntrinsic_inline iec x.Item4 
                          eliminate_tail_call_int (cth (cth (cth (cth 0 a) b) c) d)
  
                  type TupleEREqualityComparer<'a,'b,'c,'d,'e>() =
                      member __.Equals (_:IEqualityComparer, x:System.Tuple<'a,'b,'c,'d,'e>, y:System.Tuple<'a,'b,'c,'d,'e>) = 
  
negative.code: 
  
              module TupleEquality =
  (*
                  let inline mask (n:int) (m:int) = (# "and" n m : int #)
                  let inline opshl (x:int) (n:int) : int =  (# "shl" x (mask n 31) : int #)
                  let inline opshr (x:int) (n:int) : int =  (# "shr" x (mask n 31) : int #)
                  let inline opxor (x:int) (y:int) : int = (# "xor" x y : int32 #)
                  let inline combineTupleHashes (h1 : int) (h2 : int) = -1640531527 + (h2 + (opshl h1 6) + (opshr h1 2))
  *)
                  let inline cth a b = TupleUtils.combineTupleHashes a b
  
                  type TupleEREqualityComparer<'a>() =
                      member __.Equals (_:IEqualityComparer, x:System.Tuple<'a>, y:System.Tuple<'a>) = 
  