Searched refs:ggcut (Results 1 – 14 of 14) sorted by relevance
51 real*8 ggcut,g1,g2,g3,gg96 ggcut = lattice_ggcut()98 ggcut = lattice_wggcut()126 gg= gg-ggcut179 ggcut = lattice_ggcut()181 ggcut = lattice_wggcut()208 gg= gg-ggcut
68 real*8 ggcut,g1,g2,g3,gg91 ggcut = 2.0d0*ecut121 if (gg.lt.ggcut) then
87 ggcut = lattice_ggcut()89 ggcut = lattice_wggcut()123 gg= gg-ggcut140 gg= gg-ggcut184 gg= gg-ggcut201 gg= gg-ggcut258 ggcut = lattice_ggcut()292 gg= gg-ggcut309 gg= gg-ggcut349 gg= gg-ggcut[all …]
205 real*8 pi,pi4,gg,w,ggcut273 ggcut = gg1274 if (gg2.lt.ggcut) ggcut = gg2275 if (gg3.lt.ggcut) ggcut = gg3276 if ((2.0d0*control_ecut()).lt.ggcut) ggcut=2.0d0*control_ecut()289 if ((gg-ggcut).lt.-eps) then304 if ((gg-ggcut).lt.-eps) then318 if ((gg-ggcut).lt.-eps) then334 if ((gg-ggcut).lt.-eps) then378 if ((gg-ggcut).lt.-eps) then[all …]
549 real*8 unitg(3,3),ggcut,gg,g1,g2,g3 local606 ggcut = lattice_ggcut()620 if (gg.ge.ggcut) then
44 double precision ggcut,g1,g2,g3,gg,unitg(3,3)153 ggcut = lattice_ggcut()155 ggcut = lattice_wggcut()187 gg= gg-ggcut227 gg= gg-ggcut346 ggcut = lattice_ggcut()348 ggcut = lattice_wggcut()379 gg= gg-ggcut416 gg= gg-ggcut
24 real*8 gg,g1,ggcut,A,E0,sigma,bb,x local
24 real*8 gg,g1,ggcut,A,E0,sigma,bb,x