m@main=getLine>>=putStrLn.foldr(\a b->'<':a++'>':b++"</"++a++">")"".words.filter(/='>')>>m