AESMaskedXorProof.bool_and_true_left: def of qasim-bend-kit@0.1.0.2
Import: import qasim-bend-kit@0.1.0.2/proof/AES_MaskedXorProof.bend as AESMaskedXorProof
Lines 156-166 of qasim-bend-kit@0.1.0.2/proof/AES_MaskedXorProof.bend: https://jend.leeeet.dev/read.txt?path=qasim-bend-kit@0.1.0.2/proof/AES_MaskedXorProof.bend&start_line=156&end_line=166

import Base
import qasim-bend-kit@0.1.0.2/proof/AES_ZipLengthProof.bend as ZipLengthProof

def bool_and_true_left(+a: Bool, +b: Bool,
    both: {Bool.and(a, b) == True{} : Bool}) -> {a == True{} : Bool}:
    match a b:
        case False{} False{}:
            Empty.absurd({False{} == True{} : Bool},
                ZipLengthProof.false_true(both))
        case False{} True{}:
            Empty.absurd({False{} == True{} : Bool},
                ZipLengthProof.false_true(both))
        case True{} False{}: {==}
        case True{} True{}: {==}

Uses (4):
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Bool
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Bool.and
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Empty.absurd
  https://jend.leeeet.dev/definition.txt?path=qasim-bend-kit@0.1.0.2/proof/AES_ZipLengthProof.bend&name=false_true