Changeset 8649
- Timestamp:
- 06/16/11 14:44:35 (14 years ago)
- Location:
- issm/trunk/src/c
- Files:
-
- 4 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk/src/c/modules/CostFunctionx/CostFunctionx.cpp
r8607 r8649 22 22 /*output: */ 23 23 double J,Jplus; 24 25 24 26 25 /*Recover parameters*/ … … 35 34 } 36 35 37 /*REST TO BE DELETED*/38 39 /*Add Regularization terms: */40 double Jreg=0;41 double Jreg_sum;42 for (i=0;i<elements->Size();i++){43 element=(Element*)elements->GetObjectByOffset(i);44 Jreg+=element->RegularizeInversion();45 }46 47 /*Sum all J from all cpus of the cluster:*/48 MPI_Reduce (&Jreg,&Jreg_sum,1,MPI_DOUBLE,MPI_SUM,0,MPI_COMM_WORLD );49 MPI_Bcast(&Jreg_sum,1,MPI_DOUBLE,0,MPI_COMM_WORLD);50 J=J+Jreg_sum;51 52 36 /*Assign output pointers: */ 53 37 xfree((void**)&responses); -
issm/trunk/src/c/objects/Elements/Penta.cpp
r8647 r8649 3991 3991 if (!IsOnBed()) return; 3992 3992 tria=(Tria*)SpawnTria(0,1,2); //nodes 0, 1 and 2 make the new tria. 3993 t ira->GradjBGradient(gradient,resp);3993 tria->GradjBGradient(gradient,resp); 3994 3994 delete tria->matice; delete tria; 3995 3995 break; -
issm/trunk/src/c/objects/Elements/Tria.cpp
r8647 r8649 2951 2951 2952 2952 /*Retrieve all inputs we will be needing: */ 2953 if(IsOnShelf())return;2954 2953 GetVerticesCoordinates(&xyz_list[0][0], nodes, NUMVERTICES); 2955 2954 GetDofList1(&doflist1[0]); … … 2971 2970 2972 2971 /*Build gradje_g_gaussian vector (actually -dJ/ddrag): */ 2973 for (i=0;i<NUMVERTICES;i++) {grade_g[i]+=-weight*Jdet*gauss->weight*(dh1dh3[0][i]*dk[0]+dh1dh3[1][i]*dk[1]);2972 for (i=0;i<NUMVERTICES;i++) grade_g[i]+=-weight*Jdet*gauss->weight*(dh1dh3[0][i]*dk[0]+dh1dh3[1][i]*dk[1]); 2974 2973 } 2975 2974 VecSetValues(gradient,NUMVERTICES,doflist1,(const double*)grade_g,ADD_VALUES); -
issm/trunk/src/c/objects/Elements/Tria.h
r8647 r8649 89 89 void GetVectorFromInputs(Vec vector,int NameEnum); 90 90 void Gradj(Vec gradient,int control_type); 91 void GradjBGradient(Vec gradient,int weight_index); 91 92 void GradjBMacAyeal(Vec gradient); 92 93 void GradjDragMacAyeal(Vec gradient);
Note:
See TracChangeset
for help on using the changeset viewer.