代码是用F77编写的,使用save语句和数据结构。我不能简单地删除它们,而且代码很长,需要对每个代码进行编辑和修改。我的代码需要运行多个这样的集成,因此我想使用openmp来并行化代码。有没有办法让这些代码是线程安全的?我已经将所有函数和子例程设为递归,并将子例程的所有输入变量设为private/firstprivate,但这没有帮助。任何帮助都是非常感谢的。如果有任何其他线程安全的替代方案,那也很好。program main
!在我
array A by using parallel do in another way is', b
我在上面编写了一段Fortran代码来实现OpenMP,以三种不同的方式总结8*8数组中的所有元素。其次,我创建了一个包含8个元素的一维数组。我在平行区域总结每一列,然后对它们进行总结。这也很管用。第三,我使用一个整数来总结数组中的每个元素,并将其放置在并行do区域。这个结果是不正确的,每次都有变化。我不明白为什么会发生这种情况。是因为没有指定公共和私有变量,