anchor.diff:  
   
   [<Register ("SignupViewController")>]
  -type SignupViewController (handle:nativeint) =
  +type SignupViewController (handle:nativeint) as controller =
       inherit UITableViewController (handle)
   
       let editProfileStoryboard = UIStoryboard.FromName ("EditProfile", null)
  +
  +    let signup () =
  +        controller.SignupButton.Enabled <- false
  +        Async.startNetworkWithContinuation
  +            (Account.signup controller.Email.Text controller.Password.Text)
  +            (fun result ->
  +                controller.SignupButton.Enabled <- true
  +                match result with
  +                | Api.ApiOk result ->
  +                    NSUserDefaults.StandardUserDefaults.SetString (result.Token, "auth-token")
  +                    NSUserDefaults.StandardUserDefaults.Synchronize () |> ignore
  +                    controller.NavigationController.PushViewController (editProfileStoryboard.InstantiateInitialViewController() :?> UIViewController, true)
  +                | error -> controller.HandleApiFailure error
  +            )
   
       [<Outlet>]
       member val Email: UITextField = null with get, set
  
positive.code:             this.NavigationController.PopViewControllerAnimated (true) |> ignore
          ))
  
          this.SignupButton.TouchUpInside.Add(fun _ ->
              this.SignupButton.Enabled <- false
              Async.startNetworkWithContinuation
                  (Account.signup this.Email.Text this.Password.Text)
                  (fun result ->
                      this.SignupButton.Enabled <- true
                      match result with
                      | Api.ApiOk result ->
                          NSUserDefaults.StandardUserDefaults.SetString (result.Token, "auth-token")
                          NSUserDefaults.StandardUserDefaults.Synchronize () |> ignore
                          this.NavigationController.PushViewController (editProfileStoryboard.InstantiateInitialViewController() :?> UIViewController, true)
                      | error -> this.HandleApiFailure error
                  )
          )
  
  [<Register ("LoginViewController")>]
  type LoginViewController (handle:nativeint) =
      inherit UITableViewController (handle)
  
      let signupStoryboard = UIStoryboard.FromName ("Signup", null)
      let forgotPasswordStoryboard = UIStoryboard.FromName ("ForgotPassword", null)
  
      [<Outlet>]
      member val Email: UITextField = null with get, set
  
negative.code:         this.NavigationItem.Title <- "Login"
          this.NavigationItem.HidesBackButton <- true
  
          this.Email.EditingDidEndOnExit.Add(fun _-> this.Password.BecomeFirstResponder() |> ignore )
  
          this.Password.EditingDidEndOnExit.Add(fun _ ->
              this.Password.ResignFirstResponder() |> ignore
              login()
          )
  
          this.LoginButton.TouchUpInside.Add(fun _ -> login ())
  
          this.ForgotPasswordButton.TouchUpInside.Add(fun _ ->
              this.NavigationController.PushViewController (forgotPasswordStoryboard.InstantiateInitialViewController() :?> UIViewController, true)
  