cases H:SSAEnv.get name ty env <;> simp
α₁ σ₁ : Type
ε₁ : σ₁ → Type
δ₁ : Dialect α₁ σ₁ ε₁
α₂ σ₂ : Type
ε₂ : σ₂ → Type
δ₂ : Dialect α₂ σ₂ ε₂
α σ : Type
ε : σ → Type
Δ : Dialect α σ ε
env : SSAEnv Δ
ty : MLIRType Δ
name : SSAVal
⊢ (match SSAEnv.get name ty env with
      | some v => fun s => Except.ok (v, s)
      | none => fun s => Except.ok (default, s))
      env =
    Except.ok
      (match SSAEnv.get name ty env with
        | some v => v
        | none => default,
        env)
no goals