/***** This file finds games with an excelsior where the promoted piece returns to its original square ********/ cql(input hhdbvi.pgn ) initial S=∙ ◭E∊♙a-h2 ∪ ♟a-h7 find E――S:E