ProofWord.wpad: law of lawful-words@0.1.0.0
Import: import lawful-words@0.1.0.0/proof_word.bend as ProofWord
Lines 633-636 of lawful-words@0.1.0.0/proof_word.bend: https://jend.leeeet.dev/read.txt?path=lawful-words@0.1.0.0/proof_word.bend&start_line=633&end_line=636

import Base

law wpad:
  for +p: Nat
  for +t: Word(p)
  {Word.to_nat(1n+p, Word.shr.pad(p, t)) == Word.to_nat(p, t) : Nat}

Uses (9):
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Bool
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Equal.cong
  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.shr.pad
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Word.to_nat