module D where d :: Int d = 3