/* S R _ R E D U C E . H */ extern strength_reduction(); /* (loop_p loop; lset ivs, vars) * Perform streength reduction. */