anchor.diff:             methodInfo.DeclaringType.Assembly = fsQuotationAssembly
           then Some ()
           else None
  +
  +    let inline (|DeclareNodeCall|_|) (callExpr: Expr) =
  +        match callExpr with
  +        | SpecificCall <@ declareNode @> (_, [nodeType], _) -> Some nodeType
  +        | _ -> None
  +
  +    let inline (|DeclareRelationshipCall|_|) (callExpr: Expr) =
  +        match callExpr with
  +        | SpecificCall <@ declareRelationship @> (_, [relType], _) -> Some relType
  +        | _ -> None
   
       let inline (|IsNodeExpr|_|) expr: Option<NodeExpr> =
           match expr with
  
positive.code:             let paramName = sprintf "__neo4jnode__%s" name
              let cypherExpr = sprintf "(%s:%s {%s})" name typ.Name paramName
              Some (NodeExpr.NamedValue(cypherExpr, paramName, value))
          | _ -> None
  
      let inline (|DeclareNodeCall|_|) (callExpr: Expr) =
          match callExpr with
          | SpecificCall <@ declareNode @> (_, [nodeType], _) -> Some nodeType
          | _ -> None
  
      let inline (|DeclareRelationshipCall|_|) (callExpr: Expr) =
          match callExpr with
          | SpecificCall <@ declareRelationship @> (_, [relType], _) -> Some relType
          | _ -> None
  
      let inline (|IsRelExpr|_|) expr: Option<RelExpr> =
          match expr with
          | ValueWithName(value, typ, name) -> Some (RelExpr.NamedValue(name, typ, value))
          | DeclareRelationshipCall typ ->
              let cypherExpr = sprintf "[:%s]" typ.Name
              Some (RelExpr.TypedPattern(cypherExpr))
          | _ -> None
  
      let inline (|CreateNodeCall|_|) (callExpr: Expr) =
          match callExpr with
  
negative.code:             | LeftRel(_, RelExpr.NamedValue(relName, _, relValue), _, _)
              | RightRel(_, RelExpr.NamedValue(relName, _, relValue), _, _) ->
                  let paramName = RelExpr.GenParamName relName
                  cypher.Merge(x.CypherExpr)
                        .OnCreate()
                        .Set(sprintf "%s = {%s}" relName paramName)
                        .WithParam(paramName, relValue)
  