Open Scope string_scope.
Instance vard_pbj_params : PrimaryBackupParams vard_base_params :=
{
input_eq_dec := VarD.input_eq_dec
}.

Theorem lifting_applied :
forall (net : @network _ PB_multi_params) tr,
step_async_star step_async_init net tr ->
trace_correct (revert_trace (base_params := vard_base_params) tr).