An ethoexperimental approach to the study of fear