def AP.wcon_cong
import bend-osdev-array@0.1.0.1/PROOF.bend as PROOFimport Base
318def AP.wcon_cong(-p: Nat, -b: Bool, -x: Word(p), -y: Word(p), e: {x == y : Word(p)}) -> {WCon{b, x} == WCon{b, y} : Word(1n+p)}:
319 %e : {WCon{b, x} == WCon{b, _} : Word(1n+p)}
320 {==}