pns q r = res
    where
        res = ProofNumberSearch.proofNumberSearch t q board
        t = BitBoard.turn board
        board = BitBoard.fromString r
pns q r = res
    where
        res = ProofNumberSearch.proofNumberSearch t q board
        t = BitBoard.turn board
        board = BitBoard.fromString r
pns q r = res
    where
        res = ProofNumberSearch.proofNumberSearch t q board
        t = BitBoard.turn board
        board = BitBoard.fromString r