Senin, 03 Agustus 2015

Jual botol gelas tahan panas 350ml


Mudah disterilisasi dan tidak gampang pecah. Tidak bocor serta awet. Minat, Hubungi:
Rizmeia
082221003380 (WA on)
75EDFAFD

Terima kasih!
:D

Senin, 16 Desember 2013

Simulasi Difusi Dua Dimensi


Seperti pada artikel sebelumnya, telah saya posting tentang difusi. Perbedaan dengan posting pada artikel ini terletak pada mediumnnya. Jika artikel sebelumnya pada medium satu dimensi, pada artikel kali ini saya akan membahas Difusi pada medium dua dimensi.
Pembahasan Difusi pada artikel hanya membahas konduktivitas pana hingga menjadi tunak pada medium 2 dimensi.
Penghantar panas dengan luasan L x L yang terletak pada bidang xy dengan salah satu sudutnya terletak pada pusat koordinat xy tersebut.  Mula – mula penghantar memiliki suhu T0 ­pada saat t=0.

persamaan yang sesuai dengan sistem tersebut adalah sebagai berikut :
Dalam membuat program harus diperhatikan dua syarat, yaitu syarat batas dan syarat Stabilitas :
  • Syarat Batas 


  • Syarat Batas : 
Syarat awal 
for i = 1:Nx
for j = 1:Ny
T(i,j)=0;                     
end
end

            Syarat batas pada
for j = 1:Ny
T(Nx+1,j)=1;              

end

for i = 1:Nx
T(i,Ny+1)=1;               
end

T(Nx+1,Ny+1)=1;                  


for i = 2:Nx
      for j = 2:Ny
           T(i,j) = dt*perhx2*(T(i-1,j)    
             +T(i+1,j)+T(i,j-1)
             +T(i,j+1)-4*T(i,j))+T(i,j);
             end
              end

for j = 2:Ny
         T(1,j) = T(1,j)
         + 2*dt*perhx2*(T(2,j)-T(1,j))
                      + dt*perhx2*(T(1,j-1)-2*T(1,j)+T(1,j+1));     
                         End

 
          for i = 2:Nx
       T(i,1) = T(i,1)
                      + dt*perhx2*(T(i-1,1)-2*T(i,1)+T(i+1,1))
                     + 2*dt*perhx2*(T(i,2)-T(i,1));
                         end


  • Syarat Stabilitas  
          Syarat stabilitas terpenuhi dengan rumus
         Sehingga diperoleh pilihan hx = 0,1 dan dx = 0,0025

Script Program dengan menggunakan Fortran adalah sebagai berikut :
--------------------------------------------------------------------------------------------------------------- 
--------------------------------------------------------------------------------------------------------------- 
PROGRAM DIFUSI2D
!Deklarasi Variabel
IMPLICIT NONE

INTEGER, PARAMETER : : imax = 1000, jmax = 1000
        CHARACTER(36)           : : label
    
        REAL                             : : L, dt, hx, perhx, perhx2, meanT, D 
        INTEGER : : i, j, nwrite, nsave, tmax, n, nn, Nx, Ny
        REAL                             : : T (1:imax, 1:jmax)
        INTEGER                         : : X(1:imax, 1:jmax), Y(1:imax, 1:jmax)
    
!Input
L = 1
 D = 1
dt = 0.0025
 hx = 0.1
perhx = 1/hx
perhx2 = perhx*perhx
Nx = L/hx
Ny = Nx
tmax = 4000000
 nwrite = 50
 nsave = 200
 !perintah membuat file baru
OPEN (80, FILE = 'data.csv', STATUS = 'NEW', FORM = 'FORMATTED')
 !isi file baru
WRITE (80,*) 'n,','dt*n,','meanT'
CLOSE (80)

!Syarat awal T
DO j = 1, Ny+1
 DO i =1, Nx+1
T(i,j) = 0
 END DO
END DO

 DO j = 1, Ny
      T(Nx+1,j) = 1
END DO
    
 DO i = 1, Nx
      T(i,Ny+1) = 1
END DO
    
 T(Nx+1,Ny+1) = 1


PRINT*, ' Bismillaahirrahmaanirrahiim....'

DO n = 1, tmax
    
