case rtr =>
  apply hi n₁ ⟨_, hc₁⟩ $ Equivalent.get?_rtr_some_equiv e hc₁ hc₂
  intro c _ _ _ ho₁ ho₂
  exact h (obj?_some_nested hc₁ ho₁) (obj?_some_nested hc₂ ho₂)
α : Type
inst✝ : Proper α
rtr₁ : α
hi :
  ∀ (n : Component.type α Component.rtr),
    (∃ i, rtr₁{Component.rtr}{i} = some n) →
      ∀ {rtr₂ : α},
        n ≈ rtr₂ →
          (∀ {c : Component.Valued} {i : Component.idType (Component.val c)}
              {o₁ o₂ : Component.type α (Component.val c)},
              n[Component.val c][i] = some o₁ → rtr₂[Component.val c][i] = some o₂ → o₁ = o₂) →
            n = rtr₂
rtr₂ : α
e : rtr₁ ≈ rtr₂
h :
  ∀ {c : Component.Valued} {i : Component.idType (Component.val c)} {o₁ o₂ : Component.type α (Component.val c)},
    rtr₁[Component.val c][i] = some o₁ → rtr₂[Component.val c][i] = some o₂ → o₁ = o₂
i : ID
n₁ : Component.type α Component.rtr
hc₁ : rtr₁{Component.rtr}{i} = some n₁
n₂ : Component.type α Component.rtr
hc₂ : rtr₂{Component.rtr}{i} = some n₂
⊢ n₁ = n₂
no goals