Changes in / [2e613f3:d148fbc] in sasmodels
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
sasmodels/kernel_iq.c
r303d8d6 re1bdc7e 50 50 ) 51 51 { 52 printf(" hello\n");52 printf("aliasing\n"); 53 53 // Storage for the current parameter values. These will be updated as we 54 54 // walk the polydispersity cube. … … 56 56 double *pvec = (double *)(&local_pars); // Alias named parameters with a vector 57 57 58 printf("allocating\n"); 58 59 local int offset[NPARS-2]; 59 60 60 #if defined(USE_SHORTCUT_OPTIMIZATION) 61 if (pd_length[0] == 1) { 61 #if 1 // defined(USE_SHORTCUT_OPTIMIZATION) 62 printf("dereferencing %p as %d\n", problem, problem->pd_length[0]); 63 if (problem->pd_length[0] == 1) { 62 64 // Shouldn't need to copy!! 65 printf("copying\n"); 63 66 for (int k=0; k < NPARS; k++) { 64 67 pvec[k] = pars[k+2]; // skip scale and background 65 68 } 69 printf("calculating\n"); 66 70 67 71 #ifdef USE_OPENMP … … 69 73 #endif 70 74 for (int i=0; i < nq; i++) { 71 {72 75 const double scattering = CALL_IQ(q, i, local_pars); 73 76 result[i] += pars[0]*scattering + pars[1]; 74 77 } 78 printf("returning\n"); 75 79 return; 76 80 } 81 printf("falling through\n"); 77 82 #endif 78 83
Note: See TracChangeset
for help on using the changeset viewer.