An automatic poem generator