gabrielkheisa/tugas3-openMP
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

test pertama

Browse Source
This commit is contained in:
gabrielkheisa 2022-11-26 21:48:31 +07:00
parent 14c81448af
commit 191a12372b
1 changed files with 2 additions and 0 deletions

2
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