def bool.and_r

bend-osdev-caps@0.1.0.0 · PROOF.bend:61

import bend-osdev-caps@0.1.0.0/PROOF.bend as PROOF

import Base

61def bool.and_r(+x: Bool, +y: Bool) -> {Bool.and(x, y) == True{} : Bool} -> {y == True{} : Bool}:
62  match x:
63    case True{}:
64      h => h
65    case False{}:
66      h => bits.absurd(y, h)

Uses (3)

Used by (4)