ProofBytes.bimp: law of lawful-words@0.1.0.0
Import: import lawful-words@0.1.0.0/proof_bytes.bend as ProofBytes
Lines 46-52 of lawful-words@0.1.0.0/proof_bytes.bend: https://jend.leeeet.dev/read.txt?path=lawful-words@0.1.0.0/proof_bytes.bend&start_line=46&end_line=52

import Base

# and(l, and(i, x)) = and(l, x) when l implies i.
law bimp:
  for +l: Bool
  for +i: Bool
  for +x: Bool
  for imp: {l == True{} : Bool} -> {i == True{} : Bool}
  {Bool.and(l, Bool.and(i, x)) == Bool.and(l, x) : Bool}

Uses (3):
  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=Equal.sym