Evaluated join [map [explode tuvwxyz] {x {pnoun $x; wnoun $x; . $x: added [llength $::temp]}}] \n