Work on wopr introduction.ush