LAWS.pair_trunc_right: law of bend-prot@0.1.0.0
Import: import bend-prot@0.1.0.0/LAWS.bend as LAWS
Lines 258-262 of bend-prot@0.1.0.0/LAWS.bend: https://jend.leeeet.dev/read.txt?path=bend-prot@0.1.0.0/LAWS.bend&start_line=258&end_line=262

import Base
import bend-prot@0.1.0.0/protein.bend as P
import bend-prot@0.1.0.0/rmsd.bend as R

# Pair folds against an empty list answer the identity.
law pair_trunc_right:
  for x: P.Atom
  for xt: List<&2, P.Atom>
  {R.pair_sumd2(x <> xt, empty_atoms()) == (0.0, 0n) : F32 & Nat}

Uses (8):
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=F32
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=List
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Nat
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Pair
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Sigma
  https://jend.leeeet.dev/definition.txt?path=bend-prot@0.1.0.0/LAWS.bend&name=empty_atoms
  https://jend.leeeet.dev/definition.txt?path=bend-prot@0.1.0.0/protein.bend&name=Atom
  https://jend.leeeet.dev/definition.txt?path=bend-prot@0.1.0.0/rmsd.bend&name=pair_sumd2