anchor.diff:  
       let private iEquatable = typedefof<IEquatable<_>>
       let private iEquatableNamespace = NameSyntax.MakeQualified(iEquatable.Namespace.Split('.'))
  -    let iequatableOf t =
  +    let private iequatableOf t =
           SyntaxFactory.QualifiedName(iEquatableNamespace, NameSyntax.MakeGeneric iEquatable.Name [|t|])
   
  -    let makeOperator info eq leftArgType rightArgType =
  +    let private makeOperator info eq leftArgType rightArgType =
           let left = identifier "left"
           let right = identifier "right"
   
  
positive.code:         |?> (info.Id.EqualsUnderlying, addBodyStatement ifIsUnderlyingReturnEquals)
          |> addBodyStatement returnArgCastToIdValueEqualsValue
  
      let makeEqualsGenerated info =
          let parameterName = "other"
          let parameter = identifier parameterName :> ExpressionSyntax
          let body = ret (thisValueEquals info (info.ValueAccess parameter) true)
  
negative.code:         |> addParameter parameterName info.GeneratedTypeSyntax
          |> addBodyStatement body
          
      let private makeEqualsUnderlying info =
          let parameterName = "other"
          let parameter = identifier parameterName :> ExpressionSyntax
          let body = ret (thisValueEquals info parameter true)
  