def not_t

bend-collections-laws-math@1.0.0.0 · proofs/math/typed/f64sqv.bend:121

import bend-collections-laws-math@1.0.0.0/proofs/math/typed/f64sqv.bend as F64sqv
import Base
import bend-collections-laws-math@1.0.0.0/proofs/math/typed/u32laws.bend as LW

121def not_t(+x: Bool, +h: {Bool.not(x) == True{} : Bool}) -> {x == False{} : Bool}:
122  match x:
123    case True{}:
124      Empty.absurd({True{} == False{} : Bool}, LW.true_ne_false(Equal.sym(Bool, False{}, True{}, h)))
125    case False{}:
126      {==}

Uses (5)

Used by (1)