d*e
发帖数: 109 | 1 请教为何多线程执行起来花费时间比单线程要多呢？
非常感谢～
问题如下：
函数是用MONT CARLO方法计算圆周率。单线程计算函数两次共耗费大约是97；而两个线
程分别计算函数一次耗费的时间是392.
环境：
CPU: i7920 4核
操作系统：Windows Vista
编译器:Fortran 90
程序如下：
多线程主程序：
Program TESTPROC0
use ifqwin
use dfmt
use threadfunction
implicit none
integer,parameter::n_thread=2,n_c=2
integer(INT_PTR_KIND())::Threads_Handle(n_thread),waitresult,cend,retlog,
retint,&
thread_handle_1,thread_handle_2
integer(INT_PTR_KIND()), PARAMETER :: security = 0
integer(INT_PTR_KIND()), PARAMETE | h**********c
发帖数: 4120 | 2 顶一个fortan多线程,
看人这是真来讨论学问的,
哪象我这样的,一瓶子不装不下,两瓶子还装不下. |
|
