Changeset 17106
- Timestamp:
- 01/13/14 19:45:49 (11 years ago)
- Location:
- issm/trunk-jpl/src/c
- Files:
-
- 3 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk-jpl/src/c/analyses/StressbalanceAnalysis.cpp
r17103 r17106 2596 2596 2597 2597 /* Start looping on the number of gaussian points: */ 2598 Gauss* gauss = element->NewGauss( 5);2598 Gauss* gauss = element->NewGauss(10); 2599 2599 for(int ig=gauss->begin();ig<gauss->end();ig++){ 2600 2600 gauss->GaussPoint(ig); … … 2680 2680 element->GetGroundedPart(&point1,&fraction1,&fraction2,&mainlyfloating); 2681 2681 //gauss = element->NewGauss(point1,fraction1,fraction2,mainlyfloating,2); 2682 gauss=element->NewGaussBase( 3);2682 gauss=element->NewGaussBase(10); 2683 2683 } 2684 2684 else{ 2685 gauss=element->NewGaussBase( 3);2685 gauss=element->NewGaussBase(10); 2686 2686 } 2687 2687 … … 2771 2771 2772 2772 /* Start looping on the number of gaussian points: */ 2773 Gauss* gauss=element->NewGauss( 5);2773 Gauss* gauss=element->NewGauss(10); 2774 2774 for(int ig=gauss->begin();ig<gauss->end();ig++){ 2775 2775 gauss->GaussPoint(ig); … … 2844 2844 2845 2845 /* Start looping on the number of gaussian points: */ 2846 Gauss* gauss=element->NewGaussBase( 5);2846 Gauss* gauss=element->NewGaussBase(10); 2847 2847 for(int ig=gauss->begin();ig<gauss->end();ig++){ 2848 2848 gauss->GaussPoint(ig); -
issm/trunk-jpl/src/c/modules/ModelProcessorx/CreateNodes.cpp
r17104 r17106 13 13 /*Intermediaries*/ 14 14 int i,j,counter,vnodes,lid=0; 15 int id0 = iomodel->nodecounter; 15 16 bool *my_edges = NULL; 16 17 bool *my_nodes = NULL; … … 21 22 for(i=0;i<iomodel->numberofvertices;i++){ 22 23 if(iomodel->my_vertices[i]){ 23 nodes->AddObject(new Node(i omodel->nodecounter+i+1,i,lid++,i,iomodel,analysis,approximation));24 nodes->AddObject(new Node(id0+i+1,i,lid++,i,iomodel,analysis,approximation)); 24 25 } 25 26 } … … 31 32 for(j=0;j<3;j++){ 32 33 if(my_nodes[3*i+j]){ 33 nodes->AddObject(new Node(i omodel->nodecounter+3*i+j+1,iomodel->nodecounter+3*i+j,lid++,iomodel->elements[+3*i+j]-1,iomodel,analysis,approximation));34 nodes->AddObject(new Node(id0+3*i+j+1,id0+3*i+j,lid++,iomodel->elements[+3*i+j]-1,iomodel,analysis,approximation)); 34 35 35 36 } … … 41 42 for(i=0;i<iomodel->numberofvertices;i++){ 42 43 if(iomodel->my_vertices[i]){ 43 nodes->AddObject(new Node(i omodel->nodecounter+i+1,i,lid++,i,iomodel,analysis,approximation));44 nodes->AddObject(new Node(id0+i+1,i,lid++,i,iomodel,analysis,approximation)); 44 45 } 45 46 } 46 47 for(i=0;i<iomodel->numberofelements;i++){ 47 48 if(iomodel->my_elements[i]){ 48 nodes->AddObject(new Node(i omodel->nodecounter+iomodel->numberofvertices+i+1,iomodel->numberofvertices+i,lid++,0,iomodel,analysis,approximation));49 nodes->AddObject(new Node(id0+iomodel->numberofvertices+i+1,iomodel->numberofvertices+i,lid++,0,iomodel,analysis,approximation)); 49 50 } 50 51 } … … 54 55 for(i=0;i<iomodel->numberofvertices;i++){ 55 56 if(iomodel->my_vertices[i]){ 56 nodes->AddObject(new Node(i omodel->nodecounter+i+1,i,lid++,i,iomodel,analysis,approximation));57 nodes->AddObject(new Node(id0+i+1,i,lid++,i,iomodel,analysis,approximation)); 57 58 } 58 59 } 59 60 for(i=0;i<iomodel->numberofelements;i++){ 60 61 if(iomodel->my_elements[i]){ 61 node = new Node(i omodel->nodecounter+iomodel->numberofvertices+i+1,iomodel->numberofvertices+i,lid++,0,iomodel,analysis,approximation);62 node = new Node(id0+iomodel->numberofvertices+i+1,iomodel->numberofvertices+i,lid++,0,iomodel,analysis,approximation); 62 63 node->Deactivate(); 63 64 nodes->AddObject(node); … … 70 71 for(i=0;i<iomodel->numberofvertices;i++){ 71 72 if(iomodel->my_vertices[i]){ 72 nodes->AddObject(new Node(i omodel->nodecounter+i+1,i,lid++,i,iomodel,analysis,approximation));73 nodes->AddObject(new Node(id0+i+1,i,lid++,i,iomodel,analysis,approximation)); 73 74 } 74 75 } … … 78 79 if(iomodel->edges[i*3+2]==2){ 79 80 if(my_edges[i]){ 80 node = new Node(i omodel->nodecounter+iomodel->numberofvertices+i+1,counter+1,lid++,0,iomodel,analysis,approximation);81 node = new Node(id0+iomodel->numberofvertices+i+1,counter+1,lid++,0,iomodel,analysis,approximation); 81 82 nodes->AddObject(node); 82 83 } … … 90 91 for(i=0;i<iomodel->numberofvertices;i++){ 91 92 if(iomodel->my_vertices[i]){ 92 nodes->AddObject(new Node(i omodel->nodecounter+i+1,i,lid++,i,iomodel,analysis,approximation));93 nodes->AddObject(new Node(id0+i+1,i,lid++,i,iomodel,analysis,approximation)); 93 94 } 94 95 } … … 98 99 if(iomodel->edges[i*3+2]==2){ 99 100 if(my_edges[i]){ 100 node = new Node(i omodel->nodecounter+iomodel->numberofvertices+2*i+1,counter+1,lid++,0,iomodel,analysis,approximation);101 nodes->AddObject(node); 102 node = new Node(i omodel->nodecounter+iomodel->numberofvertices+2*i+2,counter+2,lid++,0,iomodel,analysis,approximation);101 node = new Node(id0+iomodel->numberofvertices+2*i+1,counter+1,lid++,0,iomodel,analysis,approximation); 102 nodes->AddObject(node); 103 node = new Node(id0+iomodel->numberofvertices+2*i+2,counter+2,lid++,0,iomodel,analysis,approximation); 103 104 nodes->AddObject(node); 104 105 } … … 112 113 for(i=0;i<iomodel->numberofvertices;i++){ 113 114 if(iomodel->my_vertices[i]){ 114 nodes->AddObject(new Node(i omodel->nodecounter+i+1,i,lid++,i,iomodel,analysis,approximation));115 nodes->AddObject(new Node(id0+i+1,i,lid++,i,iomodel,analysis,approximation)); 115 116 } 116 117 } … … 120 121 if(iomodel->edges[i*3+2]!=2){ 121 122 if(my_edges[i]){ 122 node = new Node(i omodel->nodecounter+iomodel->numberofvertices+i+1,counter+1,lid++,0,iomodel,analysis,approximation);123 node = new Node(id0+iomodel->numberofvertices+i+1,counter+1,lid++,0,iomodel,analysis,approximation); 123 124 nodes->AddObject(node); 124 125 } … … 132 133 for(i=0;i<iomodel->numberofvertices;i++){ 133 134 if(iomodel->my_vertices[i]){ 134 nodes->AddObject(new Node(i omodel->nodecounter+i+1,i,lid++,i,iomodel,analysis,approximation));135 nodes->AddObject(new Node(id0+i+1,i,lid++,i,iomodel,analysis,approximation)); 135 136 } 136 137 } 137 138 for(i=0;i<iomodel->numberofedges;i++){ 138 139 if(my_edges[i]){ 139 nodes->AddObject(new Node(i omodel->nodecounter+iomodel->numberofvertices+i+1,iomodel->numberofvertices+i,lid++,0,iomodel,analysis,approximation));140 nodes->AddObject(new Node(id0+iomodel->numberofvertices+i+1,iomodel->numberofvertices+i,lid++,0,iomodel,analysis,approximation)); 140 141 } 141 142 } … … 145 146 for(i=0;i<iomodel->numberofvertices;i++){ 146 147 if(iomodel->my_vertices[i]){ 147 nodes->AddObject(new Node(i omodel->nodecounter+i+1,i,lid++,i,iomodel,analysis,approximation));148 nodes->AddObject(new Node(id0+i+1,i,lid++,i,iomodel,analysis,approximation)); 148 149 } 149 150 } … … 152 153 if(iomodel->edges[i*3+2]==2){/*Vertical edges*/ 153 154 if(my_edges[i]){ 154 node = new Node(i omodel->nodecounter+iomodel->numberofvertices+4*i+1,counter+1,lid++,0,iomodel,analysis,approximation);155 nodes->AddObject(node); 156 node = new Node(i omodel->nodecounter+iomodel->numberofvertices+4*i+2,counter+2,lid++,0,iomodel,analysis,approximation);157 nodes->AddObject(node); 158 node = new Node(i omodel->nodecounter+iomodel->numberofvertices+4*i+3,counter+3,lid++,0,iomodel,analysis,approximation);155 node = new Node(id0+iomodel->numberofvertices+4*i+1,counter+1,lid++,0,iomodel,analysis,approximation); 156 nodes->AddObject(node); 157 node = new Node(id0+iomodel->numberofvertices+4*i+2,counter+2,lid++,0,iomodel,analysis,approximation); 158 nodes->AddObject(node); 159 node = new Node(id0+iomodel->numberofvertices+4*i+3,counter+3,lid++,0,iomodel,analysis,approximation); 159 160 nodes->AddObject(node); 160 161 } … … 163 164 else if(iomodel->edges[i*3+2]==1){/*Basal edges*/ 164 165 if(my_edges[i]){ 165 node = new Node(i omodel->nodecounter+iomodel->numberofvertices+4*i+1,counter+1,lid++,0,iomodel,analysis,approximation);166 nodes->AddObject(node); 167 node = new Node(i omodel->nodecounter+iomodel->numberofvertices+4*i+2,counter+2,lid++,0,iomodel,analysis,approximation);168 nodes->AddObject(node); 169 node = new Node(i omodel->nodecounter+iomodel->numberofvertices+4*i+3,counter+3,lid++,0,iomodel,analysis,approximation);170 nodes->AddObject(node); 171 node = new Node(i omodel->nodecounter+iomodel->numberofvertices+4*i+4,counter+4,lid++,0,iomodel,analysis,approximation);166 node = new Node(id0+iomodel->numberofvertices+4*i+1,counter+1,lid++,0,iomodel,analysis,approximation); 167 nodes->AddObject(node); 168 node = new Node(id0+iomodel->numberofvertices+4*i+2,counter+2,lid++,0,iomodel,analysis,approximation); 169 nodes->AddObject(node); 170 node = new Node(id0+iomodel->numberofvertices+4*i+3,counter+3,lid++,0,iomodel,analysis,approximation); 171 nodes->AddObject(node); 172 node = new Node(id0+iomodel->numberofvertices+4*i+4,counter+4,lid++,0,iomodel,analysis,approximation); 172 173 nodes->AddObject(node); 173 174 } … … 176 177 else if(iomodel->edges[i*3+2]==3){/*Top edges*/ 177 178 if(my_edges[i]){ 178 node = new Node(i omodel->nodecounter+iomodel->numberofvertices+4*i+1,counter+1,lid++,0,iomodel,analysis,approximation);179 node = new Node(id0+iomodel->numberofvertices+4*i+1,counter+1,lid++,0,iomodel,analysis,approximation); 179 180 nodes->AddObject(node); 180 181 } … … 193 194 for(i=0;i<iomodel->numberofvertices;i++){ 194 195 if(iomodel->my_vertices[i]){ 195 nodes->AddObject(new Node(i omodel->nodecounter+i+1,i,lid++,i,iomodel,analysis,FSvelocityEnum));196 } 197 } 198 /*P1 pressure*/ 199 vnodes = i omodel->nodecounter+iomodel->numberofvertices;196 nodes->AddObject(new Node(id0+i+1,i,lid++,i,iomodel,analysis,FSvelocityEnum)); 197 } 198 } 199 /*P1 pressure*/ 200 vnodes = id0+iomodel->numberofvertices; 200 201 for(i=0;i<iomodel->numberofvertices;i++){ 201 202 if(iomodel->my_vertices[i]){ … … 209 210 for(i=0;i<iomodel->numberofvertices;i++){ 210 211 if(iomodel->my_vertices[i]){ 211 nodes->AddObject(new Node(i omodel->nodecounter+i+1,i,lid++,i,iomodel,analysis,FSvelocityEnum));212 } 213 } 214 /*P1 pressure*/ 215 vnodes = i omodel->nodecounter+iomodel->numberofvertices;212 nodes->AddObject(new Node(id0+i+1,i,lid++,i,iomodel,analysis,FSvelocityEnum)); 213 } 214 } 215 /*P1 pressure*/ 216 vnodes = id0+iomodel->numberofvertices; 216 217 for(i=0;i<iomodel->numberofvertices;i++){ 217 218 if(iomodel->my_vertices[i]){ … … 225 226 for(i=0;i<iomodel->numberofvertices;i++){ 226 227 if(iomodel->my_vertices[i]){ 227 nodes->AddObject(new Node(i omodel->nodecounter+i+1,i,lid++,i,iomodel,analysis,FSvelocityEnum));228 nodes->AddObject(new Node(id0+i+1,i,lid++,i,iomodel,analysis,FSvelocityEnum)); 228 229 } 229 230 } 230 231 for(i=0;i<iomodel->numberofelements;i++){ 231 232 if(iomodel->my_elements[i]){ 232 node = new Node(i omodel->nodecounter+iomodel->numberofvertices+i+1,iomodel->numberofvertices+i,lid++,0,iomodel,analysis,FSvelocityEnum);233 node = new Node(id0+iomodel->numberofvertices+i+1,iomodel->numberofvertices+i,lid++,0,iomodel,analysis,FSvelocityEnum); 233 234 node->Deactivate(); 234 235 nodes->AddObject(node); … … 236 237 } 237 238 /*P1 pressure*/ 238 vnodes = i omodel->nodecounter+iomodel->numberofvertices+iomodel->numberofelements;239 vnodes = id0+iomodel->numberofvertices+iomodel->numberofelements; 239 240 for(i=0;i<iomodel->numberofvertices;i++){ 240 241 if(iomodel->my_vertices[i]){ … … 248 249 for(i=0;i<iomodel->numberofvertices;i++){ 249 250 if(iomodel->my_vertices[i]){ 250 nodes->AddObject(new Node(i omodel->nodecounter+i+1,i,lid++,i,iomodel,analysis,FSvelocityEnum));251 nodes->AddObject(new Node(id0+i+1,i,lid++,i,iomodel,analysis,FSvelocityEnum)); 251 252 } 252 253 } 253 254 for(i=0;i<iomodel->numberofelements;i++){ 254 255 if(iomodel->my_elements[i]){ 255 nodes->AddObject(new Node(i omodel->nodecounter+iomodel->numberofvertices+i+1,iomodel->numberofvertices+i,lid++,0,iomodel,analysis,FSvelocityEnum));256 } 257 } 258 /*P1 pressure*/ 259 vnodes = i omodel->nodecounter+iomodel->numberofvertices+iomodel->numberofelements;256 nodes->AddObject(new Node(id0+iomodel->numberofvertices+i+1,iomodel->numberofvertices+i,lid++,0,iomodel,analysis,FSvelocityEnum)); 257 } 258 } 259 /*P1 pressure*/ 260 vnodes = id0+iomodel->numberofvertices+iomodel->numberofelements; 260 261 for(i=0;i<iomodel->numberofvertices;i++){ 261 262 if(iomodel->my_vertices[i]){ … … 270 271 for(i=0;i<iomodel->numberofvertices;i++){ 271 272 if(iomodel->my_vertices[i]){ 272 nodes->AddObject(new Node(i omodel->nodecounter+i+1,i,lid++,i,iomodel,analysis,FSvelocityEnum));273 nodes->AddObject(new Node(id0+i+1,i,lid++,i,iomodel,analysis,FSvelocityEnum)); 273 274 } 274 275 } 275 276 for(i=0;i<iomodel->numberofedges;i++){ 276 277 if(my_edges[i]){ 277 nodes->AddObject(new Node(i omodel->nodecounter+iomodel->numberofvertices+i+1,iomodel->numberofvertices+i,lid++,0,iomodel,analysis,FSvelocityEnum));278 } 279 } 280 281 /*P1 pressure*/ 282 vnodes = i omodel->nodecounter+iomodel->numberofvertices+iomodel->numberofedges;278 nodes->AddObject(new Node(id0+iomodel->numberofvertices+i+1,iomodel->numberofvertices+i,lid++,0,iomodel,analysis,FSvelocityEnum)); 279 } 280 } 281 282 /*P1 pressure*/ 283 vnodes = id0+iomodel->numberofvertices+iomodel->numberofedges; 283 284 for(i=0;i<iomodel->numberofvertices;i++){ 284 285 if(iomodel->my_vertices[i]){ … … 293 294 for(i=0;i<iomodel->numberofvertices;i++){ 294 295 if(iomodel->my_vertices[i]){ 295 nodes->AddObject(new Node(i omodel->nodecounter+i+1,i,lid++,i,iomodel,analysis,FSvelocityEnum));296 nodes->AddObject(new Node(id0+i+1,i,lid++,i,iomodel,analysis,FSvelocityEnum)); 296 297 } 297 298 } … … 300 301 if(iomodel->edges[i*3+2]==2){/*Vertical edges*/ 301 302 if(my_edges[i]){ 302 node = new Node(i omodel->nodecounter+iomodel->numberofvertices+4*i+1,counter+1,lid++,0,iomodel,analysis,FSvelocityEnum);303 nodes->AddObject(node); 304 node = new Node(i omodel->nodecounter+iomodel->numberofvertices+4*i+2,counter+2,lid++,0,iomodel,analysis,FSvelocityEnum);305 nodes->AddObject(node); 306 node = new Node(i omodel->nodecounter+iomodel->numberofvertices+4*i+3,counter+3,lid++,0,iomodel,analysis,FSvelocityEnum);303 node = new Node(id0+iomodel->numberofvertices+4*i+1,counter+1,lid++,0,iomodel,analysis,FSvelocityEnum); 304 nodes->AddObject(node); 305 node = new Node(id0+iomodel->numberofvertices+4*i+2,counter+2,lid++,0,iomodel,analysis,FSvelocityEnum); 306 nodes->AddObject(node); 307 node = new Node(id0+iomodel->numberofvertices+4*i+3,counter+3,lid++,0,iomodel,analysis,FSvelocityEnum); 307 308 nodes->AddObject(node); 308 309 } … … 311 312 else if(iomodel->edges[i*3+2]==1){/*Basal edges*/ 312 313 if(my_edges[i]){ 313 node = new Node(i omodel->nodecounter+iomodel->numberofvertices+4*i+1,counter+1,lid++,0,iomodel,analysis,FSvelocityEnum);314 nodes->AddObject(node); 315 node = new Node(i omodel->nodecounter+iomodel->numberofvertices+4*i+2,counter+2,lid++,0,iomodel,analysis,FSvelocityEnum);316 nodes->AddObject(node); 317 node = new Node(i omodel->nodecounter+iomodel->numberofvertices+4*i+3,counter+3,lid++,0,iomodel,analysis,FSvelocityEnum);318 nodes->AddObject(node); 319 node = new Node(i omodel->nodecounter+iomodel->numberofvertices+4*i+4,counter+4,lid++,0,iomodel,analysis,FSvelocityEnum);314 node = new Node(id0+iomodel->numberofvertices+4*i+1,counter+1,lid++,0,iomodel,analysis,FSvelocityEnum); 315 nodes->AddObject(node); 316 node = new Node(id0+iomodel->numberofvertices+4*i+2,counter+2,lid++,0,iomodel,analysis,FSvelocityEnum); 317 nodes->AddObject(node); 318 node = new Node(id0+iomodel->numberofvertices+4*i+3,counter+3,lid++,0,iomodel,analysis,FSvelocityEnum); 319 nodes->AddObject(node); 320 node = new Node(id0+iomodel->numberofvertices+4*i+4,counter+4,lid++,0,iomodel,analysis,FSvelocityEnum); 320 321 nodes->AddObject(node); 321 322 } … … 324 325 else if(iomodel->edges[i*3+2]==3){/*Top edges*/ 325 326 if(my_edges[i]){ 326 node = new Node(i omodel->nodecounter+iomodel->numberofvertices+4*i+1,counter+1,lid++,0,iomodel,analysis,FSvelocityEnum);327 node = new Node(id0+iomodel->numberofvertices+4*i+1,counter+1,lid++,0,iomodel,analysis,FSvelocityEnum); 327 328 nodes->AddObject(node); 328 329 } … … 334 335 } 335 336 /*P1xP3 pressure*/ 336 vnodes = i omodel->nodecounter+iomodel->numberofvertices+4*iomodel->numberofedges;337 vnodes = id0+iomodel->numberofvertices+4*iomodel->numberofedges; 337 338 for(i=0;i<iomodel->numberofvertices;i++){ 338 339 if(iomodel->my_vertices[i]){ -
issm/trunk-jpl/src/c/shared/Exceptions/Exceptions.cpp
r16220 r17106 45 45 46 46 file_line= what_line; 47 this->Report(); 47 48 48 49 }/*}}}*/
Note:
See TracChangeset
for help on using the changeset viewer.