Evaluated proc nagger {} {. [acr [?? $::adjectives(n)]] [acr [?? $::adjectives(a)]] [acr [?? $::adjectives(g)]] [acr [?? $::adjectives(g)]] [acr [?? $::adjectives(e)]] [acr [regsub y$ [?? $::nouns(r)] ie]]s}