tbc/oeis-a316587

code to calculate OEIS A316587