Local Arguments update {_} {_} _ _ _ _ _ : simpl never.
Class PrimaryBackupParams (base_params : BaseParams) :=
{
input_eq_dec : forall x y : input, {x = y} + {x <> y}
}.
Section PrimaryBackup.
Context {base_params : BaseParams}.
Context {one_node_params : OneNodeParams base_params}.
Context {pb_params : PrimaryBackupParams base_params}.
Inductive name := Primary | Backup.

(* Specifications: *)
Lemma name_eq_dec : forall x y : name, {x = y} + {x <> y}.
Proof using.