时间函数 rea1(8)::t0,t1 Fortran t0=omp_get_wtime() ..work to be timed... t1=omp_get_wtime() print *"Work took",t1-t0,"seconds" double t0,t1; C/C++ t0=omp_get_wtime(); ..work to be timed t1=omp_get_wtime(); printf("Work took %f seconds\n",t1-t0); http://math.ecnu.edu.cn/-jypan 19http://math.ecnu.edu.cn/~jypan 19 时间函数 real(8) :: t0, t1 t0=omp_get_wtime() ... work to be timed ... t1=omp_get_wtime() print *, "Work took", t1-t0, "seconds" double t0, t1; t0=omp_get_wtime(); ... work to be timed ... t1=omp_get_wtime(); printf("Work took %f seconds\n", t1-t0); Fortran C/C++