SEARCH FOR CARBON MONOXIDE IN THE ATMOSPHERE OF THE TRANSITING EXOPLANET HD 189733b