Christopher Armstrong radix
roman
/ Example.hs
Created
June 11, 2015 20:35
Example on how to create constrained functions for particular ADT constructors in Haskell using GADTs, DataKinds and KindSignatures extension
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| {-# LANGUAGE DataKinds #-} | |
| {-# LANGUAGE KindSignatures #-} | |
| {-# LANGUAGE GADTs #-} | |
| module Main where | |
| data UserType | |
| = VirtualUser | |
| | RealUser | |
| data User (userType :: UserType) where |