A runs-test algorithm: contingent reinforcement and response run structures.