remove loop from conjugate gradient
Some checks failed
studiorailgun/Renderer/pipeline/head There was a failure building this commit
Some checks failed
studiorailgun/Renderer/pipeline/head There was a failure building this commit
This commit is contained in:
parent
2247a5d9dd
commit
7c13bf6d99
@ -231,26 +231,18 @@ float solver_conjugate_gradient_iterate_serial(float * phi, float * phi0, float
|
|||||||
fflush(stdout);
|
fflush(stdout);
|
||||||
}
|
}
|
||||||
alpha = convergence / denominator;
|
alpha = convergence / denominator;
|
||||||
|
r_new_dot = 0;
|
||||||
for(k=1; k<DIM-1; k++){
|
for(k=1; k<DIM-1; k++){
|
||||||
for(j=1; j<DIM-1; j++){
|
for(j=1; j<DIM-1; j++){
|
||||||
for(i = 1; i < DIM-1; i++){
|
for(i = 1; i < DIM-1; i++){
|
||||||
phi[ode_index(i,j,k,DIM)] = phi[ode_index(i,j,k,DIM)] + alpha * p[ode_index(i,j,k,DIM)];
|
phi[ode_index(i,j,k,DIM)] = phi[ode_index(i,j,k,DIM)] + alpha * p[ode_index(i,j,k,DIM)];
|
||||||
r[ode_index(i,j,k,DIM)] = r[ode_index(i,j,k,DIM)] - alpha * A[ode_index(i,j,k,DIM)];
|
r[ode_index(i,j,k,DIM)] = r[ode_index(i,j,k,DIM)] - alpha * A[ode_index(i,j,k,DIM)];
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
r_new_dot = 0;
|
|
||||||
for(k=1; k<DIM-1; k++){
|
|
||||||
for(j=1; j<DIM-1; j++){
|
|
||||||
for(i = 1; i < DIM-1; i++){
|
|
||||||
r_new_dot = r_new_dot + r[ode_index(i,j,k,DIM)] * r[ode_index(i,j,k,DIM)];
|
r_new_dot = r_new_dot + r[ode_index(i,j,k,DIM)] * r[ode_index(i,j,k,DIM)];
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
beta = r_new_dot / convergence;
|
beta = r_new_dot / convergence;
|
||||||
|
|
||||||
for(k=1; k<DIM-1; k++){
|
for(k=1; k<DIM-1; k++){
|
||||||
for(j=1; j<DIM-1; j++){
|
for(j=1; j<DIM-1; j++){
|
||||||
for(i = 1; i < DIM-1; i++){
|
for(i = 1; i < DIM-1; i++){
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user