Added routine to correct for the sdist derived from tracing (sprat_red_correct_sdist, spcorrect).