Removed unused constants and procedures.