double *f = NULL, dist, F, Fnorm = 0, Fnorm0;
int iter = 0;
int adaptive_cooling = ctrl->adaptive_cooling;
- QuadTree qt = NULL;
double *force;
#ifdef TIME
clock_t start, end, start0, start2;
- double qtree_cpu = 0, qtree_cpu0 = 0;
+ double qtree_cpu = 0;
double total_cpu = 0;
start0 = clock();
#endif
}/* done vertex i */
- if (qt) {
- QuadTree_delete(qt);
-#ifdef TIME
- qtree_cpu0 = qtree_cpu - qtree_cpu0;
- if (Verbose && 0) fprintf(stderr, "\n cpu this outer iter = %f, quadtree time = %f other time = %f\n",((double) (clock() - start2)) / CLOCKS_PER_SEC, qtree_cpu0,((double) (clock() - start2))/CLOCKS_PER_SEC - qtree_cpu0);
- qtree_cpu0 = qtree_cpu;
-#endif
- if (Verbose && 0) fprintf(stderr, "nsuper_avg=0, counts_avg = 0 2*nsuper+counts=0\n");
- oned_optimizer_train(qtree_level_optimizer, 0);
- }
-
#ifdef ENERGY
if (Verbose) {
fprintf(stderr, "\r iter = %d, step = %f Fnorm = %f nsuper = 0 nz = %d K = %f ",iter, step, Fnorm,A->nz,K);