From d13eb4076c4c2ecd537fb95756ece4c1706bcd4a Mon Sep 17 00:00:00 2001 From: gabrielkheisa Date: Mon, 14 Nov 2022 16:08:59 +0700 Subject: [PATCH] fix code --- tugas3.f90 | 1 + 1 file changed, 1 insertion(+) diff --git a/tugas3.f90 b/tugas3.f90 index 52f2bf4..1c3ecad 100644 --- a/tugas3.f90 +++ b/tugas3.f90 @@ -20,6 +20,7 @@ use omp_lib end do end do end do + t2 = omp_get_wtime() !$OMP end parallel do write(6,60) 'Execution Time = ', t2-t1, ' sec','A(n,n) = ',a(n,n) 60 format(1x,a,f10.3,a,1x,a,d24.15)