==================== Parser ==================== module Hi where data Hi where -- | This is a GADT constructor. Hi :: () -> Hi