anchor.diff:  
                   | SynExpr.LetOrUse (_, isRecursive, synBindingList, synExpr, range, _) -> 
                       match visitor.VisitLetOrUse(path, isRecursive, traverseSynBinding path, synBindingList, range) with
  -                    | Some x -> Some x
                       | None ->
                           [yield! synBindingList |> List.map (fun x -> dive x x.RangeOfBindingWithRhs (traverseSynBinding path))
                            yield dive synExpr synExpr.Range traverseSynExpr]
                           |> pick expr
  +                    | x -> x
   
                   | SynExpr.TryWith (tryExpr=synExpr; withCases=synMatchClauseList) -> 
                       [yield dive synExpr synExpr.Range traverseSynExpr
  
positive.code:                     match synSimplePats with
                      | SynSimplePats.SimplePats(pats,_) ->
                          match visitor.VisitSimplePats(path, pats) with
                          | Some x -> Some x
                          | None -> traverseSynExpr synExpr
                      | _ -> traverseSynExpr synExpr
  
                  | SynExpr.MatchLambda (_isExnMatch,_argm,synMatchClauseList,_spBind,_wholem) -> 
  
negative.code:                     |> pick expr
  
                  | SynExpr.Typed (synExpr, synType, _range) ->
                      match traverseSynExpr synExpr with
                      | None -> traverseSynType synType
                      | x -> x
  
                  | SynExpr.Tuple (_, synExprList, _, _range) 
                  | SynExpr.ArrayOrList (_, synExprList, _range) ->
  