tests/perf/bspline/intersect

   1 # Test performance of intersection of several NURBS surfaces
   2
   3 if { [regexp {Debug mode} [dversion]] } {
   4    cpulimit 1000
   5 } else {
   6    cpulimit 500
   7 }
   8
   9 bsplinesurf surf1 \
  10 3 4 0 4 1 1 2 1 3 4 \
  11 3 4 0 4 1 1 2 1 3 4 \
  12 0  0  0 1   2  0  0 1   3  0 15 1   5  0 15 1   7  0  0 1   10  0  0 1 \
  13 0  2  0 1   1  3  0 1   4  2 15 1   6  3 15 1   8  2  0 1   10  3  0 1 \
  14 0  4  0 1   3  4  0 1   4  3 15 1   5  3 15 1   7  4  0 1   10  5  0 1 \
  15 0  6  0 1   3  6  0 1   4  6 15 1   5  6 15 1   8  5  0 1   10  7  0 1 \
  16 0  8  0 1   2  8  0 1   4  8 15 1   6  8 15 1   7  7  0 1   10  8  0 1 \
  17 0 10  0 1   2 10  0 1   4 10 15 1   6 10 15 1   7 10  0 1   10 10  0 1
  18
  19 bsplinesurf surf2 \
  20 3 4 0 4 1 1 2 1 3 4 \
  21 3 4 0 4 1 1 2 1 3 4 \
  22 0  0 10  1   2  0  5  1   3  0  4  1   5  0  6  1   7  0 10  1   10  0  5  1 \
  23 0  2  5  1   1  3  7  1   4  2  7  1   6  3  4  1   8  2  4  4   10  3  7  1 \
  24 0  4  8  1   3  4 10  1   4  3  6  1   5  3  8  1   7  4  7  4   10  5  5  1 \
  25 0  6  8  1   3  6 10  1   4  6  6  1   5  6  4  1   8  5  7  4   10  7 10  1 \
  26 0  8  6  1   2  8  5  1   4  8  8  1   6  8  8  1   7  7  3  4   10  8  5  1 \
  27 0 10  8  1   2 10 10  1   4 10  6  1   6 10  5  1   7 10  3  1   10 10 10  1
  28
  29 bsplinesurf surf3 \
  30 2 7 0 3 1 1 2 1 3 1 4 1 5 1 6 3 \
  31 2 3 0 3 1 1 2 3 \
  32 -20  20  10  1   20  20  10  1    20 -20  10  1   -20 -20  10  1   -10  10  10  1   10  10  10  1   10 -10  10  1   -10 -10  10  1 \
  33 -10  10   5  1   15  15   5  1    10 -10   5  1   -15 -15   5  1    -5   5   5  1    5   5   5  1    5  -5   5  1    -5  -5   5  1 \
  34 -15  15  -5  1   10  10  -5  1    15 -15  -5  1   -10 -10  -5  1    -5   5  -5  1    5   5  -5  1    5  -5  -5  1    -5  -5  -5  1 \
  35 -20  20 -10  1   20  20 -10  1    20 -20 -10  1   -20 -20 -10  1   -10  10 -10  1   10  10 -10  1   10 -10 -10  1   -10 -10 -10  1
  36
  37 bsplinesurf surf4 \
  38 4 5 0 5 2 1 4 1 5 1 6 5 \
  39 4 5 0 5 1 1 4 1 6 1 7 5 \
  40  10  20 -20 1     9  19 -19 1     8  18 -18 1     7  17 -17 1     7  17  17 1     8  18  18 1     9  19  19 1    10  20  20 1 \
  41  10 -20  20 1     9 -19  19 1     8 -18  18 1     7 -17  17 1     7 -17 -17 1     8 -18 -18 1     9 -19 -19 1    10 -20 -20 1 \
  42  10  10 -10 1     9   9  -9 1     8   8  -8 1     7   7  -7 1     7   7   7 1     8   8   8 1     9   9   9 1    10  10  10 1 \
  43  10 -10  10 1     9  -9   9 1     8  -8   8 1     7  -7   7 1     7  -7  -7 1     8  -8  -8 1     9  -9  -9 1    10 -10 -10 1 \
  44 -10  20 -20 1    -9  19 -19 1    -8  18 -18 1    -7  17 -17 1    -7  17  17 1    -8  18  18 1    -9  19  19 1   -10  20  20 1 \
  45 -10 -20  20 1    -9 -19  19 1    -8 -18  18 1    -7 -17  17 1    -7 -17 -17 1    -8 -18 -18 1    -9 -19 -19 1   -10 -20 -20 1 \
  46 -10  10 -10 1    -9   9  -9 1    -8   8  -8 1    -7   7  -7 1    -7   7   7 1    -8   8   8 1    -9   9   9 1   -10  10  10 1 \
  47 -10 -10  10 1    -9  -9   9 1    -8  -8   8 1    -7  -7   7 1    -7  -7  -7 1    -8  -8  -8 1    -9  -9  -9 1   -10 -10 -10 1
  48
  49 bsplinesurf surf5 \
  50 1 2 0 2 1 2 \
  51 5 5 0 6 2 1 3 1 6 1 7 6 \
  52 0 0 0 1 10 0 5 2 \
  53 0 10  2  1   10 10  3  1 \
  54 0 20 10  1   10 20 20  1 \
  55 0 30  0  1   10 30  0  1 \
  56 0 40 -1  1   10 40  5  1 \
  57 0 50  5  1   10 50  5  1 \
  58 0 60  4  1   10 60  4  1 \
  59 0 70 -5  1   10 70 -3  1 \
  60 0 80  7  1   10 80  0  1
  61
  62
  63 bsplinesurf surf6 \
  64 2 3 0 3 1 1 2 3 \
  65 5 5 0 6 2 1 3 1 6 1 7 6 \
  66 0 0 0 1 2 0 0 1 5 0 -1 1 10 0 5 2 \
  67 0 10  2  1   3 10  0  1   8 10  5  1   10 10  3  1 \
  68 0 20 10  1   4 20  4  1   7 20  4  1   10 20 20  1 \
  69 0 30  0  1   2 30  0  1   8 30  0  1   10 30  0  1 \
  70 0 40 -1  1   4 40  5  1   9 40  1  1   10 40  5  1 \
  71 0 50  5  1   4 50 10  1   6 50 10  1   10 50  5  1 \
  72 0 60  4  1   3 60 -3  1   7 60 -4  1   10 60  4  1 \
  73 0 70 -5  1   3 70  0  1   5 70  0  1   10 70 -3  1 \
  74 0 80  7  1   3 80  1  1   7 80  3  1   10 80  0  1
  75
  76 bsplinesurf surf7 \
  77 5 5 0 6 1 1 4 1 5 1 8 6 \
  78 5 5 0 6 2 1 3 1 6 1 7 6 \
  79 0  0  0  1   2  0  0  1   5  0 -1  1   10  0  5  1   12  0  1  1   15  0 -3  1   16  0 -3  1   19  0 -4 1   24  0  0  1 \
  80 0 10  2  1   3 10  0  1   8 10  5  1   10 10  3  1   12 10  2  1   15 10  0  1   20 10  5  1   21 10  3 1   24 10  0  1 \
  81 0 20 10  1   4 20  4  1   7 20  4  1   10 20 20  1   12 20 10  1   16 20  4  1   19 20  4  1   20 20 10 1   24 20  0  1 \
  82 0 30  0  1   2 30  0  1   8 30  0  1   10 30  0  1   12 30  0  1   14 30  0  1   20 30  0  1   22 30  0 1   24 30  0  1 \
  83 0 40 -1  1   4 40  5  1   9 40  1  1   10 40  5  1   12 40 -1  1   16 40  5  1   21 40  1  1   22 40  5 1   24 40  0  1 \
  84 0 50  5  1   4 50 10  1   6 50 10  1   10 50  5  1   12 50  5  1   16 50 10  1   18 50 10  1   20 50  5 1   24 50  0  1 \
  85 0 60  4  1   3 60 -3  1   7 60 -4  1   10 60  4  1   12 60  4  1   15 60 -3  1   19 60 -4  1   20 60  4 1   24 60  0  1 \
  86 0 70 -5  1   3 70  0  1   5 70  0  1   10 70 -3  1   12 70 -5  1   15 70  0  1   17 70  0  1   20 70 -3 1   24 70  0  1 \
  87 0 80  7  1   3 80  1  1   7 80  3  1   10 80  0  1   12 80  7  1   15 80  1  1   19 80  3  1   21 80  0 1   24 80  0  1
  88
  89 bsplinesurf surf8 \
  90 5 5 0 6 1 1 4 1 5 1 8 6 \
  91 5 5 0 6 2 1 3 1 6 1 7 6 \
  92 0  0 -8  1   2  0 -7  1   5  0 -9  1   10  0 -8  1   12  0 -9  1   15  0 -7  1   16  0 -8  1   19  0 -8 1   24  0 -8  1 \
  93 0 10 -8  1   3 10 -7  1   8 10 -9  1   10 10 -8  1   12 10 -9  1   15 10 -7  1   20 10 -8  1   21 10 -8 1   24 10 -8  1 \
  94 0 20  8  1   4 20  7  1   7 20  9  1   10 20  8  1   12 20  9  1   16 20  7  1   19 20  8  1   20 20  8 1   24 20  8  1 \
  95 0 30  8  1   2 30  7  1   8 30  9  1   10 30  8  1   12 30  9  1   14 30  7  1   20 30  8  1   22 30  8 1   24 30  8  1 \
  96 0 40 -8  1   4 40 -7  1   9 40 -9  1   10 40 -8  1   12 40 -9  1   16 40 -7  1   21 40 -8  1   22 40 -8 1   24 40 -8  1 \
  97 0 50 -8  1   4 50 -7  1   6 50 -9  1   10 50 -8  1   12 50 -9  1   16 50 -7  1   18 50 -8  1   20 50 -8 1   24 50 -8  1 \
  98 0 60  8  1   3 60  7  1   7 60  9  1   10 60  8  1   12 60  9  1   15 60  7  1   19 60  8  1   20 60  8 1   24 60  8  1 \
  99 0 70  8  1   3 70  7  1   5 70  9  1   10 70  8  1   12 70  9  1   15 70  7  1   17 70  8  1   20 70  8 1   24 70  8  1 \
 100 0 80  8  1   3 80  7  1   7 80  9  1   10 80  8  1   12 80  9  1   15 80  7  1   19 80  8  1   21 80  8 1   24 80  8  1
 101
 102 bsplinesurf rsurf1 \
 103 3 4 0 4 1 1 2 1 3 4 \
 104 3 4 0 4 1 1 2 1 3 4 \
 105 0  0  0 1   2  0  0 1   3  0 15 1   5  0 15 1   7  0  0 1   10  0  0 1 \
 106 0  2  0 1   1  3  0 2   4  2 15 2   6  3 15 2   8  2  0 2   10  3  0 1 \
 107 0  4  0 1   3  4  0 2   4  3 15 3   5  3 15 3   7  4  0 2   10  5  0 1 \
 108 0  6  0 1   3  6  0 2   4  6 15 3   5  6 15 3   8  5  0 2   10  7  0 1 \
 109 0  8  0 1   2  8  0 2   4  8 15 2   6  8 15 2   7  7  0 2   10  8  0 1 \
 110 0 10  0 1   2 10  0 1   4 10 15 1   6 10 15 1   7 10  0 1   10 10  0 1
 111
 112 bsplinesurf rsurf2 \
 113 3 4 0 4 1 1 2 1 3 4 \
 114 3 4 0 4 1 1 2 1 3 4 \
 115 0  0 10  1   2  0  5  1   3  0  4  1   5  0  6  1   7  0 10  1   10  0  5  1 \
 116 0  2  5  1   1  3  7  4   4  2  7  4   6  3  4  4   8  2  4  4   10  3  7  1 \
 117 0  4  8  1   3  4 10  4   4  3  6  2   5  3  8  2   7  4  7  4   10  5  5  1 \
 118 0  6  8  1   3  6 10  4   4  6  6  2   5  6  4  2   8  5  7  4   10  7 10  1 \
 119 0  8  6  1   2  8  5  4   4  8  8  4   6  8  8  4   7  7  3  4   10  8  5  1 \
 120 0 10  8  1   2 10 10  1   4 10  6  1   6 10  5  1   7 10  3  1   10 10 10  1
 121
 122 bsplinesurf rsurf3 \
 123 2 7 0 3 1 1 2 1 3 1 4 1 5 1 6 3 \
 124 2 3 0 3 1 1 2 3 \
 125 -20  20  10  1   20  20  10  1    20 -20  10  2   -20 -20  10 2   -10  10  10  3   10  10  10  4   10 -10  10  4   -10 -10  10  2 \
 126 -10  10   5  1   15  15   5  2    10 -10   5  3   -15 -15   5 1    -5   5   5  1    5   5   5  3    5  -5   5  4    -5  -5   5  3 \
 127 -15  15  -5  3   10  10  -5  1    15 -15  -5  2   -10 -10  -5 2    -5   5  -5  3    5   5  -5  3    5  -5  -5  1    -5  -5  -5  4 \
 128 -20  20 -10  2   20  20 -10  4    20 -20 -10  3   -20 -20 -10 3   -10  10 -10  2   10  10 -10  2   10 -10 -10  1   -10 -10 -10  1
 129
 130 bsplinesurf rsurf4 \
 131 4 5 0 5 2 1 4 1 5 1 6 5 \
 132 4 5 0 5 1 1 4 1 6 1 7 5 \
 133  10  20 -20 1     9  19 -19 1     8  18 -18 2     7  17 -17 2     7  17  17 1     8  18  18 1     9  19  19 4    10  20  20 1 \
 134  10 -20  20 2     9 -19  19 2     8 -18  18 1     7 -17  17 2     7 -17 -17 4     8 -18 -18 3     9 -19 -19 3    10 -20 -20 2 \
 135  10  10 -10 3     9   9  -9 4     8   8  -8 1     7   7  -7 2     7   7   7 4     8   8   8 1     9   9   9 2    10  10  10 3 \
 136  10 -10  10 4     9  -9   9 2     8  -8   8 3     7  -7   7 2     7  -7  -7 1     8  -8  -8 1     9  -9  -9 1    10 -10 -10 4 \
 137 -10  20 -20 4    -9  19 -19 3    -8  18 -18 3    -7  17 -17 2    -7  17  17 1    -8  18  18 2    -9  19  19 4   -10  20  20 4 \
 138 -10 -20  20 3    -9 -19  19 2    -8 -18  18 3    -7 -17  17 1    -7 -17 -17 4    -8 -18 -18 2    -9 -19 -19 3   -10 -20 -20 3 \
 139 -10  10 -10 2    -9   9  -9 1    -8   8  -8 3    -7   7  -7 1    -7   7   7 1    -8   8   8 1    -9   9   9 2   -10  10  10 2 \
 140 -10 -10  10 1    -9  -9   9 1    -8  -8   8 2    -7  -7   7 1    -7  -7  -7 4    -8  -8  -8 1    -9  -9  -9 1   -10 -10 -10 1
 141
 142 bsplinesurf rsurf5 \
 143 1 2 0 2 1 2 \
 144 5 5 0 6 2 1 3 1 6 1 7 6 \
 145 0 0 0 1 10 0 5 2 \
 146 0 10  2  3   10 10  3  1 \
 147 0 20 10  1   10 20 20  4 \
 148 0 30  0  2   10 30  0  2 \
 149 0 40 -1  1   10 40  5  2 \
 150 0 50  5  1   10 50  5  1 \
 151 0 60  4  3   10 60  4  1 \
 152 0 70 -5  5   10 70 -3  2 \
 153 0 80  7  1   10 80  0  1
 154
 155 bsplinesurf rsurf6 \
 156 2 3 0 3 1 1 2 3 \
 157 5 5 0 6 2 1 3 1 6 1 7 6 \
 158 0 0 0 1 2 0 0 1 5 0 -1 1 10 0 5 2 \
 159 0 10  2  3   3 10  0  1   8 10  5  3   10 10  3  1 \
 160 0 20 10  1   4 20  4  3   7 20  4  2   10 20 20  4 \
 161 0 30  0  2   2 30  0  1   8 30  0  1   10 30  0  2 \
 162 0 40 -1  1   4 40  5  2   9 40  1  3   10 40  5  2 \
 163 0 50  5  1   4 50 10  5   6 50 10  5   10 50  5  1 \
 164 0 60  4  3   3 60 -3  1   7 60 -4  1   10 60  4  1 \
 165 0 70 -5  5   3 70  0  1   5 70  0  1   10 70 -3  2 \
 166 0 80  7  1   3 80  1  2   7 80  3  1   10 80  0  1
 167
 168 bsplinesurf rsurf7 \
 169 5 5 0 6 1 1 4 1 5 1 8 6 \
 170 5 5 0 6 2 1 3 1 6 1 7 6 \
 171 0  0  0  1   2  0  0  1   5  0 -1  1   10  0  5  2   12  0  1  1   15  0 -3  2   16  0 -3  1   19  0 -4 1   24  0  0  1 \
 172 0 10  2  3   3 10  0  1   8 10  5  3   10 10  3  1   12 10  2  3   15 10  0  1   20 10  5  3   21 10  3 1   24 10  0  2 \
 173 0 20 10  1   4 20  4  3   7 20  4  2   10 20 20  4   12 20 10  1   16 20  4  3   19 20  4  2   20 20 10 4   24 20  0  1 \
 174 0 30  0  2   2 30  0  1   8 30  0  1   10 30  0  2   12 30  0  2   14 30  0  1   20 30  0  1   22 30  0 2   24 30  0  3 \
 175 0 40 -1  1   4 40  5  2   9 40  1  3   10 40  5  2   12 40 -1  1   16 40  5  2   21 40  1  3   22 40  5 2   24 40  0  1 \
 176 0 50  5  1   4 50 10  5   6 50 10  5   10 50  5  1   12 50  5  1   16 50 10  5   18 50 10  5   20 50  5 1   24 50  0  2 \
 177 0 60  4  3   3 60 -3  1   7 60 -4  1   10 60  4  1   12 60  4  3   15 60 -3  1   19 60 -4  1   20 60  4 1   24 60  0  1 \
 178 0 70 -5  5   3 70  0  1   5 70  0  1   10 70 -3  2   12 70 -5  5   15 70  0  1   17 70  0  1   20 70 -3 2   24 70  0  3 \
 179 0 80  7  1   3 80  1  2   7 80  3  1   10 80  0  1   12 80  7  1   15 80  1  2   19 80  3  1   21 80  0 1   24 80  0  1
 180
 181 bsplinesurf rsurf8 \
 182 5 5 0 6 1 1 4 1 5 1 8 6 \
 183 5 5 0 6 2 1 3 1 6 1 7 6 \
 184 0  0 -8  1   2  0 -7  1   5  0 -9  1   10  0 -8  2   12  0 -9  1   15  0 -7  2   16  0 -8  1   19  0 -8 1   24  0 -8  1 \
 185 0 10 -8  3   3 10 -7  1   8 10 -9  3   10 10 -8  1   12 10 -9  3   15 10 -7  1   20 10 -8  3   21 10 -8 1   24 10 -8  2 \
 186 0 20  8  1   4 20  7  3   7 20  9  2   10 20  8  4   12 20  9  1   16 20  7  3   19 20  8  2   20 20  8 4   24 20  8  1 \
 187 0 30  8  2   2 30  7  1   8 30  9  1   10 30  8  2   12 30  9  2   14 30  7  1   20 30  8  1   22 30  8 2   24 30  8  3 \
 188 0 40 -8  1   4 40 -7  2   9 40 -9  3   10 40 -8  2   12 40 -9  1   16 40 -7  2   21 40 -8  3   22 40 -8 2   24 40 -8  1 \
 189 0 50 -8  1   4 50 -7  5   6 50 -9  5   10 50 -8  1   12 50 -9  1   16 50 -7  5   18 50 -8  5   20 50 -8 1   24 50 -8  2 \
 190 0 60  8  3   3 60  7  1   7 60  9  1   10 60  8  1   12 60  9  3   15 60  7  1   19 60  8  1   20 60  8 1   24 60  8  1 \
 191 0 70  8  5   3 70  7  1   5 70  9  1   10 70  8  2   12 70  9  5   15 70  7  1   17 70  8  1   20 70  8 2   24 70  8  3 \
 192 0 80  8  1   3 80  7  2   7 80  9  1   10 80  8  1   12 80  9  1   15 80  7  2   19 80  8  1   21 80  8 1   24 80  8  1
 193
 194 # intersect all surfaces
 195 set surfaces [list surf1 surf2 rsurf1 surf3 rsurf2 surf4 rsurf3 surf5 rsurf4 surf6 rsurf5 surf7 rsurf6 surf8 rsurf7 rsurf8]
 196 #set i 1
 197 #set shapes {}
 198 foreach s1 $surfaces {
 199 #    mkface f_$s1 $s1
 200 #    lappend shapes f_$s1
 201     foreach s2 $surfaces {
 202         if { $s1 != $s2 } {
 203             intersect r $s1 $s2
 204 #            if { [regexp {a 3d curve} [whatis r]] } {
 205 #                mkedge e_$i r
 206 #                lappend shapes e_$i
 207 #                incr i
 208 #            }
 209         }
 210     }
 211 }
 212
 213 #eval vdisplay $shapes; vfit