~/jendhub

def wv.gcmp

bend-osdev-word64@0.1.1.0 · proof_value.bend:340

import bend-osdev-word64@0.1.1.0/proof_value.bend as ProofValue
import Base
import bend-osdev-u32@0.1.0.0/LAWS.bend as UL

340def wv.gcmp(+n: Nat, +ah: Word(n), +al: Word(n), +bh: Word(n), +bl: Word(n)) -> {wv.lex(Word.cmp(n, ah, bh), Word.cmp(n, al, bl)) == Nat.cmp(wv.V(n, ah, al), wv.V(n, bh, bl)) : Cmp}:
341  %Equal.sym(Cmp, Word.cmp(n, ah, bh), Nat.cmp(Word.to_nat(n, ah), Word.to_nat(n, bh)), UL.word_cmp_value(n, ah, bh)) : {wv.lex(_, Word.cmp(n, al, bl)) == Nat.cmp(wv.V(n, ah, al), wv.V(n, bh, bl)) : Cmp}
342  %Equal.sym(Cmp, Word.cmp(n, al, bl), Nat.cmp(Word.to_nat(n, al), Word.to_nat(n, bl)), UL.word_cmp_value(n, al, bl)) : {wv.lex(Nat.cmp(Word.to_nat(n, ah), Word.to_nat(n, bh)), _) == Nat.cmp(wv.V(n, ah, al), wv.V(n, bh, bl)) : Cmp}
343  wv.ncmp(n, Word.to_nat(n, ah), Word.to_nat(n, bh), Word.to_nat(n, al), Word.to_nat(n, bl), UL.word_value_lt(n, al), UL.word_value_lt(n, bl))

Uses (12)

Used by (2)