excelsior-return.cql

// Download excelsior-return.cql
// PGN output when run on sample.pgn

/*****
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