anchor.diff:              | _ -> None
   
           match args with
  -        | [MaybeCasted(IdentExpr ident)] -> findInScope ctx ident.Name |> Option.bind inferCasename
  -        | [e] -> inferCasename e
  +        | [MaybeInScope ctx e] -> inferCasename e
           | _ -> None
           |> Option.orElseWith (fun () ->
               "Cannot infer case name of expression"
  
positive.code:                makeStrConst Naming.unknown |> Some
      | _, ("nameofLambda"|"namesofLambda" as meth) ->
          match args with
          | [Lambda(_, (Namesof com ctx names), _)] -> Some names
          | [MaybeCasted(IdentExpr ident)] ->
              match findInScope ctx ident.Name with
              | Some(Lambda(_, (Namesof com ctx names), _)) -> Some names
              | _ -> None
          | _ -> None
          |> Option.defaultWith (fun () ->
              "Cannot infer name of expression"
  
negative.code:                         let m = makeIdent "m"
                          Delegate([m], Get(IdentExpr m, ByKey(ExprKey selector), Any, None), None)
                      Helper.InstanceCall(import, "then", t, [selector])
              match arg with
              // TODO: Check this is not a fable-library import?
              | Import(info,_,_) ->
  