r spiral added