Behavioral engineering: the reduction of smoking behavior by a conditioning apparatus and procedure.