@@ -11,5 +11,9 @@ Literate main program
11> main = do { putStrLn (show (strHead st));
11> main = do { putStrLn (show (strHead st));
12> putStrLn (show (strIndex st 3));
12> putStrLn (show (strIndex st 3));
13> putStrLn (strCons 'z' st);
13> putStrLn (strCons 'z' st);
14−> putStrLn (rev st); };
14+> putStrLn (rev st);
16+> putStrLn (show (rev x));