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