def hi_pos
bend-collections-laws-math@1.0.0.0 · proofs/math/natural/roots.bend:222
import bend-collections-laws-math@1.0.0.0/proofs/math/natural/roots.bend as Roots
import Base
import bend-collections-laws-math@1.0.0.0/proofs/lib/nat.bend as N
import bend-collections-laws-math@1.0.0.0/spec/lib/common.bend as SC
import bend-collections-laws-math@1.0.0.0/src/math/pow2.bend as P2
import bend-collections-laws-math@1.0.0.0/proofs/math/pow2/pow2.bend as PP
222def hi_pos(+a: Nat) -> {Nat.is_lt(0n, P2.pow2t(a)) == True{} : Bool}:
223 %Equal.sym(Nat, P2.pow2t(a), SC.pow2(a), PP.same(a)) : {Nat.is_lt(0n, _) == True{} : Bool}
224 N.succ_le_lt(0n, SC.pow2(a), N.pow2_pos(a))