anchor.diff:                                  AddrC
                                   (fun row col ->
                                       Address.fromR1C1(row, col, us.WorksheetName, us.WorkbookName, us.Path)))
  -                        <!> "AddrR1C1"
       let AddrA = many1Satisfy isAsciiUpper
       let AddrAAbs = (pstring "$" <|> pstring "") >>. AddrA
       let Addr1 = pint32
  
positive.code:                         (pstring "'")
                          (pstring "'")
                          (Workbook .>>. WorksheetNameUnquoted))
                      <!> "ARWQuoted"
      let AddressReferenceWorkbook = getUserState >>=
                                      fun us ->
                                          (pipe2
  
negative.code:     do ExpressionDeclImpl := (attempt UnaryOpExpr) <|> (attempt BinOpExpr) <|> (attempt ExpressionSimple)
  
      // Formulas
      let Formula = pstring "=" .>> spaces >>. ExpressionDecl .>> eof