Alternative solution for P25 attempting functional perfect shuffle

Based on:http://okmij.org/ftp/Haskell/perfect-shuffle.txt