untypeExpr' (Attached typ e asName)
  = E.Attached typ (untypeExpr e) asName
untypeExpr' (Attached typ e asName)
  = E.Attached typ (untypeExpr e) asName
untypeExpr' (Attached typ e asName)
  = E.Attached typ (untypeExpr e) asName