need to filter and make lisk in haskell
I need to write a function that returns a list of adjacent cells
I already wrote a function that checks if two coordinates are adjacent or not.

    getAdj :: Coord -> World -> [Cell]

    type World = [Cell]
    data Cell = Cell {cellCoord :: Coord, cellState :: CellState}
    deriving (Show, Read)
    data Coord = Coord {xCoord, yCoord :: Integer}
    deriving (Ord, Eq, Show, Read)
need to filter and make lisk in haskell
===

I need to write a function that returns a list of adjacent cells
I already wrote a function that checks if two coordinates are adjacent or not.

    getAdj :: Coord -> World -> [Cell]

    type World = [Cell]
    data Cell = Cell {cellCoord :: Coord, cellState :: CellState}
    deriving (Show, Read)
    data Coord = Coord {xCoord, yCoord :: Integer}
    deriving (Ord, Eq, Show, Read)