theorem MurderCase.mk.injEq
theorem MurderCase.mk.injEq
: ∀ (murder : fsp3fese.Murder) (murderer victim : fsp3fese.Person) (punishment : fsp3fese.PunishmentSpecification)
  (murders_in : fsp3fese.MurdersIn (Subtype.val murderer) (Subtype.val victim) (Subtype.val murder))
  (deserved_punishment :
    fsp3fese.DeservesPunishmentFor (Subtype.val murderer) (Subtype.val murder) (Subtype.val punishment))
  (murder_1 : fsp3fese.Murder) (murderer_1 victim_1 : fsp3fese.Person) (punishment_1 : fsp3fese.PunishmentSpecification)
  (murders_in_1 : fsp3fese.MurdersIn (Subtype.val murderer_1) (Subtype.val victim_1) (Subtype.val murder_1))
  (deserved_punishment_1 :
    fsp3fese.DeservesPunishmentFor (Subtype.val murderer_1) (Subtype.val murder_1) (Subtype.val punishment_1)),
  (fsp3fese.MurderCase.mk murder murderer victim punishment murders_in deserved_punishment =
      fsp3fese.MurderCase.mk murder_1 murderer_1 victim_1 punishment_1 murders_in_1 deserved_punishment_1) =
    (murder = murder_1 ∧ murderer = murderer_1 ∧ victim = victim_1 ∧ punishment = punishment_1)