module A where a :: ()