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