diff --git a/tugas.f b/tugas.f index f7697aa..3d52169 100644 --- a/tugas.f +++ b/tugas.f @@ -78,11 +78,13 @@ C C cpu0=dtime(time0) t1=omp_get_wtime() + !$OMP PARALLEL DO C C Jacobi iteration call jacobi(nn,gosa) C cpu1= dtime(time1) + !$OMP END PARALLEL DO t2=omp_get_wtime() cpu = cpu1 cpu = t2-t1