anchor.diff:                                                  | None      -> ReferenceAddress(Env(us.Path, wbname, wsname), addr) :> Reference
                                               )
                                           )
  -                                    <!> "AddressReferenceWorkbook"
  +//                                    <!> "AddressReferenceWorkbook"
       let AddressReferenceWorksheet = getUserState >>=
                                           fun us ->
                                               pipe2
                                                   (WorksheetName .>> pstring "!")
                                                   AnyAddr
                                                   (fun wsname addr -> ReferenceAddress(Env(us.Path, us.WorkbookName, wsname), addr) :> Reference)
  -                                    <!> "AddressReferenceWorksheet"
  +//                                    <!> "AddressReferenceWorksheet"
       let AddressReferenceNoWorksheet = getUserState >>=
                                           fun us ->
                                               AnyAddr
                                               |>> (fun addr -> ReferenceAddress(us, addr) :> Reference)
  -                                      <!> "AddressReferenceNOWorksheet"
  +//                                      <!> "AddressReferenceNOWorksheet"
       let AddressReference = (attempt AddressReferenceWorkbook)
                              <|> (attempt AddressReferenceWorksheet)
                              <|> AddressReferenceNoWorksheet
  
positive.code:                                                 | None      -> ReferenceRange(Env(us.Path, wbname, wsname), rng) :> Reference
                                              )
                                          )
                                          <!> "RangeReferenceWorkbook"
      let RangeReferenceWorksheet R = getUserState >>=
                                      fun (us: Env) ->
                                          pipe2
                                              (WorksheetName .>> pstring "!")
                                              R
                                              (fun wsname rng -> ReferenceRange(Env(us.Path, us.WorkbookName, wsname), rng) :> Reference)
                                      <!> "RangeReferenceWorksheet"
      let RangeReferenceNoWorksheet R = getUserState >>=
                                          fun (us: Env) ->
                                              R
                                              |>> (fun rng -> ReferenceRange(us, rng) :> Reference)
                                      <!> "RangeReferenceNOWorksheet"
      let RangeReference R = (attempt (RangeReferenceWorkbook R))
                           <|> (attempt (RangeReferenceWorksheet R))
                           <|> RangeReferenceNoWorksheet R
  
negative.code: "ODDLPRICE"; "ODDLYIELD"; "OR";
  "PRICE"; "PRODUCT"; 
  "RTD"; 
  "STDEV"; "STDEV.P"; "STDEV.S"; "STDEVA"; "STDEVP"; "STDEVPA"; "SUBTOTAL"; "SUMIFS"; "SUMPRODUCT"; "SUMSQ"; "SWITCH";
  "TEXTJOIN"; 
  "VAR"; "VAR.P"; "VAR.S"; "VARA"; "VARP"; "VARPA"; "VDB";
  "XOR";
  