anchor.diff:          this.Birthday.InputAccessoryView <- accessoryBirthday.View
           this.Birthday.EditingDidBegin.Add(fun _ ->
               if String.IsNullOrEmpty(this.Birthday.Text.Trim()) = false then
  -                pickerDate.Date <- NSDate.op_Implicit (DateTime.ParseExact(this.Birthday.Text, "M/d/yyyy", CultureInfo.CurrentCulture))
  +                pickerDate.Date <-
  +                    NSDate.op_Implicit (
  +                        match DateTime.TryParse(this.Birthday.Text) with
  +                        | true, date -> date
  +                        | _ -> defaultDate)
           )
   
           // Country Picker
  
positive.code:                 controller.Region.Text <- region.Value.Name
          }
  
  
      [<Outlet>]
      member val Birthday:UITextField = null with get, set
  
negative.code:                         regions <- r
                      | _ -> ()
  
                      this.Username.Text <- 
                          match identity.Name with
                          | "Guest" -> String.Empty
                          | _ -> identity.Name
  
                      this.GenderSelect.SelectedSegment <-
                          match profile.Gender with
                          | GenderType.Female -> 1
  