我有一个 fortran 90 代码，它使用 MPI 将计算块（来自矩阵）分配到集群中的多个节点，但在每个节点中，for 循环使用 openmp 并行执行。我尝试使用以下命令：

mpif90 mycode.f

产生以下输出：

mycode.f(49): (col. 3) remark: LOOP WAS VECTORIZED.
mycode.f(68): (col. 4) remark: PARTIAL LOOP WAS VECTORIZED.
mycode.f(83): (col. 2) remark: LOOP WAS VECTORIZED.
mycode.f(92): (col. 2) remark: LOOP WAS VECTORIZED.
mycode.f(105): (col. 2) remark: LOOP WAS VECTORIZED.
mycode.f(114): (col. 2) remark: LOOP WAS VECTORIZED.
/tmp/ifortAPx6mR.o: In function `MAIN__':
mycode.f:(.text+0x1f2): undefined reference to `omp_set_num_threads_'

我假设问题是我需要在omp_set_num_threads_某处设置一个调用的参数，但我不确定在哪里。任何帮助将不胜感激。谢谢。