(map print(do[(a'(" /\\""/__\\")`(,@(map(rec,s(format"~va~a"(length a)""s))a),@(map(rec,s #`",s,((#/ */s)),s")a)))(n(read))]((<(dec! n)1)a)))