Pascal from Basic - Brown, P. J. (Addison-Wesley, 1982)