[关闭]
@MilCOS 2017-09-27T12:29:05.000000Z 字数 8516 阅读 709

QMC

问题 9/27

The density compressibility. Defi:


and by definition,

first item--average over sum's square:

use wick's theorem,

so the first term can be like,

which is

and the second item is,

so by the Defi of ,

问题 9/26

Wick 定理


why

问题 9/18

接下来,我写一些我们要测的物理量的格林函数表达式。也摘录下程序中的几段。麻烦学长检查一下表达式...

1 Kinetic energy

  1. do i = 1,Nsite
  2. do j = 1,Nsite
  3. g_hop = g_hop - T_hop*free_con(i,j)*( gfun_2nd(j,i,+1)+gfun_2nd(j,i,-1) )
  4. end do
  5. end do
  1. do i=1,Nsite
  2. do j=1,Nsite
  3. g_hopup = g_hopup - gfun_up_2nd(i,j)*free_con(i,j)*T_hop*N0*2
  4. end do
  5. end do

2 on-site energy

  1. do i=1,Nsite
  2. g_onsite = g_onsite + U/2.d0*( 2.d0*gfun_2nd(i,i,+1)*gfun_2nd(i,i,-1) &
  3. - gfun_2nd(i,i,+1) - gfun_2nd(i,i,-1) + 1.d0/2.d0 )
  4. end do
  1. do i=1,Nsite
  2. g_onsite = g_onsite + U*( (1.d0-gfun_up_2nd(i,i))**2.d0 ) &
  3. *Nfavor*(Nfavor-1)/2.d0
  4. end do

3 spin-spin correlation

  1. do i=1,Nsite
  2. do j=1,Nsite
  3. delta = 0.d0
  4. if (i == j) delta = 1.d0
  5. Scor_11(i,j) = Scor_11(i,j) + (gfun_2nd(i,i,+1) - gfun_2nd(i,i,-1)) * &
  6. (gfun_2nd(j,j,+1) - gfun_2nd(j,j,-1)) &
  7. + ( delta-gfun_2nd(j,i,+1) ) * gfun_2nd(i,j,+1) &
  8. + ( delta-gfun_2nd(j,i,-1) ) * gfun_2nd(i,j,-1)
  9. Scor_22(i,j) = Scor_11(i,j)
  10. Scor_12(i,j) = Scor_12(i,j) + ( delta-gfun_2nd(j,i,+1) ) * gfun_2nd(i,j,-1)
  11. Scor_21(i,j) = Scor_21(i,j) + ( delta-gfun_2nd(j,i,-1) ) * gfun_2nd(i,j,+1)
  12. end do
  13. end do
  1. do i=1,Nsite
  2. do j=1,Nsite
  3. delta = 0.d0
  4. if(i.eq.j) delta = 1.d0
  5. Scor(j,i) = Scor(j,i) + (delta-gfun_up_2nd(j,i))*gfun_up_2nd(i,j) *3
  6. ' 注: *3 没有在原程序中,因为他计算的只是Scor_12. '
  7. ' 注: 指标可能有点错误,应该是Scor(i,j) = Scor(i,j)+ ... '
  8. end do
  9. end do

4 m(0),m(Q)

  1. FM = 0.d0
  2. call mn_lieb(pn)
  3. AF = 0.d0
  4. do i = 1, Nsite
  5. do j = 1, Nsite
  6. FM = FM + Scor_12(i,j)
  7. AF = AF + pn(i)*pn(j)*Scor_12(i,j)
  8. end do
  9. end do
  1. 'm(0)'
  2. do i=1,Nsite
  3. do j=1,Nsite
  4. sus = sus + Scor(i,j)
  5. end do
  6. end do
  7. 'm(Q)'
  8. call mn_lieb_(pn)
  9. do i=1,Nsite
  10. do j=1,Nsite
  11. afm = afm + pn(i)*pn(j)*Scor(i,j)
  12. end do
  13. end do

计算结果对比

===== System Parameters
total core number 3
Row,Col 3 3
Nsite 27
2N 2
U 4.00000000000000
beta 38.0000000000000
interval 1900
p0 10
===== ===== ====== ======

items charge channel spin channel
local magnetic moment (with err) 0.789 0.003 0.787 0.001
Kinetic energy (with err) -1.084 0.002 -1.084 0.003
Total energy (with bar) -0.664 0.005 -1.659 0.001 + U/4
m(0) (with err) 0.63 0.01 0.81 0.04 *HERE
m(Q) (with err) 2.23 0.02 2.90 0.09 *HERE

.
.
.
.
.
.

问题 9/5

问题 9/3

添加新批注
在作者公开此批注前,只有你和作者可见。
回复批注