*DECK CMMKIL
          IDENT  CMM.KIL
  
*CALL KIL 
          END 
