def le_zero

bend-collections-laws-math@1.0.0.0 · proofs/math/natural/sqrtn.bend:67

import Base
import bend-collections-laws-math@1.0.0.0/proofs/lib/logic.bend as L

67def le_zero(+g: Nat, +h: {Nat.is_le(g, 0n) == True{} : Bool}) -> {g == 0n : Nat}:
68  match g:
69    case 0n:
70      {==}
71    case 1n+gp:
72      Empty.absurd({1n+gp == 0n : Nat}, L.false_true(h))