theorem MurderCase.mk.inj
theorem MurderCase.mk.inj
: ∀ {murder : xxzf15qm.Murder} {murderer victim : xxzf15qm.Person} {punishment : xxzf15qm.PunishmentSpecification}
  {murders_in : xxzf15qm.MurdersIn (Subtype.val murderer) (Subtype.val victim) (Subtype.val murder)}
  {deserved_punishment :
    xxzf15qm.DeservesPunishmentFor (Subtype.val murderer) (Subtype.val murder) (Subtype.val punishment)}
  {murder_1 : xxzf15qm.Murder} {murderer_1 victim_1 : xxzf15qm.Person} {punishment_1 : xxzf15qm.PunishmentSpecification}
  {murders_in_1 : xxzf15qm.MurdersIn (Subtype.val murderer_1) (Subtype.val victim_1) (Subtype.val murder_1)}
  {deserved_punishment_1 :
    xxzf15qm.DeservesPunishmentFor (Subtype.val murderer_1) (Subtype.val murder_1) (Subtype.val punishment_1)},
  xxzf15qm.MurderCase.mk murder murderer victim punishment murders_in deserved_punishment =
      xxzf15qm.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