def not_t

bend-collections-laws-math@1.0.0.0 · proofs/math/typed/u64mont.bend:266

import bend-collections-laws-math@1.0.0.0/proofs/math/typed/u64mont.bend as U64mont
import Base

266def not_t(+x: Bool, +h: {Bool.not(x) == True{} : Bool}) -> {x == False{} : Bool}:
267  match x:
268    case True{}:
269      Empty.absurd({True{} == False{} : Bool}, true_ne_false(Equal.sym(Bool, False{}, True{}, h)))
270    case False{}:
271      {==}

Uses (5)

Used by (1)