С
Size: a a a
С
А⚙
Т8
Т8
С
С
А⚙
Т8
С
ML
А⚙
s/(\b -> if b then Just (h:|tl) else Nothing)/bool Nothing (Just $ h :| tl)/
m
А⚙
ML
ML
С
Т8
С
ML
А⚙
mainWorker = fmap joinвот так этот код приобретает более-менее читаемый вид более
$ for (nonEmpty args) justIfScriptValid
where
justIfScriptValid nel@(h :| _) =
bool Nothing (Just nel) <$> CmdRun.validScript h