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

fix indentation

Browse Source
This commit is contained in:
gabrielkheisa 2022-11-27 13:18:52 +07:00
parent ffb5fde8a1
commit ea92213edc
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
tugas.f
View File

@ -85,7 +85,7 @@ C
! cpu1= dtime(time1) ! cpu1= dtime(time1)
t2 = omp_get_wtime() t2 = omp_get_wtime()
! cpu = cpu1 ! cpu = cpu1
cpu = t2-t1 cpu = t2-t1
flop=real(kmax-2)*real(jmax-2)*real(imax-2)*34.0*real(nn) flop=real(kmax-2)*real(jmax-2)*real(imax-2)*34.0*real(nn)
xmflops2=flop/cpu*1.0e-6 xmflops2=flop/cpu*1.0e-6
write(*,*) ' MFLOPS:',xmflops2,' time(s):',cpu,gosa write(*,*) ' MFLOPS:',xmflops2,' time(s):',cpu,gosa