LAWS.nat_mod_mod_pow: law of lawful-words@0.1.0.0
Import: import lawful-words@0.1.0.0/LAWS.bend as LAWS
Lines 583-589 of lawful-words@0.1.0.0/LAWS.bend: https://jend.leeeet.dev/read.txt?path=lawful-words@0.1.0.0/LAWS.bend&start_line=583&end_line=589

import Base

# (a % 2^m) % 2^k = a % 2^k for k <= m.
law nat_mod_mod_pow:
  for a: Nat
  for k: Nat
  for m: Nat
  for h: {Nat.is_le(k, m) == True{} : Bool}
  {Nat.mod(Nat.mod(a, Nat.pow(2n, m)), Nat.pow(2n, k)) == Nat.mod(a, Nat.pow(2n, k)) : Nat}

Uses (6):
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Bool
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Nat
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Nat.is_le
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Nat.mod
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Nat.pow
  https://jend.leeeet.dev/definition.txt?path=lawful-words@0.1.0.0/proof_nat.bend&name=mod_mod_pow