chiark
/
gitweb
/
~ian
/
moebius2.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
machinery for checking that our OUTER parallel iteration works - before we delete it
[moebius2.git]
/
energy.c
diff --git
a/energy.c
b/energy.c
index c0090677b40f43c4cb09da43b36412741a06c63d..a4cfbb1491221f90b4e454105e8e04473ed89f99 100644
(file)
--- a/
energy.c
+++ b/
energy.c
@@
-174,6
+174,8
@@
void compute_edge_lengths(const Vertices vertices, int section) {
edge_lengths[v1][e]= hypotD(vertices[v1],vertices[v2]);
}
edge_lengths[v1][e]= hypotD(vertices[v1],vertices[v2]);
}
+#include <pthread.h>
+
void compute_vertex_areas(const Vertices vertices, int section) {
int v0,v1,v2, e1,e2;
// int k;
void compute_vertex_areas(const Vertices vertices, int section) {
int v0,v1,v2, e1,e2;
// int k;
@@
-248,7
+250,24
@@
double line_bending_cost(const Vertices vertices, int section) {
double a[D3], b[D3], axb[D3];
double total_cost= 0;
double a[D3], b[D3], axb[D3];
double total_cost= 0;
+ if (quitting_last_iteration) {
+ char buf[100];
+ int n= sprintf(buf,
+ "section=%d thr=%#08lx qi=0x%03x START\n",
+ section,(unsigned long)pthread_self(), N);
+ write(2,buf,n);
+ quitting_reported_threads= 1;
+ }
+
FOR_EDGE(qi,e,ri, OUTER) {
FOR_EDGE(qi,e,ri, OUTER) {
+ if (quitting_last_iteration) {
+ char buf[100];
+ int n= sprintf(buf,
+ "section=%d thr=%#08lx qi=0x%03x,e=%d,ri=0x%03x\n",
+ section,(unsigned long)pthread_self(),qi,e,ri);
+ write(2,buf,n);
+ }
+
pi= EDGE_END2(qi,(e+3)%V6); if (pi<0) continue;
//if (!(qi&XMASK)) fprintf(stderr,"%02x-%02x-%02x (%d)\n",pi,qi,ri,e);
pi= EDGE_END2(qi,(e+3)%V6); if (pi<0) continue;
//if (!(qi&XMASK)) fprintf(stderr,"%02x-%02x-%02x (%d)\n",pi,qi,ri,e);