https://sheremetov.com/programming/erlang-exercises-4/