!Menghitung
DO j = 2, Ny
DO i = 2, Nx
T(i,j) = (D*dt/perhx2)*(T(i-1,j)+T(i+1,j)+T(i,j-1)+T(i,j+1)-4*T(i,j))+T(i,j);
END DO
END DO
        
  DO j = 2, Ny
       T(1,j) = T(1,j)+2*D*dt/perhx2*(T(2,j)-T(1,j))+dt/perhx2*(T(1,j-1)-2*T(1,j)+T(1,j+1));
  END DO
    
  DO i = 2, Nx
       T(i,1) = T(i,1)+2*D*dt/perhx2*(T(i,2)-T(i,1))+dt/perhx2*(T(i-1,1)-2*T(i,1)+T(i+1, 1));
  END DO
        
  T(1,1) = 0.5*(T(2,1)+T(1,2));
        
  meanT = 0
  DO i = 1, Nx+1
      DO j = 1, Ny+1
            meanT = meanT + T(i,j) 
      END DO
  END DO
  meanT = meanT/((Nx+1)*(Ny+1))
        
IF (MOD(n,nwrite) < 1) THEN  !LE=kurang dari sama dengan
PRINT*, '----------------------------------------------------'
WRITE(*,  ' (T2, A, T30, I20)')'n                 :',n
WRITE(*,  ' (T2, A, T30, F12.5)')'                :',meanT
            
END IF

IF (MOD(n,nsave) < 1) THEN
PRINT*, '----------------------------------------------------'
PRINT*, ' S a v e data '
WRITE(*,  ' (T2, A, T30, F12.5)')'            :',meanT
        
!Menyimpan n, dt*n, meanT
OPEN (80, ACCESS = 'APPEND', FILE = 'data.csv', FORM = 'FORMATTED')
WRITE (80, 81) n, dt*n , meanT
81 FORMAT (i8',',F10.3',', F7.5)
CLOSE(80)

nn = n + 70000000

!Menyimpan T 
WRITE (Label, 51) 'T', nn
51 FORMAT (A, i8,'.csv')
OPEN (11, file = Label)
DO i = 1, (Nx+1)
DO j = 1,(Ny+1)
X(i,j) = i
Y(i,j) = j
WRITE (11,31) X(i,j), Y(i,j), T(i,j)
31 FORMAT(i5',',i5',',F7.5)
END DO
END DO
CLOSE (11)
    
  END IF
END DO


PRINT*,'-----------------------------------------------------------------------------'
PRINT*,"ALHAMDULILLAH"
PRINT*,"Perhitungan telah selesai"
PRINT*,'-----------------------------------------------------------------------------'

END PROGRAM DIFUSI2D
--------------------------------------------------------------------------------------------------------------- 
---------------------------------------------------------------------------------------------------------------

Kemudian dengan menggunakan paraview Simulasi dapat di visualkan.
Dengan memvariasi nilai D akan di dapat grafik sebagai berikut :
                                                 Grafik Hubungan Waktu dengan Suhu Rata-Rata

 Garis Hijau nilai D adalah 1
 Garis Merah nilai D adalah 0.5
 Garis Biru nilai D adalah 0.25
Video Dua dimensi perambatan Suhu :
video




Kamis, 21 Februari 2013

The Most Trusted HYIP: Mencari Investasi Terbaik dan Terpercaya


Manusia modern dan manusia tradisional, apa yang membedakan mereka? Menurutku, yang membedakan adalah pola pikir mereka. Manusia tradisional adalah manusia yang jika mendapat sebuah info, maka mereka menelan mentah-mentah info tersebut dengan proses yang sedikit. Dengan penilaian langsung, iya atau tidak. Sedangkan, manusia modern jika mendapat info, maka mereka akan memproses info tersebut baik dipikir secara matang maupun dengan mencobanya.

Jadi, aku berusaha menjadi manusia modern. Ketika aku mendapat info tentang HYIP (High Yield Investment Program), aku mencoba mencernanya berkali-kali baik secara pengamatan dan konsultasi maupun dengan terjun sendiri.

