I need to generate a list of numbers, which contains of `500` numbers that `div 23 x == 7`, (where `x` is a number), starting from the `51` such number. I do not know how to finish my programm, so I'd be very happy if anybody could help me. Program cannot take arguments, I mean for example `required xs` is not allowed.

```
required
   = do
      putStr "Required list is: "
      print [c x m n | c <- what goes here?, x <- [1 ..], div 23 x == 7, n <= 500 && m >= 51]

```