mirror of
https://igit.ific.uv.es/alramos/latticegpu.jl.git
synced 2025-05-15 03:33:42 +02:00
Full support for twisted bc
This commit is contained in:
parent
26b5dfab01
commit
410a6d7b25
9 changed files with 214 additions and 100 deletions
24
src/YM/YM.jl
24
src/YM/YM.jl
|
@ -104,15 +104,29 @@ function Base.show(io::IO, ymws::YMworkspace)
|
|||
println(io, "Workspace for Group: ", ymws.GRP)
|
||||
println(io, " Algebra: ", ymws.ALG)
|
||||
println(io, "Precision: ", ymws.PRC)
|
||||
if ymws.fpln == nothing
|
||||
println(io, " - Running in memory efficient mode")
|
||||
else
|
||||
println(io, " - Running in computing efficient mode")
|
||||
end
|
||||
|
||||
return nothing
|
||||
end
|
||||
|
||||
|
||||
function ztwist(gp::GaugeParm{T,G}, lp::SpaceParm{N,M,B,D}) where {T,G,N,M,B,D}
|
||||
|
||||
function plnf(ipl)
|
||||
id1, id2 = lp.plidx[ipl]
|
||||
return convert(Complex{T},exp(2im * pi * lp.ntw[ipl]/(lp.iL[id1]*lp.iL[id2]*gp.ng)))
|
||||
end
|
||||
|
||||
return ntuple(i->plnf(i), M)
|
||||
end
|
||||
|
||||
function ztwist(gp::GaugeParm{T,G}, lp::SpaceParm{N,M,B,D}, ipl::Int) where {T,G,N,M,B,D}
|
||||
|
||||
id1, id2 = lp.plidx[ipl]
|
||||
return convert(Complex{T},exp(2im * pi * lp.ntw[ipl]/(lp.iL[id1]*lp.iL[id2]*gp.ng)))
|
||||
end
|
||||
export ztwist
|
||||
|
||||
|
||||
include("YMfields.jl")
|
||||
export randomize!, zero!, norm2
|
||||
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue