Add set-animation procedure.