@krkm ну первый -- самый "в лоб". Можно ещё без выебонов расписать как в жс
```
case msite of
Just site ->
```
и
```
case madId of
Just adId ->
```
тогда ещё вложеннее будет, зато новичкам понятнее. Но тут всего один человек на проекте (я), потому вот думаю.
@ulidtko Это типа как паттерны в джаве в хаскеле, практикующий функциональный петух должен понимать, что `(,) <$> Just 5 <*> Just 6` даёт `Just (5,6)`, а если хоть один из них `Nothing` -- даст `Nothing` (знаю что ты знаешь).