(= s'(" /\\""/__\\"))(for x 2(read)(= s(+(map[+""(n-of len.s" ")_]s)(map[+ _(cut _ 0(pos ~whitec _))_]s))))(map prn s)