doc-src/Tutorial/Misc/Tree.thy

removed prs / prs_fn (broken, because it did not include \n in its
semantics, forcing writeln to add one uncoditionally);
replaced prs_fn by writeln fn;

Tree = Main +
datatype 'a tree = Tip | Node ('a tree) 'a ('a tree)
end