Just playing around with Pascal.