From fa5d7b21051b65262e1de543105be0ae3291d26f Mon Sep 17 00:00:00 2001 From: gabrielkheisa Date: Sat, 26 Nov 2022 21:28:20 +0700 Subject: [PATCH] add pdf and zip --- README.md | 61 --------------------------------------------- a.out | Bin 13560 -> 0 bytes graph.html | 46 ---------------------------------- no_reduction.f90 | 15 ----------- no_reduction.sh | 12 --------- no_reduction.x | Bin 13264 -> 0 bytes slurm-16206.out | 4 --- slurm-16207.out | 4 --- slurm-16208.out | 4 --- slurm-16209.out | 4 --- slurm-16210.out | 4 --- slurm-16212.out | 4 --- slurm-16213.out | 4 --- tugas3.f90 | 29 --------------------- tugas3.sh | 13 ---------- tugas3_16thread.sh | 13 ---------- tugas3_1thread.sh | 13 ---------- tugas3_2thread.sh | 13 ---------- tugas3_32thread.sh | 13 ---------- tugas3_4thread.sh | 13 ---------- tugas3_64thread.sh | 13 ---------- tugas3_8thread.sh | 13 ---------- with_reduction.f90 | 15 ----------- with_reduction.sh | 12 --------- with_reduction.x | Bin 13272 -> 0 bytes 25 files changed, 322 deletions(-) delete mode 100644 README.md delete mode 100755 a.out delete mode 100644 graph.html delete mode 100644 no_reduction.f90 delete mode 100644 no_reduction.sh delete mode 100755 no_reduction.x delete mode 100644 slurm-16206.out delete mode 100644 slurm-16207.out delete mode 100644 slurm-16208.out delete mode 100644 slurm-16209.out delete mode 100644 slurm-16210.out delete mode 100644 slurm-16212.out delete mode 100644 slurm-16213.out delete mode 100644 tugas3.f90 delete mode 100644 tugas3.sh delete mode 100644 tugas3_16thread.sh delete mode 100644 tugas3_1thread.sh delete mode 100644 tugas3_2thread.sh delete mode 100644 tugas3_32thread.sh delete mode 100644 tugas3_4thread.sh delete mode 100644 tugas3_64thread.sh delete mode 100644 tugas3_8thread.sh delete mode 100644 with_reduction.f90 delete mode 100644 with_reduction.sh delete mode 100755 with_reduction.x diff --git a/README.md b/README.md deleted file mode 100644 index e99b4c0..0000000 --- a/README.md +++ /dev/null @@ -1,61 +0,0 @@ -

-Gabriel Possenti Kheisa Drianasta
-19/442374/PA/19123 -

- - -

Hasil Tugas OpenMP

-

Pengujian terhadap 1, 2, 4, 8, 16, 32, hingga 64 thread

-

Hasil

-

Matrix size: 4096

- -
-

Waktu (detik)

- - -

Selisih waktu terhadap jumlah core sebelumnya (detik)

- - -

-

Pertanyaan

-

1. What is the maximum speed up compared to single thread -execution?

-

Dengan menghitung perbandingan selisih waktu yang di dapat antara 1 thread dengan 2 thread, yakni ( 227 / 115 ) detik, maka speedup yang di dapat adalah 1.97 kali. Dengan menggunakan rumus perhitungan speedup berikut:

- - - -

Maka program bersifat 98.4% parallel. Dengan persentase berikut,maka, perbandingan performa dengan program yang bersifat parallel sempurna adalah sebagai berikut:

- -
-Parallel 100% = [1, 2, 4, 8, 16, 32, 64]
-Parallel 98.4% = [1, 1.97, 3.8, 7.19, 12.9, 21.4, 31.8]
-
- - - -

Selisih speedup terbesar tampak pada jumlah thread 8 ke 16, sama seperti hasil percobaan sebelumnya, sehingga penambahan jumlah core dari 8, ke 16, ke 32, dan seterusnya menjadi relatif lebih tidak efektif.

- -

2. As we increase the number of threads, the execution time starts to -saturate at one point (cannot get any faster). Explain why this -happens.

- -

Karena program tidak bersifat parallel sempurna (100%). Program bersifat 98.4% parallel, dimana 1.6% bersifat serial. Bagian serial ini merupakan bagian yang tidak dapat dikerjakan secara parallel karena berbagai faktor. Meskipun angka tersebut kecil, selisih speedup dengan program yang dapat dijalankan secara parallel sempurna akan semakin terlihat dengan jumlah core atau thread yang semakin banyak.

- - - - -

3. Find the exact number of threads where saturation begins. What is its relationship with the number of physical cores of the system? -Explain.

- -

