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).