def ge_order

bend-collections-laws-math@1.0.0.0 · proofs/math/u64/u64.bend:79

import Base
import bend-collections-laws-math@1.0.0.0/src/math/u64.bend as U

79def ge_order(+c: Cmp, +d: Cmp, +h: {Cmp.is_ge(d) == True{} : Bool}) -> {Cmp.is_ge(U.order(c, d)) == Cmp.is_ge(c) : Bool}:
80  match c:
81    case LT{}:
82      {==}
83    case EQ{}:
84      h
85    case GT{}:
86      {==}