module B where b :: ()