read `ResPerms.txt`: K:=60: print(`The first`, K, `terms of the sequence enumerating permutations of length n such that |pi[i+2]-pi[i]| is never 2 are`): print(``): lprint([seq(Vrr(2,i),i=1..K)]): print(``): print(`---------------------------------`): print(``): print(`This took`, time(), `seconds. `): quit: