Corpus
Corpus is the type alias for the list of active legal precedents, each carrying a sigma-weight for jurisdictional authority. Legal theorists modeling stare decisis under sigma-conservation cite it as the base carrier for total-charge calculations. The declaration is a direct abbreviation of List Precedent with no axioms or reductions.
claimLet $C$ denote the legal corpus, formalized as the finite list of precedents where each precedent is a structure containing a string label, a natural-number sigma-weight (1 for trial, 2 for appeal, 3 for supreme court), and a natural-number age in years.
background
The module derives common-law stability from sigma-conservation on the decision graph. A Precedent structure carries sigma as authoritative weight (jurisdictional level) and age; total sigma of any corpus must stay invariant under overturning. Corpus collects these precedents into a list whose aggregate sigma is the conserved quantity.
proof idea
The declaration is a one-line abbreviation that directly identifies Corpus with the list type over the sibling Precedent structure. No lemmas or tactics are invoked.
why it matters in Recognition Science
Corpus supplies the root type for totalSigma, overturn, and the PrecedentStabilityCert record that certifies additivity, strict decrease on overturn, and the 1/45 yr amendment bound. It transplants the sigma-conservation law (from J-uniqueness and the eight-tick octave) into jurisprudence Track I5, with the module falsifier being any documented amendment rate above 1/45 yr.
scope and limits
- Does not assign concrete sigma values beyond the 1-3 jurisdictional range.
- Does not prove additivity or decrease properties; those reside in totalSigma and overturn_decreases_sigma.
- Does not model precedent creation, amendment cycles, or age decay.
- Does not connect sigma to physical constants such as phi or G.
formal statement (Lean)
52abbrev Corpus := List Precedent
proof body
Definition body.
53
54namespace Corpus
55
56/-- Total σ-charge of a corpus = sum of precedent σ-weights. -/