Changeset 1208
- Timestamp:
- 07/01/09 17:14:38 (15 years ago)
- Location:
- issm/trunk/src/c/parallel
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk/src/c/parallel/GradJCompute.cpp
r1206 r1208 22 22 int sub_analysis_type; 23 23 int numberofnodes; 24 int numberofdofspernode; 24 25 char* solverstring=NULL; 25 26 char* control_type=NULL; -
issm/trunk/src/c/parallel/objectivefunctionC.cpp
r1185 r1208 27 27 double* grad_g=NULL; 28 28 ParameterInputs* inputs=NULL; 29 int numberofdofspernode; 29 30 int n; 30 31 … … 60 61 femmodel->parameters->FindParam((void*)&sub_analysis_type,"sub_analysis_type"); 61 62 femmodel->parameters->FindParam((void*)&numberofnodes,"numberofnodes"); 63 femmodel->parameters->FindParam((void*)&numberofdofspernode,"numberofdofspernode"); 62 64 63 65 /*First copy param_g so we don't modify it: */ … … 77 79 diagnostic_core_nonlinear(&u_g,NULL,NULL,femmodel,inputs,analysis_type,sub_analysis_type); 78 80 VecToMPISerial(&u_g_double,u_g); VecFree(&u_g); 79 inputs->Add("velocity",u_g_double, 2,numberofnodes);81 inputs->Add("velocity",u_g_double,numberofdofspernode,numberofnodes); 80 82 81 83 //Compute misfit for this velocity field.
Note:
See TracChangeset
for help on using the changeset viewer.