IndisputableMonolith.Linguistics.SemanticRelationsFromConfigDim

   1import Mathlib
   2import IndisputableMonolith.Constants
   3
   4/-!
   5# Semantic Relations from configDim — Linguistics Depth
   6
   7Five canonical lexical-semantic relations (= configDim D = 5):
   8  synonymy, antonymy, hypernymy, meronymy, polysemy.
   9
  10Lean status: 0 sorry, 0 axiom.
  11-/
  12
  13namespace IndisputableMonolith.Linguistics.SemanticRelationsFromConfigDim
  14
  15inductive SemanticRelation where
  16  | synonymy
  17  | antonymy
  18  | hypernymy
  19  | meronymy
  20  | polysemy
  21  deriving DecidableEq, Repr, BEq, Fintype
  22
  23theorem semanticRelation_count : Fintype.card SemanticRelation = 5 := by decide
  24
  25structure SemanticRelationsCert where
  26  five_relations : Fintype.card SemanticRelation = 5
  27
  28def semanticRelationsCert : SemanticRelationsCert where
  29  five_relations := semanticRelation_count
  30
  31end IndisputableMonolith.Linguistics.SemanticRelationsFromConfigDim
  32