anchor.diff:  
       let LinqExpressionHelper (x:'T) : Expression<'T> = failwith ""
       
  -    let MakeFakeExpression (x:Expr) = 
  -        let minfo = match <@@ LinqExpressionHelper @@> with Lambda(_,Call(_,minfo,_)) -> minfo | _ -> failwith "couldn't find method info"
  -        Expr.Call(minfo.GetGenericMethodDefinition().MakeGenericMethod [| x.Type |], [ x ])
  -
       let showAll = BindingFlags.Public ||| BindingFlags.NonPublic 
   
       let wrapVoid (e:#Expression) =
  
positive.code: 
              let assignToFuncObject =
                  vePs
                  |> List.map (fun (vP, funcObject, assignToConstruction, assignState) ->
                      Expression.Assign (vP, funcObject) |> asExpression)
                  
              let assignState =
                  vePs
                  |> List.map (fun (vP, funcObject, assignToConstruction, assignState) -> assignState)
  
              let bodyP = ConvExpr env body
  
  
negative.code: open Microsoft.FSharp.Quotations.Patterns
  open Microsoft.FSharp.Quotations.DerivedPatterns
  
  module ExtraHashCompare =
      let GenericNotEqualIntrinsic<'T> (x:'T) (y:'T) : bool = not (Microsoft.FSharp.Core.LanguagePrimitives.HashCompare.GenericEqualityIntrinsic<'T> x y)
  
  module QuotationEvaluationTypes = 
      type This = 
          static member Assembly = typeof<This>.Assembly
  
  