需要帮助将函数从C ++移植到Ocaml

Question

我在C ++中有以下功能代码

bool SolveSudoku(int grid[N][N])
{
int row, col;

if (!FindUnassignedLocation(grid, row, col))
   return true;

for (int num = 1; num <= 9; num++)
{
    if (isSafe(grid, row, col, num))
    {
         grid[row][col] = num;
         if (SolveSudoku(grid))
            return true;

         grid[row][col] = UNASSIGNED;
    }
}
return false;
}

我在这里遇到的问题是，在if语句中，我需要先执行一个操作，然后返回一个布尔值。并且Ocaml在这种方式中没有帮助，在同一个if语句中使用不同的返回值。

Answer 1

查看数据库OCaml版本的源代码：

https://github.com/VictorNicollet/99-Problems-OCaml/blob/master/91-99/p97.ml