An algorithm and codes for fast computations of the opposition effects in a semi-infinite discrete random medium. (November 2020)