Algorithm 25