induction e <;> simp [rcns] at h <;> try cases ‹_ ∨ _›
α : Type
inst✝ : Hierarchical α
s₁ s₂ : State α
rcn : ID
e : s₁ ↓ᵢ+ s₂
h : rcn ∈ rcns e
⊢ rcn ≮[s₁.rtr] rcn
case single
α : Type
inst✝ : Hierarchical α
s₁ s₂ : State α
rcn : ID
s₁✝ s₂✝ : State α
a✝ : s₁✝ ↓ᵢ s₂✝
h : rcn = Execution.Instantaneous.Step.rcn a✝
⊢ rcn ≮[s₁✝.rtr] rcn

case trans.inl
α : Type
inst✝ : Hierarchical α
s₁ s₂ : State α
rcn : ID
s₁✝ s₂✝ s₃✝ : State α
a✝¹ : s₁✝ ↓ᵢ s₂✝
a✝ : s₂✝ ↓ᵢ+ s₃✝
a_ih✝ : rcn ∈ rcns a✝ → rcn ≮[s₂✝.rtr] rcn
h✝ : rcn = Execution.Instantaneous.Step.rcn a✝¹
⊢ rcn ≮[s₁✝.rtr] rcn

case trans.inr
α : Type
inst✝ : Hierarchical α
s₁ s₂ : State α
rcn : ID
s₁✝ s₂✝ s₃✝ : State α
a✝¹ : s₁✝ ↓ᵢ s₂✝
a✝ : s₂✝ ↓ᵢ+ s₃✝
a_ih✝ : rcn ∈ rcns a✝ → rcn ≮[s₂✝.rtr] rcn
h✝ : rcn ∈ rcns a✝
⊢ rcn ≮[s₁✝.rtr] rcn