Changeset ba32cdd in sasmodels for sasmodels/kernel_iq.c

Timestamp:

Mar 24, 2016 6:36:40 PM (8 years ago)

Author:

Paul Kienzle <pkienzle@…>

Branches:

master, core_shell_microgels, costrafo411, magnetic_model, release_v0.94, release_v0.95, ticket-1257-vesicle-product, ticket_1156, ticket_1265_superball, ticket_822_more_unit_tests

Children:

5ff1b03

Parents:

151f3bc

Message:

fix opencl compile; still doesn't run

File:

• sasmodels/kernel_iq.c (modified) (4 diffs)

sasmodels/kernel_iq.c

@@ -74 +74 @@
 
 #if MAX_PD > 0
-
-printf("Entering polydispersity\n");
+  //printf("Entering polydispersity\n");
+
   // Since we are no longer looping over the entire polydispersity hypercube
   // for each q, we need to track the normalization values for each q in a
@@ -136 +136 @@
         if (problem->pd_isvol[k]) partial_volweight *= wi;
       }
-      printf("slow %d: ", loop_index);
+      //printf("slow %d: ", loop_index);
       for (int k=0; k < NPARS; k++) {
         int coord = problem->par_coord[k];
@@ -150 +150 @@
         offset[k] = this_offset;
         pvec[k] = values[this_offset];
-        printf("p[%d]=v[%d]=%g ", k, offset[k], pvec[k]);
-      }
-      printf("\n");
+        //printf("p[%d]=v[%d]=%g ", k, offset[k], pvec[k]);
+      }
+      //printf("\n");
       weight = partial_weight * weights[problem->pd_offset[0]+pd_index[0]];
       if (problem->theta_par >= 0) {
@@ -168 +168 @@
       weight = partial_weight*wi;
       if (problem->pd_isvol[0]) vol_weight *= wi;
-      printf("fast %d: ", loop_index);
+      //printf("fast %d: ", loop_index);
       for (int k=0; k < problem->fast_coord_count; k++) {
         const int pindex = problem->fast_coord_pars[k];
         pvec[pindex] = values[++offset[pindex]];
-        printf("p[%d]=v[%d]=%g ", pindex, offset[pindex], pvec[pindex]);
-      }
-      printf("\n");
+        //printf("p[%d]=v[%d]=%g ", pindex, offset[pindex], pvec[pindex]);
+      }
+      //printf("\n");
       if (problem->theta_par == problem->pd_par[0]) {
         weight *= fabs(cos(M_PI_180*pvec[problem->theta_par]));