我已經寫了一個解決拉普拉斯方程的序列碼,但是當我試圖在Julia中並行寫入時,它需要比串行碼更多的時間和內存。我寫了一個簡單的例子。我怎樣才能平行這段代碼?如何在茱莉亞語中並行簡單的循環?
有一個域名爲t1
。
t2
將計算出來,然後t1 = t2
@everywhere function left!(t1,t2,n,l_type,b_left,dx=1.0,k=50.0)
if l_type==1
for i=1:n
t2[i,1]=(b_left*dx/k)+t1[i,2];
t1[i,1]=t2[i,1];
end
else
for i=1:n
t1[i,1]=b_left;
end
end
return t1 end
# parallel left does not work.
@everywhere function pleft!(t1,t2,n,l_type,b_left,dx=1.0,k=50.0)
if l_type==1
@parallel for i=1:n
t2[i,1]=(b_left*dx/k)+t1[i,2];
t1[i,1]=t2[i,1];
end
else
@parallel for i=1:n
t1[i,1]=b_left;
end
end
return t1
end
n = 10;
t1 = SharedArray(Float64,(n,n));
t2=t1;
typ = 0;
value = 10;
dx = 1;
k=50;
@time t3 = pleft!(t1,t2,n,typ,value,dx,k)
@time t2 = left!(t1,t2,n,typ,value,dx,k)
的答案是:
0.000872 seconds (665 allocations: 21.328 KB) # for parallel one
0.000004 seconds (4 allocations: 160 bytes) #for usual one
我怎樣才能解決這個問題?
經過計算,我應該在while循環中計算下面。 我需要並行下面的代碼。
@everywhere function oneStepseri(t1,N)
t2 = t1;
for j = 2:(N-1)
for i = 2:(N-1)
t2[i,j]=0.25*(t1[i-1,j]+t1[i+1,j]+t1[i,j-1]+t1[i,j+1]);
end
end
return t2;
end
感謝...
您是否在嘗試「預熱」之前計時?例如,不要像'@time rand(1000)'那樣計時,首先應該運行'rand(1000)'三次或四次以便JIT編譯它,然後才應該'@time'。 – RedPointyJackson
是的,我做到了。甚至@time本身。仍然太慢。 –