Operant conditioning of vasoconstriction.