interim svgp commit

This commit is contained in:
James Hensman 2015-05-15 08:10:34 +01:00
parent 1c294cad40
commit 2249ec06a5
2 changed files with 29 additions and 8 deletions

View file

@ -14,6 +14,22 @@ for(nd=0;nd<(D*N);nd++){
} //grad_X
void _lengthscale_grads_unsafe(int N, int M, int Q, double* tmp, double* X, double* X2, double* grad){
int n,m,nm,q,nQ,mQ;
double dist;
#pragma omp parallel for private(n,m,nm,q,nQ,mQ,dist)
for(nm=0; nm<(N*M); nm++){
n = nm/M;
m = nm%M;
nQ = n*Q;
mQ = m*Q;
for(q=0; q<Q; q++){
dist = X[nQ+q]-X2[mQ+q];
grad[q] += tmp[nm]*dist*dist;
}
}
} //lengthscale_grads
void _lengthscale_grads(int N, int M, int Q, double* tmp, double* X, double* X2, double* grad){
int n,m,q;
@ -34,3 +50,5 @@ for(q=0; q<Q; q++){