../../Task/Ternary-logic/Haskell