Flooding in vivo as research tool and treatment method for phobias: a preliminary report.