intro :: IO ()
intro = do  putStrLn "********************"
            putStrLn "**  DOTS & BOXES! **"
            putStrLn "********************"
            putStrLn ""
            putStrLn "How to play:"
            putStrLn "- Each turn you have to specify the line you want to draw"
            putStrLn "- Each line is defined by the starting point and the direction of the line"
            putStrLn "- Each point it's defined as two integers indicating it's coordinates"
            putStrLn "- The coordinates of the board start at (0,0) in the upper left corner"
            putStrLn "- The direction of the line could be horizontal (h) or vertical (v) (in lowercase)"
            putStrLn "- Input example: 1 0 v (vertical line starting at coordinate (1,0))"
            putStrLn "- When a player completes a box, he moves again"
            putStrLn "- The game ends when all the boxes are completed"
            putStrLn ""
            example
intro :: IO ()
intro = do  putStrLn "********************"
            putStrLn "**  DOTS & BOXES! **"
            putStrLn "********************"
            putStrLn ""
            putStrLn "How to play:"
            putStrLn "- Each turn you have to specify the line you want to draw"
            putStrLn "- Each line is defined by the starting point and the direction of the line"
            putStrLn "- Each point it's defined as two integers indicating it's coordinates"
            putStrLn "- The coordinates of the board start at (0,0) in the upper left corner"
            putStrLn "- The direction of the line could be horizontal (h) or vertical (v) (in lowercase)"
            putStrLn "- Input example: 1 0 v (vertical line starting at coordinate (1,0))"
            putStrLn "- When a player completes a box, he moves again"
            putStrLn "- The game ends when all the boxes are completed"
            putStrLn ""
            example
intro = do  putStrLn "********************"
            putStrLn "**  DOTS & BOXES! **"
            putStrLn "********************"
            putStrLn ""
            putStrLn "How to play:"
            putStrLn "- Each turn you have to specify the line you want to draw"
            putStrLn "- Each line is defined by the starting point and the direction of the line"
            putStrLn "- Each point it's defined as two integers indicating it's coordinates"
            putStrLn "- The coordinates of the board start at (0,0) in the upper left corner"
            putStrLn "- The direction of the line could be horizontal (h) or vertical (v) (in lowercase)"
            putStrLn "- Input example: 1 0 v (vertical line starting at coordinate (1,0))"
            putStrLn "- When a player completes a box, he moves again"
            putStrLn "- The game ends when all the boxes are completed"
            putStrLn ""
            example