anchor.diff:          )
   
   [<Register("CountryPickerViewController")>]
  -type CountryPickerViewController (countries:string []) as controller =
  +type CountryPickerViewController (itemSelected) =
       inherit UIViewController ("CountryPickerViewController", null)
   
  +    let mutable countries:LocationCountry [] = [||]
       let source = { 
           new UITableViewSource() with
           override this.GetCell(tableView, indexPath) =
  
positive.code: 
      override this.ViewDidLoad () =
          controller.Table.Source <- source
          controller.Table.ReloadData()
  
  [<Register ("EditProfileViewController")>]
  type EditProfileViewController (handle:nativeint) =
      inherit UITableViewController (handle)
  
      let pickerMedia = new MediaPicker()
      let pickerCountry = new CountryPickerViewController([| "Canada"; "United States"; "United Kingdom" |])
      let pickerRegion = new RegionPickerViewController([|  "Canada"; "United States"; "United Kingdom"  |])
  
      [<Outlet>]
      member val Birthday:UITextField = null with get, set
  
negative.code:         )
  
      member this.ChooseCountry () = 
          let picker = new CountryPickerViewController(fun item ->
              country <- Some item
              this.Country.Text <- item.Name
              this.NavigationController.PopViewControllerAnimated true |> ignore
          )
  
          this.NavigationController.PushViewController (picker, true)
  
  
      member this.ChooseRegion () = 
          match country with
          | Some country ->
              let picker = new RegionPickerViewController(country, fun item ->
                  region <- Some item
                  this.Region.Text <- item.Name
                  this.NavigationController.PopViewControllerAnimated true |> ignore
              )
              this.NavigationController.PushViewController (picker, true)
          | None -> showSimpleAlert "Country" "Please pick a country" "Close"
  
      override this.RowSelected (view, indexPath) =
          match indexPath.Section, indexPath.Row with
  