HYIP dibagi menjadi dua, yaitu HYIP Short Term dan Long Term. HYIP Long Term lama investasinya relatif lebih lama dibanding HYIP Short Term. HYIP Long Term biasanya membutuhkan waktu 100-180 hari untuk berinvestasi dan dalam jangka waktu tersebut, uang deposito tidak dapat diambil. Short Term HYIP biasanya hanya dalam jangka 1-10 hari dapat diambil, itu pun minimal. Kebanyakan, HYIP Short Term keuntungannya relatif lebih banyak dalam waktu singkat dibanding Long Term. Resiko? Resiko selalu ada. Usaha apapun selalu mempunyai resiko sekecil apapun resikonya. Tapi, dalam hal HYIP, menurutku HYIP Short Term jauh lebih riskan dibanding Long Term. Menurut statistik yang kuamati, banyak HYIP jenis Short Term yang menghilang dari peredaran HYIP setelah mendapat "sumbangan" dari investor. Jadi saranku untuk yang suka HYIP Short Term karena berjangka waktu pendek untuk mendapat keuntungan berlipat-lipat, hendaknya berinvestasi secara bijak. Berinvestasilah dengan jumlah uang yang siap untuk kehilangan. Ambillah keuntungan per hari, karena bisa memantau web HYIP setiap hari dan meminimalisir resiko.

Keraguan selalu ada dalam berbisnis. Keraguan disebabkan karena memandang resiko jauh lebih banyak dibanding keuntungan. Setiap bisnis harus bertaruh dan berani melakukannya (Tapi, bukan judi, zzz). Maka dari itu, harus ada pemantapan. Bagaimana menemukan pemantapan? Carilah info sebanyak-banyaknya. Di dunia maya terdapat banyak sekali HYIP Monitor yang senantiasa memantau HYIP-HYIP yang beredar di internet. Salah satunya adalah Scamadviser

Scamadviser merupakan web yang khusus untuk menilai web lain. Apakah web tersebut layak dikunjungi? Apakah aman bertransaksi di web tersebut? Selain Scamadviser, juga ada Scamvoid

Berikut adalah pandangan yang berbeda dari pemerhati HYIP, silahkan kunjungi blognya

Berikut adalah beberapa contoh HYIP yang menurutku layak dicoba (Dari urutan yang paling baik). Untuk mempelajarinya lebih lanjut dan mengetahui persentase keuntungannya, silahkan klik Hyperlink dibawah ini untuk mengunjungi Site-nya:

  • HYIP Short Term

1.   4FXInvestment (Uang anda akan diinvestasikan dalam perdagangan Valas atau ForEx)
2.   ESafe (Uang anda akan diinvestasikan dalam perdagangan Valas atau ForEx)
3.   Perfect Forex (Uang anda akan diinvestasikan dalam perdagangan Valas atau ForEx)
4.   Pacific Invest (Uang anda akan diinvestasikan dalam perdagangan Valas atau ForEx)
5.   Easy-Growth
  • HYIP Long Term

1.   Felmina Alliance (Uang anda akan diinvestasikan dalam perdagangan Valas atau ForEx)
2.   Stallion Gold (Uang anda akan diinvestasikan dalam perdagangan Emas)
3.   CopperThin (Uang anda akan diinvestasikan dalam perdagangan Tembaga)

Penilaian dari beberapa tinjauan, sebagai berikut:

1.     Umur Web

o    Umur web menentukan seberapa riskan HYIP tersebut. Carilah tahu umur web tersebut dengan menggunakan layanan web Scamadviser. Menurutku, web yang masih berumur pendek (20-40 hari) lebih rendah tingkat riskannya. Karena kebanyakan yang sudah berumur tahunan HYIP nya kabur. Tapi, lain dengan Long Term, sangat jarang sekali ditemui HYIP Long Term kabur.
2.     Jumlah Profit

o    Persentase yang terlalu berlebihan lebih riskan, contoh: 1 bulan 2225%. Sedangkan persentase yang berkisar 130% per hari lebih rendah tingkat riskannya.

3.     Pemantauan dari situs-situs HYIP Monitor

4.     Penilaian kelayakan web dan online service

5.     Penilaian dari investor yang pernah investasi

6.     Penilaian dengan pengalaman


Mungkin hanya sekian dulu yang bisa kurangkum seputar HYIP dari banyak sumber termasuk aku sendiri (pengalaman pribadi). Jika merencanakan investasi, harap melakukannya dengan bijak. Berinvestasilah dengan jumlah uang yang anda bisa ikhlas untuk hilang (ex: 50 USD).



Bagaimana cara berinvestasi di HYIP, bisa menghubungiku:
rizmeia.atma@gmail.com