[交流] 【转帖】动力学蒙卡方法（KMC）模拟薄膜生长的基本知识 已有11人参与

Originally posted by zyj8119 at 2010-09-11 11:17:05:
一、薄膜生长模拟模型
一类是扩散控制的成核生长模型，这类模型假设，扩散的原子一旦到达团簇或聚集体的边缘则并入该团簇。
1、扩散限制聚集(DLA)模型，这是最初的模型其主要思想为：在晶格中心处放一个种粒子 ...

subroutine  diffusion_conditions ()  
  use variables   
  implicit none

  call Potential_energy_equation() 1  
  if (direction(1)==1) then
  E_xr=v(1)-partical_energy
    if (E_xr<=0) then   
    call Periodic_boundary_conditions ()   
    x=x+1   
    else
    call random_number(num_3)  
      if(num_3       call Periodic_boundary_conditions ()  
      x=x+1   
      else   
      a(x,y)=1
      end if  
    end if
  else if (direction(1)==2) then 
  E_xl=v(2)-partical_energy  
    if (E_xr<=0) then   
    call Periodic_boundary_conditions ()
    x=x-1  
    else   
    call random_number(num_4)   
      if(num_4       call Periodic_boundary_conditions ()  
      x=x-1  
      else
      a(x,y)=1   
      end if   
    end if
  else if (direction(1)==3) then   
  E_yr=v(3)-partical_energy   
    if (E_yr<=0) then  
    call Periodic_boundary_conditions ()  
    y=y+1
    else
    call random_number(num_5)  
      if(num_5       call Periodic_boundary_conditions ()
      y=y+1  
      else   
      a(x,y)=1
      end if h  
    end if
  else if (direction(1)==4) then
  E_yl=v(4)-partical_energy
    if (E_yl<=0) then     
    call Periodic_boundary_conditions ()  
    y=y-1
    else   
    call random_number(num_6)
      if(num_6       call Periodic_boundary_conditions ()  
      y=y-1   
      else
      a(x,y)=1  
      end if
    end if   
  end if
end