WSL(100,c(3,7,13));
WPL(100,c(3,7,13));
WDL(100,c(3,7,13));
WSL2(100,c(3,7));
WSL2(100,c(3,13));
WSL2(100,c(13,7));
WFL2(100,c(3,7));
WDL2(101,c(3,7));
bWSL(100,c(3,7,13));
bWFL(100,c(3,7,13));
bWDL(101,c(3,7,13));
Run the code above in your browser using DataLab