Serbo-Croat case

This file defines the seven Serbo-Croat cases: "There are seven cases: nominative, vocative, accusative, genitive, dative, instrumental, locative. Dative and locative have merged; only certain inanimate monosyllabic nouns distinguish them accentually in the singular" ([Bro93b], p. 318). The directory is named for Serbian; Browne's chapter describes the Serbo-Croat standard.

References

• [Bro93b]

inductive Serbian.Case : Type

The seven Serbo-Croat cases.

• nom : Case

  The nominative.

• voc : Case

  The vocative.

• acc : Case

  The accusative.

• gen : Case

  The genitive.

• dat : Case

  The dative.

• inst : Case

  The instrumental.

• loc : Case

  The locative.

@[instance_reducible]

instance Serbian.instDecidableEqCase : DecidableEq Case

Equations

• Serbian.instDecidableEqCase x✝ y✝ = if h : x✝.ctorIdx = y✝.ctorIdx then isTrue ⋯ else isFalse ⋯

@[instance_reducible]

instance Serbian.instFintypeCase : Fintype Case

Equations

• Serbian.instFintypeCase = { elems := { val := ↑Serbian.Case.enumList, nodup := Serbian.Case.enumList_nodup }, complete := Serbian.instFintypeCase._proof_1 }

def Serbian.instReprCase.repr : Case → ℕ → Std.Format

Equations

• Serbian.instReprCase.repr Serbian.Case.nom prec✝ = Repr.addAppParen (Std.Format.nest (if prec✝ ≥ 1024 then 1 else 2) (Std.Format.text "Serbian.Case.nom")).group prec✝
• Serbian.instReprCase.repr Serbian.Case.voc prec✝ = Repr.addAppParen (Std.Format.nest (if prec✝ ≥ 1024 then 1 else 2) (Std.Format.text "Serbian.Case.voc")).group prec✝
• Serbian.instReprCase.repr Serbian.Case.acc prec✝ = Repr.addAppParen (Std.Format.nest (if prec✝ ≥ 1024 then 1 else 2) (Std.Format.text "Serbian.Case.acc")).group prec✝
• Serbian.instReprCase.repr Serbian.Case.gen prec✝ = Repr.addAppParen (Std.Format.nest (if prec✝ ≥ 1024 then 1 else 2) (Std.Format.text "Serbian.Case.gen")).group prec✝
• Serbian.instReprCase.repr Serbian.Case.dat prec✝ = Repr.addAppParen (Std.Format.nest (if prec✝ ≥ 1024 then 1 else 2) (Std.Format.text "Serbian.Case.dat")).group prec✝
• Serbian.instReprCase.repr Serbian.Case.inst prec✝ = Repr.addAppParen (Std.Format.nest (if prec✝ ≥ 1024 then 1 else 2) (Std.Format.text "Serbian.Case.inst")).group prec✝
• Serbian.instReprCase.repr Serbian.Case.loc prec✝ = Repr.addAppParen (Std.Format.nest (if prec✝ ≥ 1024 then 1 else 2) (Std.Format.text "Serbian.Case.loc")).group prec✝

@[instance_reducible]

instance Serbian.instReprCase : Repr Case

Equations

• Serbian.instReprCase = { reprPrec := Serbian.instReprCase.repr }

def Serbian.Case.label : Case → _root_.Case

The comparative value a case is named for.

Equations

• Serbian.Case.nom.label = Case.nom
• Serbian.Case.voc.label = Case.voc
• Serbian.Case.acc.label = Case.acc
• Serbian.Case.gen.label = Case.gen
• Serbian.Case.dat.label = Case.dat
• Serbian.Case.inst.label = Case.inst
• Serbian.Case.loc.label = Case.loc