;;look for queen-bishop bristols ;; (match :pgn heijden.pgn :output out.pgn (position :sequence ((position :movefrom Bd4 Q[c3,e3,e5,c5] :shift) (position) (position :movefrom Q :raydiagonal (B Q)) (position Bd4 Q[c3,e4,e5,c5] :shift) ) ) )