LAWS.dec_enc_head: law of bend-osdev-mode-core@0.1.0.0
Import: import bend-osdev-mode-core@0.1.0.0/LAWS.bend as LAWS
Lines 165-174 of bend-osdev-mode-core@0.1.0.0/LAWS.bend: https://jend.leeeet.dev/read.txt?path=bend-osdev-mode-core@0.1.0.0/LAWS.bend&start_line=165&end_line=174

import Base
import bend-osdev-mode-core@0.1.0.0/mode_core.bend as M

# the first block's round trip, and the rest's
law dec_enc_head:
  for ~K: Data
  for ~enc: K -> M.CmBlock -> M.CmBlock
  for ~dec: K -> M.CmBlock -> M.CmBlock
  for +k: K
  for +x: M.CmBlock
  for +xs: List<&2, M.CmBlock>
  for +h: {M.CmBlock.dec_enc(~K, ~enc, ~dec, k, Con{x, xs}) == Con{x, xs} : List<&2, M.CmBlock>}
  {dec(k, enc(k, x)) == x : M.CmBlock}

Uses (4):
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=List
  https://jend.leeeet.dev/definition.txt?path=bend-osdev-mode-core@0.1.0.0/PROOF.bend&name=cmp.hd
  https://jend.leeeet.dev/definition.txt?path=bend-osdev-mode-core@0.1.0.0/mode_core.bend&name=CmBlock
  https://jend.leeeet.dev/definition.txt?path=bend-osdev-mode-core@0.1.0.0/mode_core.bend&name=CmBlock.dec_enc