anchor.diff:  
                   let withParamFolder (cypher: ICypherFluentQuery) (paramName, value) =
                       cypher.WithParam(paramName, value)
  +
  +                debug ("Create relation: " + x.CypherExprForCreate)
   
                   if isUnique then
                       cypher.CreateUnique(x.CypherExprForCreate)
  
positive.code:         | Var of var:Var
          | NamedValue of cypherExpr:string * paramName:string * value:obj
          | Anonymous of typ:Type
          member x.CypherExpr =
              match x with
              | Var(var) -> sprintf "(%s:%s)" var.Name var.Type.Name
  
negative.code:     let inline (|IsNodeExpr|_|) expr: Option<NodeExpr> =
          match expr with
          | Var(var) -> Some (NodeExpr.Var(var))
          | ValueWithName(value, typ, name)
          | Coerce(ValueWithName(value, typ, name), _) ->
              // TODO denisok: extract constant
              let paramName = sprintf "__neo4jnode__%s" name
              let cypherExpr = sprintf "(%s:%s {%s})" name typ.Name paramName
  