Lemmas.word_to_nat_inj: law of bend-kit-lemmas@0.1.1.0
Import: import bend-kit-lemmas@0.1.1.0/lemmas.bend as Lemmas
Lines 234-240 of bend-kit-lemmas@0.1.1.0/lemmas.bend: https://jend.leeeet.dev/read.txt?path=bend-kit-lemmas@0.1.1.0/lemmas.bend&start_line=234&end_line=240

import Base

# Two words with the same value are the same word.
law word_to_nat_inj:
  for n: Nat
  for a: Word(n)
  for b: Word(n)
  for h: {Word.to_nat(n, a) == Word.to_nat(n, b) : Nat}
  {a == b : Word(n)}

Uses (13):
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Bool
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Empty.absurd
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Equal.cong
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Equal.sym
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Nat
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Nat.double
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Word
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Word.Con
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Word.Nil
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Word.to_nat
  https://jend.leeeet.dev/definition.txt?path=bend-kit-lemmas@0.1.1.0/lemmas.bend&name=double_inj
  https://jend.leeeet.dev/definition.txt?path=bend-kit-lemmas@0.1.1.0/lemmas.bend&name=double_ne_odd
  https://jend.leeeet.dev/definition.txt?path=bend-mathlib@0.8.1.0/nat.bend&name=succ_inj