algol68 source #1