*DECK COMLIST 
PROC COMLIST; 
# TITLE COMLIST - RHF COMMON DECK LISTING.  # 
  
      BEGIN  # COMLIST #
  
*CALL COMCBEGN
  
  
*CALL COMRAPL 
*CALL COMRDSDL
*CALL COMREVNT
*CALL COMRNET 
*CALL COMRNDR 
*CALL COMRQUE 
*CALL COMRSFC 
*CALL COMRSSC 
*CALL COMRSTAT
*CALL COMRNAM 
*CALL COMRLRA 
*CALL COMRRTN 
*CALL COMRRHH 
*CALL COMRCON 
*CALL COMRMEM 
*CALL COMRUNKN
*CALL COMRFLSH
  
      END  # COMLIST #
  
      TERM