Berdasarkan hasil yang terlampir, baik hasil eksperimen maupun perhitungan dengan Hukum Amdahl, 8 thread merupakan jumlah core terbaik karena selisih waktu eksekusi (hasil percobaan) tidak begitu besar, sedangkan selisih speedup (perhitungan menggunakan Hukum Amdahl) sangat besar. Dengan kata lain, 8 thread ke 16 thread dan seterusnya relatif tidak efektif. Hubungan antara jumlah thread program dengan jumlah core adalah berbanding lurus dalam hal speedup dan berbanding terbalik dengan waktu eksekusi, dengan program yang bersifat 100% parallel.

- -
-

Lampiran program dan hasil: https://repo.gabrielkheisa.xyz/gabrielkheisa/tugas3-openMP

\ No newline at end of file diff --git a/a.out b/a.out deleted file mode 100755 index e41d3034431fd15e5d803a0e0ffa9bee7d7f0c3b..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 13560 zcmeHOeQ;dWb-$|*TY$a0CW4r+_(AMMruHJ?FPV&sR@T~2jAT2uM9PPGthFm?TWMF> zeG9S&h^Y|6Mr`6{GK`Z+6Q`XvB-1HwGszg50l8*u=yY1qDa0Mx#H1$O#iA%S0S97l zf9Jk?-oE$zHe@>aE2FDG=*-{q>2u}6l4+U|DFSn2mRd8gr z%7Ao;c5xX#ZxGju1>hSbW|enX1f^CwuS_#-Qg}Tm>9yBcfR|pc9s38reP(|l>0}0qo+@mdubQSC^02j zN;}>(6O{kP63Jdddn{NmWxdZrkJ|a$rmzy+sp_jWE+DU*>(@qdnaHiO-(;U;w{Gi~HPL)4Q?k4nJYiIR_QUU-(Lep{GjFYU@^4F* zzw-0T&%HlOy8IyfTc@X?bfu5<-8JyrYTyyr(0uHCx`zDoHE?Q+pPf8#zjjX5u(PR# zo!4sEc?NcFLYX%$sbT*I5cF$Lx`zD2HSqtfVdrx-@Nd1Gz?4BUyyAYWH>jN%o^Eb ze8hM#n=)a>E{&r!kr_3zsP|H^-2vvz%or-prqV+W)V7{Vo5>;6;;kTOT9A=IC;Su# zhS7!rbo5fyq-kWv%v2_wb11SwCj`NGb|@#uGBY|xlT{1j9dh}RigL42b)&HQrW z>xEpPq<%nrQ=D=^e;PpO|gZry65dYeJu#HtQ-g`oxP($3$h__pZ`JWyRm%GqkJ& zIpT*&t$eD2wBj#_r>QB=NdD`@)0C8_CI1!TX)4NxCI3a@>FZHGB>6ujo~ERHK=S*D zCs!)(mwc9Zn*Q>bnyT{slHWr-O;LG=vat0B4}h1c?d|TuEBEPzpXn2)=XUh<6dP|wTlM1N@1qNPannNd zta8-?*myUztV=>G!Sw6J#v4KPjpy~ko8~nb>bIJ~VyGAIuACZ-gqA%f?e9KDqg>@- zvP^=-bw2~?*H>PIzJBy#y0OW4K zZ?^Cjbm+unD?Z6>Psqm8V4Rpd4GnVrYL80)@N2t+&(T5wPngBGiAGqHwMq5oV3~^E zP(`m+wMg=>!IoaZ$Dkg1WLhu8&Z{XycE-wLTw^D#EIJxHr59r}&%&snSw(fn;fX_- zr_$HS)}+JM9C{X$^*VZd4Jj2H`z^fM<7TnL@uot zpEzHsEMyxF)8DV^lTH^{>H06gmMHxdSosB+m<<;m{A zJ%SovptY^k429Bn(Ol`mFCQc2U09S`^uog@OHV<(aIEyNM2;UJU-{bm9~O?IuxemITgCv;#U zHXGR3JNwX2%0ETd%wh&^az?q{{v043~e)QBLz3`7yvD3&0;6MlD*Ki6B zG$k-Ui)N-`rQa;p(R3~pZa8o*boaE|Bu~w`m>=wI;wLMmNd*v zpd;mVSg7QPP8sk4xd^aAwP+$5nd_kXl+tk`#XZ@bS2R()Nx(e?^E6x9@PaF&A8~-c+7QH*~ z*&V$%x;uJb)Hrsax}Kjq1|Oq$t$e%Eo(3-9NM?R0o?8zk@6%MwwM%F+`N+xby8)<`dY&UT64e!On; zVp?^{?l_*U_!`oA*Df1JW5H^84&q6m+(4h~^4LUueSbg-QJp`+^EAdG2`V~+;V;*9 z2A6)RJ{Hu94V}T3CmZ!(>*EXbVEe?v-e5;I*d7hGMuRP#K@D<{?+iB4cTY5+jv3f- zdk7hwPxB)%KLYb3Fh2tGBQQS#^CK`n0>AGg!1uO%PfOcRN?uBL$xfW^hAHu#>J#cR zlkX_srHv*Mo!2Sxeerb`EBF4CrE@zazBi`5G9}(y|MFrbL;OLtS>-#{!wrO5zhM$R zqRQ>NU&ZrXD(%lHU1bsbQyo!+uI?{+Pb_a9A;sqfzH9!t($rJ~8NXj;xZTrAj_-K6 z{!b{J<#0Tg{ljod2*(@ApQ3{U5{@~N=XTC1{;(>?al=(^Y5nd#`S)P2#UHAU9ar=< zMSrg7dx|bl6LPhppHg(aqFWTbQ_(?1A5iphMW0gC+m4Uo`FDn`n>XL4we;`Fr_H>! zA+j#gx_V7sa&3>awMSaluC&mPvPb3h_;$3jqc{}mapvaV!yPc>>xJnn-(dT-TfWiu zXE(k;u;07!g@XOTjW-GQBR77TV1ISvmkai5H-3fS@3$LYBo3*0cH@i1A)ooG7ePDz z!Yv;Xyk59*EF#VyB~)QOK#n7D%U>xx8qg zUSL(w{N$I4urJQ5V$}*Qrw!s4l`3N8Xnn22xSjHhC;gB>xW)^dQoK>&yq+sqY(OR; zs_mirC~d(Lz$(Y%Re^lZ@ zF{j?sygdC`4f#n3TuJ_*{E+X|4ntn!${h5C8g{HWkW0VsKdB*qp@#iyWP2PHs_bpR zm(VSj8XvVy5ZyK8lfbo0&4@1m5BrS&lQrxd27Z%|oqq=IH(zf^{NuvAKD@1Pes8hK z4}km4@AcRi_~G3W4~qS2e&wAZjNMg3{_{2PLJj-~@UUY&;dZ_V+^@eUYuKs71o^f9 z9^hnusiv`MNtf4+RY;NVCGAuXzDj%)tjX!kb623aIxP#DZ$ z8c`=IlqRw^vS!_yjj+FEXS6qF#I|)&B$0u@H6x}gQ199)jIBM}JEJ|u_AOg>#rllC zXlGB11YJ!@xB(fMB#f@RwnclpH=|57(|90`fk~zlDvqY3!x;nP6RFeDK|wPVETckf z26A~hUOr(zFjft^@kU75K}{Std%hebvx9#rj2n zIr>N;U;c4iMj~#;tpFou*PT&S?pj>|N}lf6(=nJ&4;ZEjDMN&r?FETk#u!FO7{!{| z9Yo+02V%MFvL*b(z}&)Cs1(g3d5}FGRw$M=78E4qiphcn@&gK@sy4^2%o951scug$ z$Kz)A8*a$mzO?Pt06DiMThb8%S3|;fg?6_FOjG2r?JG)n#@gcH0)W_%vvQ6B(pjE zgy&)mlx346aZ*sZu@O^5IW z)DRy{4WLal5E0Cch+vHz#k%KO=KtRe-7jFvfW4)a_?*U+_l>Gp%5t9QC-Klxp7r@W z$5ca^GvPJjN^Rhr`h4zVy4)pAdro)i0{b4$^j!Zzm0`;5=X(&oM_?=4kfAL#>mN}W zrW~(M*9SCCtk3rocLKvJ(AMYkCR4irGL*=MGu;Pa_4$0w)H~p6dxyP}mA>lLSNnB7k8^vKxZQrn|Jt%a?>CxwNJyY*>fw%wPRr)-CypL!44X#L0Z~cGg(dT;trac~gZ~YWz zL*vi&^L+wS-Q(~)Zfy2tWN1rCzDbGCd;EV0UU}x3z6u>W`m#QsBU^7EYgK=MZNm}2L@@a7ytkO diff --git a/graph.html b/graph.html deleted file mode 100644 index d3c2cf8..0000000 --- a/graph.html +++ /dev/null @@ -1,46 +0,0 @@ - - - - - - - diff --git a/no_reduction.f90 b/no_reduction.f90 deleted file mode 100644 index 3b61e99..0000000 --- a/no_reduction.f90 +++ /dev/null @@ -1,15 +0,0 @@ -program summ -implicit none - integer :: sum = 0 - integer :: n - !$OMP parallel do - do n = 0, 1000 - sum = sum + n - print*, n, " ", sum - end do - !$OMP end parallel do - print*, " " - print*, " " - print*, " " - print*, "hasilnya adalah ", sum -end program summ \ No newline at end of file diff --git a/no_reduction.sh b/no_reduction.sh deleted file mode 100644 index 400b2b8..0000000 --- a/no_reduction.sh +++ /dev/null @@ -1,12 +0,0 @@ -#!/bin/bash - -#SBATCH --nodes=1 -#SBATCH --time=00:01:10 -#SBATCH --job-name=Gabriel - -whoami -hostname - -gfortran -fopenmp no_reduction.f90 -o no_reduction.x -export OMP_NUM_THREADS=4 -./no_reduction.x \ No newline at end of file diff --git a/no_reduction.x b/no_reduction.x deleted file mode 100755 index 7677126fc0bfa4d5dc75fd9c3fdbf40a88eab8f1..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 13264 zcmeHOeQ;FO6~CJ$5Ck?00-~s_f*)vE6ZuMNso9W(7fgW0fK|cAlHEf|!J=bqpBxc8oW-_73p4qt6-X)1HM1Q)mXydZ9{!bIwnVBj;V0#YYx#8iA= zCN33|!B3KyDX%jLq-HszTr*W}g&ShBt0^<}ob*x?Mhj-)9uh5ASTWL7X`)Pp@JWE| zsIOnVOtPRpSz&rm_2aOjY)35Fbt$_pWyjR3^qKPbXl(RpS8^w9fQ$-L(xtND4I@PL z-^`HgIND;uf+^d50d~~SPg}f7u}!sCDlSi|{xjuyxFHtZwqn^0vCxuOG@kBV(p$4) z$%ecOU9Xh?TaqTyJzgt7L z{6Y0omrtNMtBCe%C2&7*UlIKmO6ader;7O}teBt6OX#mEq2F7g-J9U&O30k$#{i1; z=e82Kw?uyiO6UvBb7v%xG?KwM&F(UxH@COyp>Q(X8BH1CWP9uCSRx*74{nQvg|2sY zC*pd_2qq0(H&u%(vQM2Hry}8`9*rB}PSAUjQ3IYVg_L1JdI-(faLcfxE0_#+pey4| z!-k&dF`|ih%4Wz8?GO}$$``dSmv)1)KoPnJvsEOxaE^WPZ8DJ_*agPSzLHpsxi0p-1+cHUlN^4JJ4oeR7g%$ zmUn*m=oIqPWy#CLJ4#OaBMYy_)>1A~kdsZ_BI3)$y-J_=P2TSY(HfPlYJX&WtHLXM zJ}GCM`Qr;roc1mr3n`wk;r9JLYs2mP-IxvMHptHz8-4)+sthO`L6C7_e4h>H{fcCR zHk|id!k@I^reQjV46vm!Osz&d!mhl08IokMXCZo8jyoc@b$&GaG4eHbRT` zJdGSUOZ_Wo#G@MdATOduo{(($Uop7_BcUhYJdNCv_rxRFFWn4h2l66nBw#kO!`TQu zPUmUlpNJrjgmy=St5G#_eZG-HSfV8Q;cOpH%?7#~{a$fsRdNW`7M9ZYd zv^^Wg_B5jUC#b}w#qufe{Tw|q*~bB7Poar};Dl)$XulQff_`0TnO~lPEPD;KGDF!7 zM2;OCMU21sua7fFtlCKJvC6%_hl9$e-_4xrzqG8Of6=st+Se=le+@9R<>a0@XD;-K zJ&h+_BboBIQN^-q!@9s^RAByxcX{zm&+PCnf!a=4n}nKLRs_-zpZ%EP)Or%JBFGF# z=C>qzU5ZRttvEV{kSJ>tsSrk~4-ow*FCz9nuzf==>iXVBJR@(-ka6id;u^gItakrV z3d@~=&DL`jxGk`$IrDO0V*q=}RhztWt5`zx)ZckRtaBMFcpo(w+DT}P%swk^4XM8#g-s)m{2MdHu_LmfRAgw z`z8&PCT0=3{ut;{&|iSQ1R4VU3nKOs=ufdu-UodTbT*tULbyH$`WWbgp!EBkifc!k zaP@j!^QTX#7;sJT5`HN@UGR53DX3ChAATVx{f9oxc2_}0Qn}A>HKNqsyj87T*eVhgx@OXEZt)4O2{RbDiBz@lt_z>1Q{ie3$y(Bf; z|2F8$kY8uFU%S`cH_1I;I)R+pK8nu?#3KwU>OJ1Cm(_dbJ>qWk`1&W+d#>GEu6e3< zPu4s&eN$RJbxBW6z*80QTwCw)K@a-%o(lO}X*$}W$E0wk$>~Iyh`>YyCL%Bqfr$uA zL|`HU6A_q*z(fQlA}|qw|F;NO_u=aDmyVuPoRsd|sW47=_*D1~ctl+)^WASqRW3Hw ztoNAn70+kqOBB!d@pO)+!txK!v?D4zR$Sn2VdI=6qh!dVa31#*1ou7q$L zm;Cc;pt$CcJoj@<@!wN&TvrsxmHYo0;rGW*hm+L+<|=x%qAL__QgoA|5k>D-bhn~T zzvtumeaxEGt3T_zcH_2m+(`RY`j`8wmMl$6uKK>}8h_QY#U^?_eeLh!mM#HR{ge}(u3g4byw zK27lRT8K{erAbz z_LoLV=oS}R`$?hxZ0o&VAwCCr5k5O4>uxdEdhYE)x4={GE2ckBc#Gn^%jLb$_A^Pm zo693+jrPkj#BIb8PZ}oSUfwX2;S~z!_mc`1D^YQYe1E7tDoyyfa7)SisRZ%WjSu9-_4e!Sl);pZp7ss9hC=Uu+*fTtxAFYM5cy;s-RRakC|w8nFvzFTJ7bA$!I&O063LVvO!tZomOvtn>e{&1U#)@W zb;uktiC?D_oJbrwFsXF6f9W!GN#*n4m&wxQRkdiYsV&gjs5h=_poAkG`DA*dra-Ns zP3UV{*4GDG^z}_mw>Gxx?ScB1Mp7*3S*Q?@`Ab4?xP4uqwRtsUs@MA6LBuH>4_S#n zw$z}yI?mTonLZtKb}Ftjp7w7` zN0E>j4GBMSc#+&C{Gsh}_%o@IG$nV3lPSD!E?{)XlHpj83{Y48f!3lGwsrm4m7FfZ-!OCz z#-Bp`W-<$(KbZ3G9wnB#Tqn8^ANr}z_IyrZ>VwQ)`0puW)u`C*4dsaGB34w?Y2N_+ zG|ryfKA(G-a{u|f?)bSY*1?|sM6mrqRbk5cesrv+II%sSqc;J=pA^fU&rwYI{0|jb z$cMe$1%}Sn+&-VTnDRND`_FnzzYKdit258%GNwJMG3r0{ll!k=u>%!~Dcke;jp<>f z$nCQ|kN-hsU$6A|oX7OI&3-QGPWwlIQB2geg>@d}b0ObzC^xdNTql~r$8OK(My7+L zWGj??M1|>NsN3!Ne94siD~<5QJk!S=_Jc~m^jD4r%k8qi?>g-Hyvo#Z3>!E8{mP!_ zkAJr^-OLRs>TLfRhrKh8zQtkh7>+zwQT(`lJ|{EXKtfyLxH0qsDs<+gwMm7~E1X~N z)MuXQA7MjBF1F|M=GM!|TYkPwF3+?5-yq;;gLL?O&i{Xb|DOV{PqyPY()o^t$nEp} zT`wgVp*&;~>znPFz6pul-a7C5OcQR09k3nqW2g|u?eo0=60~G->O1G}187nERi?W2 z&Gw5e#H^4m6+7j*HznqGozJBE)IARUouR#+`@{POt#9tTX<>dJzs978971lFb!VdD RP?4fX)j{$cD=O-=|2KadHUR(t diff --git a/slurm-16206.out b/slurm-16206.out deleted file mode 100644 index ccfbace..0000000 --- a/slurm-16206.out +++ /dev/null @@ -1,4 +0,0 @@ -mahasiswa2 -komputasi06 - Matrix Size = 4096 - Execution Time = 227.454 sec A(n,n) = 0.102092747142180D+04 diff --git a/slurm-16207.out b/slurm-16207.out deleted file mode 100644 index 3847709..0000000 --- a/slurm-16207.out +++ /dev/null @@ -1,4 +0,0 @@ -mahasiswa2 -komputasi06 - Matrix Size = 4096 - Execution Time = 115.605 sec A(n,n) = 0.102437460360345D+04 diff --git a/slurm-16208.out b/slurm-16208.out deleted file mode 100644 index 9505ec5..0000000 --- a/slurm-16208.out +++ /dev/null @@ -1,4 +0,0 @@ -mahasiswa2 -komputasi06 - Matrix Size = 4096 - Execution Time = 60.744 sec A(n,n) = 0.102843459928075D+04 diff --git a/slurm-16209.out b/slurm-16209.out deleted file mode 100644 index 37e8d3a..0000000 --- a/slurm-16209.out +++ /dev/null @@ -1,4 +0,0 @@ -mahasiswa2 -komputasi06 - Matrix Size = 4096 - Execution Time = 30.498 sec A(n,n) = 0.100725125084073D+04 diff --git a/slurm-16210.out b/slurm-16210.out deleted file mode 100644 index 98bc652..0000000 --- a/slurm-16210.out +++ /dev/null @@ -1,4 +0,0 @@ -mahasiswa2 -komputasi06 - Matrix Size = 4096 - Execution Time = 26.556 sec A(n,n) = 0.100253761446337D+04 diff --git a/slurm-16212.out b/slurm-16212.out deleted file mode 100644 index 8f328d4..0000000 --- a/slurm-16212.out +++ /dev/null @@ -1,4 +0,0 @@ -mahasiswa2 -komputasi03 - Matrix Size = 4096 - Execution Time = 24.960 sec A(n,n) = 0.101898724293035D+04 diff --git a/slurm-16213.out b/slurm-16213.out deleted file mode 100644 index c8109fd..0000000 --- a/slurm-16213.out +++ /dev/null @@ -1,4 +0,0 @@ -mahasiswa2 -komputasi03 - Matrix Size = 4096 - Execution Time = 24.707 sec A(n,n) = 0.101964571498883D+04 diff --git a/tugas3.f90 b/tugas3.f90 deleted file mode 100644 index 72f4c23..0000000 --- a/tugas3.f90 +++ /dev/null @@ -1,29 +0,0 @@ -program sample3 -use omp_lib - - implicit real(8)(a-h,o-z) - parameter (n=4096) - real(8) a(n,n), c(n,n) - real(4) b(n,n) - real*8 t1, t2 - a=0.0d0 - call random_number(b) - call random_number(c) - write(6,50) ' Matrix Size = ', n - 50 format(1x,a,i5) - t1 = omp_get_wtime() - !$OMP PARALLEL DO - do j=1,n - do k=1,n - do i=1,n - a(i,j)=a(i,j)+b(i,k)*c(k,j) - end do - end do - end do - !$OMP END PARALLEL DO - t2 = omp_get_wtime() - 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) - stop - -end \ No newline at end of file diff --git a/tugas3.sh b/tugas3.sh deleted file mode 100644 index 6ecc95f..0000000 --- a/tugas3.sh +++ /dev/null @@ -1,13 +0,0 @@ -#!/bin/bash - -#SBATCH --nodes=1 -#SBATCH --time=00:01:10 -#SBATCH --job-name=Gabriel - -whoami -hostname - -gfortran -fopenmp tugas3.f90 -export OMP_NUM_THREADS=512 -ulimit -s unlimited -./a.out \ No newline at end of file diff --git a/tugas3_16thread.sh b/tugas3_16thread.sh deleted file mode 100644 index b006912..0000000 --- a/tugas3_16thread.sh +++ /dev/null @@ -1,13 +0,0 @@ -#!/bin/bash - -#SBATCH --nodes=1 -#SBATCH --time=00:05:00 -#SBATCH --job-name=Gabriel - -whoami -hostname - -gfortran -fopenmp tugas3.f90 -export OMP_NUM_THREADS=16 -ulimit -s unlimited -./a.out \ No newline at end of file diff --git a/tugas3_1thread.sh b/tugas3_1thread.sh deleted file mode 100644 index f55889f..0000000 --- a/tugas3_1thread.sh +++ /dev/null @@ -1,13 +0,0 @@ -#!/bin/bash - -#SBATCH --nodes=1 -#SBATCH --time=00:05:00 -#SBATCH --job-name=Gabriel - -whoami -hostname - -gfortran -fopenmp tugas3.f90 -export OMP_NUM_THREADS=1 -ulimit -s unlimited -./a.out \ No newline at end of file diff --git a/tugas3_2thread.sh b/tugas3_2thread.sh deleted file mode 100644 index f631548..0000000 --- a/tugas3_2thread.sh +++ /dev/null @@ -1,13 +0,0 @@ -#!/bin/bash - -#SBATCH --nodes=1 -#SBATCH --time=00:05:00 -#SBATCH --job-name=Gabriel - -whoami -hostname - -gfortran -fopenmp tugas3.f90 -export OMP_NUM_THREADS=2 -ulimit -s unlimited -./a.out \ No newline at end of file diff --git a/tugas3_32thread.sh b/tugas3_32thread.sh deleted file mode 100644 index 62a2253..0000000 --- a/tugas3_32thread.sh +++ /dev/null @@ -1,13 +0,0 @@ -#!/bin/bash - -#SBATCH --nodes=1 -#SBATCH --time=00:05:00 -#SBATCH --job-name=Gabriel - -whoami -hostname - -gfortran -fopenmp tugas3.f90 -export OMP_NUM_THREADS=32 -ulimit -s unlimited -./a.out \ No newline at end of file diff --git a/tugas3_4thread.sh b/tugas3_4thread.sh deleted file mode 100644 index 371dbfb..0000000 --- a/tugas3_4thread.sh +++ /dev/null @@ -1,13 +0,0 @@ -#!/bin/bash - -#SBATCH --nodes=1 -#SBATCH --time=00:05:00 -#SBATCH --job-name=Gabriel - -whoami -hostname - -gfortran -fopenmp tugas3.f90 -export OMP_NUM_THREADS=4 -ulimit -s unlimited -./a.out \ No newline at end of file diff --git a/tugas3_64thread.sh b/tugas3_64thread.sh deleted file mode 100644 index 598643e..0000000 --- a/tugas3_64thread.sh +++ /dev/null @@ -1,13 +0,0 @@ -#!/bin/bash - -#SBATCH --nodes=1 -#SBATCH --time=00:05:00 -#SBATCH --job-name=Gabriel - -whoami -hostname - -gfortran -fopenmp tugas3.f90 -export OMP_NUM_THREADS=64 -ulimit -s unlimited -./a.out \ No newline at end of file diff --git a/tugas3_8thread.sh b/tugas3_8thread.sh deleted file mode 100644 index 5f2e9dd..0000000 --- a/tugas3_8thread.sh +++ /dev/null @@ -1,13 +0,0 @@ -#!/bin/bash - -#SBATCH --nodes=1 -#SBATCH --time=00:05:00 -#SBATCH --job-name=Gabriel - -whoami -hostname - -gfortran -fopenmp tugas3.f90 -export OMP_NUM_THREADS=8 -ulimit -s unlimited -./a.out \ No newline at end of file diff --git a/with_reduction.f90 b/with_reduction.f90 deleted file mode 100644 index 3b61e99..0000000 --- a/with_reduction.f90 +++ /dev/null @@ -1,15 +0,0 @@ -program summ -implicit none - integer :: sum = 0 - integer :: n - !$OMP parallel do - do n = 0, 1000 - sum = sum + n - print*, n, " ", sum - end do - !$OMP end parallel do - print*, " " - print*, " " - print*, " " - print*, "hasilnya adalah ", sum -end program summ \ No newline at end of file diff --git a/with_reduction.sh b/with_reduction.sh deleted file mode 100644 index f229a96..0000000 --- a/with_reduction.sh +++ /dev/null @@ -1,12 +0,0 @@ -#!/bin/bash - -#SBATCH --nodes=1 -#SBATCH --time=00:01:10 -#SBATCH --job-name=Gabriel - -whoami -hostname - -gfortran -fopenmp with_reduction.f90 -o with_reduction.x -export OMP_NUM_THREADS=4 -./with_reduction.x \ No newline at end of file diff --git a/with_reduction.x b/with_reduction.x deleted file mode 100755 index 4567d80bca7db5ced20d905cb29a96c45b5bae9f..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 13272 zcmeHOeQ;FO6~CJ$5Ct|10-|796%&- z8nLVpn`!xj&ge{LbgWvf*iI{D{D6ib(&=@efR9Xec3He zr+;;FGw+>yKJU5b-go!i`%dnzYpgGEI0P4`_@*GNugs)WE5^YaR0W_~REdjlze3Cw z5;Fu zTp>|FkE}2}to%5tAnOrIdLgA3QhE&CN}eJ2kNQSei{jg1EqGKIk}Q=C?-&89|9-MW zN5MvuEEuxhx1mRVe%0bug3YSEVsUv~`OlEYVNoQ!efiQwk-)-8IGXHQ*j2TB;qs;4 zM9jNb_M7aJ?3#6(WJ@&O%9P|!15PyJzxvpZZ{Bso&!;b(_|*JIpWFD^EqDLwRnp}P z)vsK>gyhr$(r*=^dqMXUkUv>Oel46TWS?k-?0l_={Hh}IT}9fx5q7Qu&t85BLLq-{ zE<$$~@u#dO&~)-J!^7LNKO;hhv4VyW14_`^}Lrm>-BwZ7Q9*t<-usbAmR((GHO zuP~cf>a7seR3#uiIrOYJ<C5!IadE5&6N2cDKnj4eHP9$d-G!xzyCv;{OO#HT9r z+du!&1hNy#@=L_~icj)`S6_prrBo!qC!OlKgqMiBlsvDSyx#SpH7eWG`pEQcieBdN zNIugUKQ+gs)7r&-A;HrYx^=xzTjEnhhIUK5nQ#i#P^ZM#5>7)lv@NUO)(c#g z%J&*luiUPs{;qZZV|YVLV^8UmXiMvvyhMUkFT%6T^ck@6arvBD;;dQ;WRuoYS_!DF z9MMwm7?&X=XJ?opnY=Y~y3JcY=RRqFYd=LHheQ8!66{&_A;2bW!FlLw$Id&o)Ub9e zeUs)mp}lh6m#1oTbYmbroYNxo7|`C6{c>Ep&$v_H|58gO zhqZm1hWFK>`Z`3SQe)W!*nWu~ne@XTq(4Lxhk*%G+1IiW^Mc;4wA2eD;H9sHRH{F{ zfxwBwLx}NDKKmkdEL$5~d7^y(A7P;UnGaGQ_RKD+?U_5VcIDgUJ--7nwe`%t=_8kT z#J;*Sj=@yvd#GYsHDg|2Fv>9g1AE-K(=$7;N1(P_*2bZxrWFyXi!XjbacVk)SP{t# zNa_#7dRwwgvYK&D*}_0NZDFYphRFwLJ)L6_x(jG`zk^)gUx#PpUz25Ax{o=At^}&x zbDY9*n{P|@x$@oY+uV?P!?($YwPfCAw_GX~65QxZooh&a+PL5yxrQD)=S)9y7B=?0 zXLu^#IC#UuN1{8rs%Y{yF(Bt+BUl^=4Zs6{_W{!TITgpw zX5r{^J7!IqP}b|1;3oQPTp`%Io&;1WEDyWjll76>u?;@_* z{zHIofPbA;f9-x}_c-S)X#{*~`#7%Ch({1m)VSO~EU9tLe9&3v^7M?Wan0Xfs<|re zAFsKpx+gTbs^hLIpR2;>nqTAcKo0UXt}^+qGzsm{W0F78WOS^IMPMufV-XmOz*q#v zA}|(#u?UPsU@QV-5g3cW|62sI=i%z`m$sf%?2yjfsW6?+@Tu?_@Sr+W=Cj{`s$6D@ zWxr$2QaJCOFIPC9$J0KV3iCfXpNSEEP;FBAjNLPisOC3Mg8W^S&(7&=fC`^o&oogn zT|oxwh(dI!b86lTpHc#RUchJOmn!;*I@D)+mBQKYqe_m?)VckyDLTvHxIp#~?n)B2 z;}U;abri=O5@$b$75=E=6kM)gy@Hz+Y*X+K1@BkT zZudese~($SdiB>m^EYizMvbIrg?E{^V&Rgc#42}HR(UIyE-**O+58KOIQm;I`1#MLyG1825Eh10Ov&aCSjez5 zRm`-0G*V2bxFoxtrJ1u71a^M~4_Qjg1lQ%YV>B@wp{ zTx6fud#3L|#Ze%h2SG37|4)n1=_?P}e^U7`&p<&trsyxJg;<_#f<~wM_Je*^&TO_uc|?Wc|AM4nI%*v_sp$Os#D-o6y->R&Md!} ztX{0-89$6IlXSM4gH1)~cY*GG80rgbzvj=>9%Z#Ljb|lmGXs z=Usm5fTcx}Uf_49HEtw~WLulJRpgR&bfZIWrF0$S!yunVZ;!;b`y+b5h{Y4SKiMT( zk@FG>8o_{f#qyO^g@q`kC5&{LxPONpj2iJBqAl+42ARSTH2@gekKoCmL&O zi^Pyfqg*TS`K!s-unxIHCh+Q%gwqy97EB`9;a##6PN|F@yqhdpRh!vG zwUlzCBcn{O(-cvwZ5H~P#`QJ6MtyyK{l>Z$y~S74SVw|+z6J6LGJ{FzwclCiYid{x zp7LA2!;eS>qk(Mdk0m*%x|%a~RIX2JA}NDaAk(P2+LG~OPn#N*`(%^0B@%&a$t3!Z z`B@F?k$@BkNA+YPnCn9>eaX@VO7kk5yQK&GhTlwNvi8iHr)6{4nh0g{HXGTtWVBT` zR2mtw%CZ9*NW}DzKN_I?vRq_xsa^SPWhJutVR?yV`NC#O77Y_khWz9%NYZdpB37>1 ztWjIina%9>M1td!?H^_icP~f*v`i}Mx;d+4UYPJEc61;TfJWSeA+Awp;+?`9jTu3& zucl$4;cr)1do=0Yo(v-;GaL|J!tfzEB)owgQP?w~5jQz^1mg*OZ_Yz>@Z!OUpA=NB zGhzs@42>66Z+i@=5$wX9)&K~_WKX=okb3Gv0T^M-R5c%eQ-kYh!QT;Xg-;X+FTy3f zSb93JoaC*N|2;zcVf-ZG-N`Jx4`ImfKZ-47xlZtET=dG$`n+FZ=mF1K_;;0Qm8e+t zd0)eDE(!43R6|8?)RTy&KA8oHGPOQ)S>CK?w zrzNZJQ4TWXa{!3QLN=`Bb|AFJ=Jt8t#gO;w>_5vf{2uga&(1jS&lq;9#>jv2ll@m@ zu@eQ;T;XEJ1er4nw8Gkn;l-=`Q1f2-yL>vOw|KVsA8 zeJexTc5GDtpHTWde*FH*a0@r2puPQPZTj|n`bL|+tvli+n?CQC8E&vmc#a#JJ&6kK zJ!x)I;e89|+1uqAXZR=R(AJCfc|Wx63bK|PFB8k*tp7JK_}L&C-ly~bG4TH@@cd*w zj^jb-P#3vROdPLJ40(d`@`!8&2RSI)G+U-t~KHF ZHYT^rvQtp8iAdG~wV^!Ef(qL8{|&g+HvRwr