Альтернатива для устаревшего -XDatatypeContext?

Позволять'скажем, я хочу определить дерево следующим образом:

{-# LANGUAGE DatatypeContexts #-}
class Node a where
  getContent :: (Num a) => a

data (Node a) => Tree a = Leaf a
                        | Branch a (Tree a) (Tree a)

-XDatatypeContexts устарела. Можно ли сделать что-то подобное без него?

Ответы на вопрос(1)

Ваш ответ на вопрос