Existential types are not really considered bad practice in functional programming. I think what's tripping you up is that one of the most commonly cited uses for existentials is the existential typeclass antipattern, which many people do believe is bad practice.
This pattern is often trotted out as a response to the question of how to have a list of heterogeneously typed elements that all implement the same typeclass. For example, you may want to have a list of values that have Show
instances:
{-# LANGUAGE ExistentialTypes #-}
class Shape s where
area :: s -> Double
newtype Circle = Circle { radius :: Double }
instance Shape Circle where
area (Circle r) = pi * r^2
newtype Square = Square { side :: Double }
area (Square s) = s^2
data AnyShape = forall x. Shape x => AnyShape x
instance Shape AnyShape where
area (AnyShape x) = area x
example :: [AnyShape]
example = [AnyShape (Circle 1.0), AnyShape (Square 1.0)]
The problem with code like this is this:
- The only useful operation you can perform on an
AnyShape
is to get its area.
- You still need to use the
AnyShape
constructor to bring one of the shape types into the AnyShape
type.
So as it turns out, that piece of code doesn't really get you anything that this shorter one doesn't:
class Shape s where
area :: s -> Double
newtype Circle = Circle { radius :: Double }
instance Shape Circle where
area (Circle r) = pi * r^2
newtype Square = Square { side :: Double }
area (Square s) = s^2
example :: [Double]
example = [area (Circle 1.0), area (Square 1.0)]
In the case of multi-method classes, the same effect can be generally accomplished more simply by using a "record of methods" encoding—instead of using a typeclass like Shape
, you define a record type whose fields are the "methods" of the Shape
type, and you write functions to convert your circles and squares into Shape
s.
But that doesn't mean that existential types are a problem! For example, in Rust they have a feature called trait objects that people often describe as an existential type over a trait (Rust's versions of type classes). If existential typeclasses are an antipattern in Haskell, does that mean that Rust picked a bad solution? No! The motivation in the Haskell world is about syntax and convenience, not really about principle.
A more mathematical way of putting this is pointing out that the AnyShape
type from above and Double
are isomorphic—there is a "lossless conversion" between them (well, save for floating point precision):
forward :: AnyShape -> Double
forward = area
backward :: Double -> AnyShape
backward x = AnyShape (Square (sqrt x))
So strictly speaking, you're not gaining or losing any power by choosing one vs. the other. Which means the choice should be based on other factors like ease of use or performance.
And keep in mind that existential types have other uses outside of this heterogeneous lists example, so it's good to have them. For example, Haskell's ST
type, which allows us to write functions that are externally pure but internally use memory mutation operations, uses a technique based on existential types in order to guarantee safety at compilation-time.
So the general answer is that there's no general answer. Uses of existential types can only be judged in context—and the answers may be different depending on what features and syntax are provided by different languages.