The routine MAP uses a real array A to store both real and character data. The character data is in the form of Hollerith constants. Both need updating.