From b0e602d3c56f709eab00a9c3176c1a16ecf3001d Mon Sep 17 00:00:00 2001 From: gabrielkheisa Date: Sun, 27 Nov 2022 12:15:24 +0700 Subject: [PATCH] fix typo --- tugas.f | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/tugas.f b/tugas.f index 3d52169..cf86762 100644 --- a/tugas.f +++ b/tugas.f @@ -77,7 +77,7 @@ C write(*,*) ' Measure the performance in 10000 times.' C cpu0=dtime(time0) - t1=omp_get_wtime() + t1 = omp_get_wtime() !$OMP PARALLEL DO C C Jacobi iteration @@ -85,7 +85,7 @@ C Jacobi iteration C cpu1= dtime(time1) !$OMP END PARALLEL DO - t2=omp_get_wtime() + t2 = omp_get_wtime() cpu = cpu1 cpu = t2-t1 flop=real(kmax-2)*real(jmax-2)*real(imax-2)*34.0*real(nn)