forced-moves-either-side.cql

// Download forced-moves-either-side.cql
// PGN output when run on sample.pgn

/*********
Find games with the longest sequence of consecutive forced moves
*********/

cql(input hhdbvi.pgn)
sort "most forced moves"
 ⊢ ◎ if wtm A else a nestban
   -- {parent:countmoves legal -- == 1}
      {10,}