Function compruebaFilaRecursivo(board:TSudokuBoard; fila:integer; columna:integer; actual:integer) : Boolean;
Begin
    if (columna=9) then
        compruebaFilaRecursivo := compruebaFilaRecursivo(board, fila, 1, actual+1);
    if (actual=9) && (columna=9) then
        compruebaFilaRecursivo := board.SudokuParcial[fila, actual] = board.SudokuParcial[fila,columna];
    else
        compruebaFilaRecursivo := (board.SudokuParcial[fila,actual] = board.SudokuParcial[fila,columna]) and compruebaFilaRecursivo(board, fila, columna+1, actual);
End;