Tool for plan duty (experiment for learning Haskell)