have a := e.apply
α : Type
inst✝ : Hierarchical α
s₁ s₂ : State α
i : ID
e : s₁ ↓ₑ s₂
hi : i ≮[s₁.rtr]≯ rcn e
⊢ Allows s₁ i ↔ Allows s₂ i
α : Type
inst✝ : Hierarchical α
s₁ s₂ : State α
i : ID
e : s₁ ↓ₑ s₂
hi : i ≮[s₁.rtr]≯ rcn e
a : s₁ -[output s₁ (rcn e)]→ (applied e)
⊢ Allows s₁ i ↔ Allows s₂ i