Example

       ...
       MAP 
              CHARACTER *16 MAJOR 
       END MAP 
       ...