This program procedure accepts pairs of strings on successive lines. It diagrams all the intersections of the two strings in a common character.