hoge n = [(x,y) | x <- [-n .. n], y <- [-n .. n]]

この関数をリスト内包表記を使わずに書くなら、どう書けますか？