{P : Sort u} →
  {a : Turing.ToPartrec.Code} →
    {a_1 : Turing.PartrecToTM2.Cont'} →
      {a' : Turing.ToPartrec.Code} →
        {a'_1 : Turing.PartrecToTM2.Cont'} →
          Turing.PartrecToTM2.Cont'.cons₁ a a_1 = Turing.PartrecToTM2.Cont'.cons₁ a' a'_1 →
            (a = a' → a_1 = a'_1 → P) → P