Haskell Curried Value Constructor

A Curried version of a Haskell Value Constructor.

data BTree a = Empty | Node (a, BTree a, BTree a)
-- curried:
data BTree a = Empty | Node a (BTree a) (BTree a)