Coronary Artery Spasm in Intact Dogs Induced by Potassium and Serotonin