def cvle
import bend-kit-collections@0.1.4.1/nat_order.bend as NatOrderimport Base
205def cvle(-A: Nat, -B: Nat, -p: Lin, -q: Lin, -v: Vs, eA: {A == F(p, v) : Nat}, eB: {B == F(q, v) : Nat},
206 h: LE(A, B)) -> LE(F(p, v), F(q, v)):
207 %eA : LE(_, F(q, v))
208 %eB : LE(A, _)
209 h