Changeset 5748
- Timestamp:
- 09/10/10 11:49:44 (15 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk/src/c/objects/Elements/Tria.cpp
r5747 r5748 647 647 this->parameters->FindParam(&control_type,ControlTypeEnum); 648 648 this->parameters->FindParam(&cm_noisedmp,CmNoiseDmpEnum); 649 Input* drag_input=inputs->GetInput(DragCoefficientEnum); ISSMASSERT(drag_input);650 Input* dhdt_input=inputs->GetInput(DhDtEnum); ISSMASSERT(dhdt_input);651 Input* Bbar_input=matice->inputs->GetInput(RheologyBbarEnum); ISSMASSERT(Bbar_input);652 649 653 650 /*If on water, return 0: */ … … 671 668 * */ 672 669 if (control_type==DragCoefficientEnum){ 673 I SSMASSERT(drag_input);670 Input* drag_input=inputs->GetInput(DragCoefficientEnum); ISSMASSERT(drag_input); 674 671 drag_input->GetParameterDerivativeValue(&dk[0],&xyz_list[0][0],gauss); 675 672 //Jelem+=cm_noisedmp*1/2*(pow(dk[0],2)+pow(dk[1],2))*Jdet*gauss->weight; 676 673 } 677 674 else if (control_type==RheologyBbarEnum){ 678 I SSMASSERT(Bbar_input);675 Input* Bbar_input=matice->inputs->GetInput(RheologyBbarEnum); ISSMASSERT(Bbar_input); 679 676 Bbar_input->GetParameterDerivativeValue(&dB[0], &xyz_list[0][0], gauss); 680 677 //Jelem+=cm_noisedmp*1/2*(pow(dB[0],2)+pow(dB[1],2))*Jdet*gauss->weight; 681 678 } 682 679 else if (control_type==DhDtEnum){ 683 I SSMASSERT(dhdt_input);680 Input* dhdt_input=inputs->GetInput(DhDtEnum); ISSMASSERT(dhdt_input); 684 681 dhdt_input->GetParameterDerivativeValue(&dB[0], &xyz_list[0][0], gauss); 685 682 //Jelem+=cm_noisedmp*1/2*(pow(dB[0],2)+pow(dB[1],2))*Jdet*gauss->weight;
Note:
See TracChangeset
for help on using the changeset viewer.