fix(library/data): 'choose' -> 'find' renaming problems

This commit is contained in:
Leonardo de Moura 2015-07-25 11:25:04 -07:00
parent 1cc6be6052
commit a883b72a25
2 changed files with 3 additions and 3 deletions

View file

@ -303,8 +303,8 @@ end (eq.refl (decode A n))
private definition find_a : (∃ x, p x) → {a : A | p a} :=
suppose ∃ x, p x,
have ∃ x, pn x, from ex_pn_of_ex this,
let r := @nat.choose pn decidable_pn this in
have pn r, from @nat.choose_spec pn decidable_pn this,
let r := @nat.find _ decidable_pn this in
have pn r, from @nat.find_spec pn decidable_pn this,
of_nat r this
end find_a

View file

@ -3,4 +3,4 @@ Copyright (c) 2014 Microsoft Corporation. All rights reserved.
Released under Apache 2.0 license as described in the file LICENSE.
Author: Jeremy Avigad
-/
import .basic .order .sub .div .gcd .bquant .sqrt .pairing .power .choose .fact .parity
import .basic .order .sub .div .gcd .bquant .sqrt .pairing .power .find .fact .parity