.m file for S-Random Interleaver design

[Farzad.talebi]

Hi

I need an efficient .m file for designing S-Random Interleavers.
I wrote one, but it did not converge for L=1024 & S=15.

Thanks