A system for evaluative research in behavior therapy.