anchor.diff:          new UITableViewSource() with
   
               override this.GetCell(tableView, indexPath) =
  -                let (id, name, desc, price) = products.[indexPath.Row]
  +                let (id, name, desc, price, product) = products.[indexPath.Row]
                   let cell = 
                       match tableView.DequeueReusableCell "credits-product-cell" with
                       | null -> new UITableViewCell (UITableViewCellStyle.Subtitle, "credits-product-cell")
  
positive.code: type CreditsViewController () as controller =
      inherit UIViewController ("CreditsViewController", null)
  
      let mutable products:(string * string * string * string) list = []
  
      let localizedPrice (product:SKProduct) =
          let formatter = new NSNumberFormatter()
  
negative.code:                                 product.ProductIdentifier,
                                  product.LocalizedTitle,
                                  product.LocalizedDescription,
                                  (localizedPrice product),
                                  product
                              )
                      ]
  
  