added animated shaffer procedure