lattice/latticegpu.jl
1
0
Fork 0
mirror of https://igit.ific.uv.es/alramos/latticegpu.jl.git synced 2025-05-14 19:23:42 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

Bugs corrected

Browse source
This commit is contained in:
Alberto Ramos 2021-10-27 18:01:40 +02:00
parent 64bc28c112
commit 6b42a168ee
2 changed files with 6 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/YM/YMhmc.jl
View file

@ -86,7 +86,7 @@ function HMC!(U, int::IntrScheme, lp::SpaceParm, gp::GaugeParm, ymws::YMworkspac
end
return dh, acc
end
HMC!(U, eps, ns, lp::SpaceParm, gp::GaugeParm, ymws::YMworkspace{T}; noacc=false) where T = HMC!(U, omf4(T, int.eps, int.ns), lp, gp, ymws; noacc=noacc)
HMC!(U, eps, ns, lp::SpaceParm, gp::GaugeParm, ymws::YMworkspace{T}; noacc=false) where T = HMC!(U, omf4(T, eps, ns), lp, gp, ymws; noacc=noacc)
function MD!(mom, U, int::IntrScheme{NI, T}, lp::SpaceParm, gp::GaugeParm{T}, ymws::YMworkspace{T}) where {NI, T <: AbstractFloat}

7
src/YM/YMsf.jl
View file

@ -25,7 +25,9 @@ function sfcoupling(U, lp::SpaceParm{N,M,B,D}, gp::GaugeParm, ymws::YMworkspace)
end
@timeit "SF coupling measurement" begin
tmp = zeros(eltype(ymws.rm),lp.iL[end])
T = eltype(ymws.rm)
tmp = zeros(T,lp.iL[end])
fill!(ymws.rm, zero(T))
CUDA.@sync begin
CUDA.@cuda threads=lp.bsz blocks=lp.rsz krnl_sfcoupling!(ymws.rm, U, gp.Ubnd, lp)
end
@ -48,9 +50,8 @@ function krnl_sfcoupling!(rm, U::AbstractArray{T}, Ubnd::T, lp::SpaceParm{N,M,B,
it = I[N]
SR3::eltype(rm) = 1.73205080756887729352744634151
SR3x2::type(rm) = 3.46410161513775458705489268302
SR3x2::eltype(rm) = 3.46410161513775458705489268302
rm[I] = zero(eltype(rm))
if (it == 1)
but, rut = up((b,r), N, lp)
IU = point_coord((but,rut), lp)