exact le_of_eq (trunc_add_half_ulp_eq_of_uflow uflow)
case inl
n x : ℕ
round : ℕ → ℕ
npos : 0 < n
hcorrect₁ : correct₁ n round
hhi : round x = next n (trunc n x)
uflow : x < 2 ^ n
⊢ trunc n x + ulp n x / 2 ≤ x
no goals