The Mathematica package OrientedSwaps is a companion package to the 2019 paper "Staircase Young tableaux, sorting networks and last passage percolation", by E. Bisi, F. D. Cunden, S. Gibbons and D. Romik. Proceedings of the 32nd Conference on Formal Power Series and Algebraic Combinatorics (FPSAC 2020).
To download the package file orientedswaps.m, click here (10 KB file).
You can also download a Mathematica notebook illustrating the use of the package, and a PDF printout of the same notebook.