Changeset 3858
- Timestamp:
- 05/19/10 17:10:28 (15 years ago)
- Location:
- issm/trunk/src/c/objects
- Files:
-
- 4 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk/src/c/objects/Elements/Penta.cpp
r3856 r3858 315 315 } 316 316 /*}}}*/ 317 /*FUNCTION Enum {{{1*/317 /*FUNCTION Penta::Enum {{{1*/ 318 318 int Penta::Enum(void){ 319 319 … … 322 322 } 323 323 /*}}}*/ 324 /*FUNCTION Marshall {{{1*/ 324 /*FUNCTION Penta::IsInput{{{1*/ 325 bool Penta::IsInput(int name){ 326 if (name==ThicknessEnum || 327 name==SurfaceEnum || 328 name==BedEnum || 329 name==MeltingRateEnum || 330 name==AccumulationRateEnum || 331 name==GeothermalFluxEnum || 332 name==TemperatureEnum || 333 name==TemperatureAverageEnum || 334 name==RheologyBEnum || 335 name==RheologyNEnum) { 336 return true; 337 } 338 else return false; 339 } 340 /*}}}*/ 341 /*FUNCTION Penta::Marshall {{{1*/ 325 342 void Penta::Marshall(char** pmarshalled_dataset){ 326 343 … … 362 379 } 363 380 /*}}}*/ 364 /*FUNCTION MarshallSize {{{1*/381 /*FUNCTION Penta::MarshallSize {{{1*/ 365 382 int Penta::MarshallSize(){ 366 383 … … 374 391 } 375 392 /*}}}*/ 376 /*FUNCTION SpawnTria {{{1*/393 /*FUNCTION Penta::SpawnTria {{{1*/ 377 394 void* Penta::SpawnTria(int g0, int g1, int g2){ 378 395 … … 421 438 422 439 /*updates: */ 423 /*FUNCTION UpdateFromDakota {{{1*/440 /*FUNCTION Penta::UpdateFromDakota {{{1*/ 424 441 void Penta::UpdateFromDakota(void* vinputs){ 425 442 … … 599 616 600 617 /*Object functions*/ 601 /*FUNCTION ComputeBasalStress {{{1*/618 /*FUNCTION Penta::ComputeBasalStress {{{1*/ 602 619 void Penta::ComputeBasalStress(Vec sigma_b,int analysis_type,int sub_analysis_type){ 603 620 … … 721 738 } 722 739 /*}}}*/ 723 /*FUNCTION ComputePressure {{{1*/740 /*FUNCTION Penta::ComputePressure {{{1*/ 724 741 void Penta::ComputePressure(Vec pg,int analysis_type,int sub_analysis_type){ 725 742 … … 766 783 } 767 784 /*}}}*/ 768 /*FUNCTION ComputeStrainRate {{{1*/785 /*FUNCTION Penta::ComputeStrainRate {{{1*/ 769 786 void Penta::ComputeStrainRate(Vec eps,int analysis_type,int sub_analysis_type){ 770 787 … … 773 790 } 774 791 /*}}}*/ 775 /*FUNCTION CostFunction {{{1*/792 /*FUNCTION Penta::CostFunction {{{1*/ 776 793 double Penta::CostFunction(int analysis_type,int sub_analysis_type){ 777 794 … … 818 835 } 819 836 /*}}}*/ 820 /*FUNCTION CreateKMatrix {{{1*/837 /*FUNCTION Penta::CreateKMatrix {{{1*/ 821 838 void Penta::CreateKMatrix(Mat Kgg,int analysis_type,int sub_analysis_type){ 822 839 … … 877 894 } 878 895 /*}}}*/ 879 /*FUNCTION CreateKMatrixBalancedthickness {{{1*/896 /*FUNCTION Penta::CreateKMatrixBalancedthickness {{{1*/ 880 897 881 898 void Penta::CreateKMatrixBalancedthickness(Mat Kgg,int analysis_type,int sub_analysis_type){ … … 906 923 } 907 924 /*}}}*/ 908 /*FUNCTION CreateKMatrixBalancedvelocities {{{1*/925 /*FUNCTION Penta::CreateKMatrixBalancedvelocities {{{1*/ 909 926 910 927 void Penta::CreateKMatrixBalancedvelocities(Mat Kgg,int analysis_type,int sub_analysis_type){ … … 935 952 } 936 953 /*}}}*/ 937 /*FUNCTION CreateKMatrixDiagnosticHoriz {{{1*/954 /*FUNCTION Penta::CreateKMatrixDiagnosticHoriz {{{1*/ 938 955 void Penta::CreateKMatrixDiagnosticHoriz( Mat Kgg, int analysis_type,int sub_analysis_type){ 939 956 … … 1158 1175 } 1159 1176 /*}}}*/ 1160 /*FUNCTION CreateKMatrixDiagnosticStokes {{{1*/1177 /*FUNCTION Penta::CreateKMatrixDiagnosticStokes {{{1*/ 1161 1178 void Penta::CreateKMatrixDiagnosticStokes( Mat Kgg, int analysis_type,int sub_analysis_type){ 1162 1179 … … 1423 1440 } 1424 1441 /*}}}*/ 1425 /*FUNCTION CreateKMatrixDiagnosticVert {{{1*/1442 /*FUNCTION Penta::CreateKMatrixDiagnosticVert {{{1*/ 1426 1443 void Penta::CreateKMatrixDiagnosticVert( Mat Kgg, int analysis_type,int sub_analysis_type){ 1427 1444 … … 1549 1566 } 1550 1567 /*}}}*/ 1551 /*FUNCTION CreateKMatrixMelting {{{1*/1568 /*FUNCTION Penta::CreateKMatrixMelting {{{1*/ 1552 1569 void Penta::CreateKMatrixMelting(Mat Kgg,int analysis_type,int sub_analysis_type){ 1553 1570 … … 1577 1594 } 1578 1595 /*}}}*/ 1579 /*FUNCTION CreateKMatrixPrognostic {{{1*/1596 /*FUNCTION Penta::CreateKMatrixPrognostic {{{1*/ 1580 1597 1581 1598 void Penta::CreateKMatrixPrognostic(Mat Kgg,int analysis_type,int sub_analysis_type){ … … 1606 1623 } 1607 1624 /*}}}*/ 1608 /*FUNCTION CreateKMatrixSlopeCompute {{{1*/1625 /*FUNCTION Penta::CreateKMatrixSlopeCompute {{{1*/ 1609 1626 1610 1627 void Penta::CreateKMatrixSlopeCompute(Mat Kgg,int analysis_type,int sub_analysis_type){ … … 1636 1653 } 1637 1654 /*}}}*/ 1638 /*FUNCTION CreateKMatrixThermal {{{1*/1655 /*FUNCTION Penta::CreateKMatrixThermal {{{1*/ 1639 1656 void Penta::CreateKMatrixThermal(Mat Kgg,int analysis_type,int sub_analysis_type){ 1640 1657 … … 1881 1898 } 1882 1899 /*}}}*/ 1883 /*FUNCTION CreatePVector {{{1*/1900 /*FUNCTION Penta::CreatePVector {{{1*/ 1884 1901 void Penta::CreatePVector(Vec pg, int analysis_type,int sub_analysis_type){ 1885 1902 … … 1938 1955 } 1939 1956 /*}}}*/ 1940 /*FUNCTION CreatePVectorBalancedthickness {{{1*/1957 /*FUNCTION Penta::CreatePVectorBalancedthickness {{{1*/ 1941 1958 void Penta::CreatePVectorBalancedthickness( Vec pg, int analysis_type,int sub_analysis_type){ 1942 1959 … … 1965 1982 } 1966 1983 /*}}}*/ 1967 /*FUNCTION CreatePVectorBalancedvelocities {{{1*/1984 /*FUNCTION Penta::CreatePVectorBalancedvelocities {{{1*/ 1968 1985 void Penta::CreatePVectorBalancedvelocities( Vec pg, int analysis_type,int sub_analysis_type){ 1969 1986 … … 1992 2009 } 1993 2010 /*}}}*/ 1994 /*FUNCTION CreatePVectorDiagnosticHoriz {{{1*/2011 /*FUNCTION Penta::CreatePVectorDiagnosticHoriz {{{1*/ 1995 2012 void Penta::CreatePVectorDiagnosticHoriz( Vec pg, int analysis_type,int sub_analysis_type){ 1996 2013 … … 2140 2157 } 2141 2158 /*}}}*/ 2142 /*FUNCTION CreatePVectorDiagnosticStokes {{{1*/2159 /*FUNCTION Penta::CreatePVectorDiagnosticStokes {{{1*/ 2143 2160 void Penta::CreatePVectorDiagnosticStokes( Vec pg, int analysis_type,int sub_analysis_type){ 2144 2161 … … 2381 2398 } 2382 2399 /*}}}*/ 2383 /*FUNCTION CreatePVectorDiagnosticVert {{{1*/2400 /*FUNCTION Penta::CreatePVectorDiagnosticVert {{{1*/ 2384 2401 void Penta::CreatePVectorDiagnosticVert( Vec pg, int analysis_type,int sub_analysis_type){ 2385 2402 … … 2510 2527 } 2511 2528 /*}}}*/ 2512 /*FUNCTION CreatePVectorMelting {{{1*/2529 /*FUNCTION Penta::CreatePVectorMelting {{{1*/ 2513 2530 void Penta::CreatePVectorMelting( Vec pg, int analysis_type,int sub_analysis_type){ 2514 2531 return; 2515 2532 } 2516 2533 /*}}}*/ 2517 /*FUNCTION CreatePVectorPrognostic {{{1*/2534 /*FUNCTION Penta::CreatePVectorPrognostic {{{1*/ 2518 2535 2519 2536 void Penta::CreatePVectorPrognostic( Vec pg, int analysis_type,int sub_analysis_type){ … … 2543 2560 } 2544 2561 /*}}}*/ 2545 /*FUNCTION CreatePVectorSlopeCompute {{{1*/2562 /*FUNCTION Penta::CreatePVectorSlopeCompute {{{1*/ 2546 2563 2547 2564 void Penta::CreatePVectorSlopeCompute( Vec pg, int analysis_type,int sub_analysis_type){ … … 2571 2588 } 2572 2589 /*}}}*/ 2573 /*FUNCTION CreatePVectorThermal {{{1*/2590 /*FUNCTION Penta::CreatePVectorThermal {{{1*/ 2574 2591 void Penta::CreatePVectorThermal( Vec pg, int analysis_type,int sub_analysis_type){ 2575 2592 … … 2754 2771 } 2755 2772 /*}}}*/ 2756 /*FUNCTION Du {{{1*/2773 /*FUNCTION Penta::Du {{{1*/ 2757 2774 void Penta::Du(Vec du_g,int analysis_type,int sub_analysis_type){ 2758 2775 … … 2799 2816 } 2800 2817 /*}}}*/ 2801 /*FUNCTION FieldExtrude {{{1*/2818 /*FUNCTION Penta::FieldExtrude {{{1*/ 2802 2819 void Penta::FieldExtrude(Vec field,double* field_serial,char* field_name, int iscollapsed){ 2803 2820 … … 2946 2963 } 2947 2964 /*}}}*/ 2948 /*FUNCTION GetB {{{1*/2965 /*FUNCTION Penta::GetB {{{1*/ 2949 2966 void Penta::GetB(double* B, double* xyz_list, double* gauss_coord){ 2950 2967 … … 2992 3009 } 2993 3010 /*}}}*/ 2994 /*FUNCTION GetB_artdiff {{{1*/3011 /*FUNCTION Penta::GetB_artdiff {{{1*/ 2995 3012 void Penta::GetB_artdiff(double* B_artdiff, double* xyz_list, double* gauss_coord){ 2996 3013 … … 3023 3040 } 3024 3041 /*}}}*/ 3025 /*FUNCTION GetB_advec {{{1*/3042 /*FUNCTION Penta::GetB_advec {{{1*/ 3026 3043 void Penta::GetB_advec(double* B_advec, double* xyz_list, double* gauss_coord){ 3027 3044 … … 3056 3073 } 3057 3074 /*}}}*/ 3058 /*FUNCTION GetB_conduct {{{1*/3075 /*FUNCTION Penta::GetB_conduct {{{1*/ 3059 3076 void Penta::GetB_conduct(double* B_conduct, double* xyz_list, double* gauss_coord){ 3060 3077 … … 3089 3106 } 3090 3107 /*}}}*/ 3091 /*FUNCTION GetB_vert {{{1*/3108 /*FUNCTION Penta::GetB_vert {{{1*/ 3092 3109 void Penta::GetB_vert(double* B, double* xyz_list, double* gauss_coord){ 3093 3110 … … 3111 3128 } 3112 3129 /*}}}*/ 3113 /*FUNCTION GetBedList {{{1*/3130 /*FUNCTION Penta::GetBedList {{{1*/ 3114 3131 void Penta::GetBedList(double* bedlist){ 3115 3132 … … 3121 3138 } 3122 3139 /*}}}*/ 3123 /*FUNCTION GetBPrime {{{1*/3140 /*FUNCTION Penta::GetBPrime {{{1*/ 3124 3141 void Penta::GetBPrime(double* B, double* xyz_list, double* gauss_coord){ 3125 3142 … … 3166 3183 } 3167 3184 /*}}}*/ 3168 /*FUNCTION GetBprime_advec {{{1*/3185 /*FUNCTION Penta::GetBprime_advec {{{1*/ 3169 3186 void Penta::GetBprime_advec(double* Bprime_advec, double* xyz_list, double* gauss_coord){ 3170 3187 … … 3200 3217 } 3201 3218 /*}}}*/ 3202 /*FUNCTION GetBPrime_vert {{{1*/3219 /*FUNCTION Penta::GetBPrime_vert {{{1*/ 3203 3220 void Penta::GetBPrime_vert(double* B, double* xyz_list, double* gauss_coord){ 3204 3221 … … 3211 3228 } 3212 3229 /*}}}*/ 3213 /*FUNCTION GetBprimeStokes {{{1*/3230 /*FUNCTION Penta::GetBprimeStokes {{{1*/ 3214 3231 void Penta::GetBprimeStokes(double* B_prime, double* xyz_list, double* gauss_coord){ 3215 3232 … … 3284 3301 } 3285 3302 /*}}}*/ 3286 /*FUNCTION GetBStokes {{{1*/3303 /*FUNCTION Penta::GetBStokes {{{1*/ 3287 3304 void Penta::GetBStokes(double* B, double* xyz_list, double* gauss_coord){ 3288 3305 … … 3356 3373 } 3357 3374 /*}}}*/ 3358 /*FUNCTION GetDofList {{{1*/3375 /*FUNCTION Penta::GetDofList {{{1*/ 3359 3376 void Penta::GetDofList(int* doflist,int* pnumberofdofspernode){ 3360 3377 … … 3375 3392 } 3376 3393 /*}}}*/ 3377 /*FUNCTION GetDofList1 {{{1*/3394 /*FUNCTION Penta::GetDofList1 {{{1*/ 3378 3395 void Penta::GetDofList1(int* doflist){ 3379 3396 … … 3386 3403 } 3387 3404 /*}}}*/ 3388 /*FUNCTION Id {{{1*/3405 /*FUNCTION Penta::Id {{{1*/ 3389 3406 int Penta::Id(void){ 3390 3407 return id; 3391 3408 } 3392 3409 /*}}}*/ 3393 /*FUNCTION GetJacobian {{{1*/3410 /*FUNCTION Penta::GetJacobian {{{1*/ 3394 3411 void Penta::GetJacobian(double* J, double* xyz_list,double* gauss_coord){ 3395 3412 … … 3452 3469 } 3453 3470 /*}}}*/ 3454 /*FUNCTION GetJacobianDeterminant {{{1*/3471 /*FUNCTION Penta::GetJacobianDeterminant {{{1*/ 3455 3472 void Penta::GetJacobianDeterminant(double* Jdet, double* xyz_list,double* gauss_coord){ 3456 3473 … … 3470 3487 } 3471 3488 /*}}}*/ 3472 /*FUNCTION GetJacobianInvert {{{1*/3489 /*FUNCTION Penta::GetJacobianInvert {{{1*/ 3473 3490 void Penta::GetJacobianInvert(double* Jinv, double* xyz_list,double* gauss_coord){ 3474 3491 … … 3483 3500 } 3484 3501 /*}}}*/ 3485 /*FUNCTION GetLStokes {{{1*/3502 /*FUNCTION Penta::GetLStokes {{{1*/ 3486 3503 void Penta::GetLStokes(double* LStokes, double* gauss_coord_tria){ 3487 3504 … … 3581 3598 } 3582 3599 /*}}}*/ 3583 /*FUNCTION GetLprimeStokes {{{1*/3600 /*FUNCTION Penta::GetLprimeStokes {{{1*/ 3584 3601 void Penta::GetLprimeStokes(double* LprimeStokes, double* xyz_list, double* gauss_coord_tria, double* gauss_coord){ 3585 3602 … … 3682 3699 } 3683 3700 /*}}}*/ 3684 /*FUNCTION GetMatPar {{{1*/3701 /*FUNCTION Penta::GetMatPar {{{1*/ 3685 3702 void* Penta::GetMatPar(){ 3686 3703 … … 3688 3705 } 3689 3706 /*}}}*/ 3690 /*FUNCTION GetMatrixInvert {{{1*/3707 /*FUNCTION Penta::GetMatrixInvert {{{1*/ 3691 3708 void Penta::GetMatrixInvert(double* Ke_invert, double* Ke){ 3692 3709 /*Inverse a 3 by 3 matrix only */ … … 3721 3738 } 3722 3739 /*}}}*/ 3723 /*FUNCTION GetNodalFunctions {{{1*/3740 /*FUNCTION Penta::GetNodalFunctions {{{1*/ 3724 3741 void Penta::GetNodalFunctions(double* l1l6, double* gauss_coord){ 3725 3742 … … 3740 3757 } 3741 3758 /*}}}*/ 3742 /*FUNCTION GetNodalFunctionsDerivatives {{{1*/3759 /*FUNCTION Penta::GetNodalFunctionsDerivatives {{{1*/ 3743 3760 void Penta::GetNodalFunctionsDerivatives(double* dh1dh6,double* xyz_list, double* gauss_coord){ 3744 3761 … … 3774 3791 } 3775 3792 /*}}}*/ 3776 /*FUNCTION GetNodalFunctionsDerivativesStokes {{{1*/3793 /*FUNCTION Penta::GetNodalFunctionsDerivativesStokes {{{1*/ 3777 3794 void Penta::GetNodalFunctionsDerivativesStokes(double* dh1dh7,double* xyz_list, double* gauss_coord){ 3778 3795 … … 3808 3825 } 3809 3826 /*}}}*/ 3810 /*FUNCTION GetNodalFunctionsDerivativesReference {{{1*/3827 /*FUNCTION Penta::GetNodalFunctionsDerivativesReference {{{1*/ 3811 3828 void Penta::GetNodalFunctionsDerivativesReference(double* dl1dl6,double* gauss_coord){ 3812 3829 … … 3854 3871 } 3855 3872 /*}}}*/ 3856 /*FUNCTION GetNodalFunctionsDerivativesReferenceStokes {{{1*/3873 /*FUNCTION Penta::GetNodalFunctionsDerivativesReferenceStokes {{{1*/ 3857 3874 void Penta::GetNodalFunctionsDerivativesReferenceStokes(double* dl1dl7,double* gauss_coord){ 3858 3875 … … 3903 3920 } 3904 3921 /*}}}*/ 3905 /*FUNCTION GetNodalFunctionsStokes {{{1*/3922 /*FUNCTION Penta::GetNodalFunctionsStokes {{{1*/ 3906 3923 void Penta::GetNodalFunctionsStokes(double* l1l7, double* gauss_coord){ 3907 3924 … … 3931 3948 } 3932 3949 /*}}}*/ 3933 /*FUNCTION GetNodes {{{1*/3950 /*FUNCTION Penta::GetNodes {{{1*/ 3934 3951 void Penta::GetNodes(void** vpnodes){ 3935 3952 … … 3945 3962 } 3946 3963 /*}}}*/ 3947 /*FUNCTION GetOnBed {{{1*/3964 /*FUNCTION Penta::GetOnBed {{{1*/ 3948 3965 bool Penta::GetOnBed(){ 3949 3966 … … 3955 3972 } 3956 3973 /*}}}*/ 3957 /*FUNCTION GetParameterDerivativeValue {{{1*/3974 /*FUNCTION Penta::GetParameterDerivativeValue {{{1*/ 3958 3975 void Penta::GetParameterDerivativeValue(double* p, double* p_list,double* xyz_list, double* gauss_coord){ 3959 3976 … … 3981 3998 } 3982 3999 /*}}}*/ 3983 /*FUNCTION GetParameterValue {{{1*/4000 /*FUNCTION Penta::GetParameterValue {{{1*/ 3984 4001 void Penta::GetParameterValue(double* pvalue, double* v_list,double* gauss_coord){ 3985 4002 … … 3992 4009 } 3993 4010 /*}}}*/ 3994 /*FUNCTION GetPhi {{{1*/4011 /*FUNCTION Penta::GetPhi {{{1*/ 3995 4012 void Penta::GetPhi(double* phi, double* epsilon, double viscosity){ 3996 4013 /*Compute deformational heating from epsilon and viscosity */ … … 4026 4043 } 4027 4044 /*}}}*/ 4028 /*FUNCTION GetShelf {{{1*/4045 /*FUNCTION Penta::GetShelf {{{1*/ 4029 4046 bool Penta::GetShelf(){ 4030 4047 bool onshelf; … … 4036 4053 } 4037 4054 /*}}}*/ 4038 /*FUNCTION GetThicknessList {{{1*/4055 /*FUNCTION Penta::GetThicknessList {{{1*/ 4039 4056 void Penta::GetThicknessList(double* thickness_list){ 4040 4057 … … 4045 4062 } 4046 4063 /*}}}*/ 4047 /*FUNCTION Gradj {{{1*/4064 /*FUNCTION Penta::Gradj {{{1*/ 4048 4065 void Penta::Gradj(Vec grad_g,int analysis_type,int sub_analysis_type,char* control_type){ 4049 4066 … … 4066 4083 } 4067 4084 /*}}}*/ 4068 /*FUNCTION GradjDrag {{{1*/4085 /*FUNCTION Penta::GradjDrag {{{1*/ 4069 4086 void Penta::GradjDrag(Vec grad_g,int analysis_type,int sub_analysis_type){ 4070 4087 … … 4109 4126 } 4110 4127 /*}}}*/ 4111 /*FUNCTION GradjB {{{1*/4128 /*FUNCTION Penta::GradjB {{{1*/ 4112 4129 void Penta::GradjB(Vec grad_g,int analysis_type,int sub_analysis_type){ 4113 4130 … … 4147 4164 } 4148 4165 /*}}}*/ 4149 /*FUNCTION MassFlux {{{1*/4166 /*FUNCTION Penta::MassFlux {{{1*/ 4150 4167 double Penta::MassFlux( double* segment,double* ug){ 4151 4168 ISSMERROR(" not supported yet!"); 4152 4169 } 4153 4170 /*}}}*/ 4154 /*FUNCTION Misfit {{{1*/4171 /*FUNCTION Penta::Misfit {{{1*/ 4155 4172 double Penta::Misfit(int analysis_type,int sub_analysis_type){ 4156 4173 … … 4197 4214 } 4198 4215 /*}}}*/ 4199 /*FUNCTION MyRank {{{1*/4216 /*FUNCTION Penta::MyRank {{{1*/ 4200 4217 int Penta::MyRank(void){ 4201 4218 extern int my_rank; … … 4203 4220 } 4204 4221 /*}}}*/ 4205 /*FUNCTION ReduceMatrixStokes {{{1*/4222 /*FUNCTION Penta::ReduceMatrixStokes {{{1*/ 4206 4223 void Penta::ReduceMatrixStokes(double* Ke_reduced, double* Ke_temp){ 4207 4224 … … 4249 4266 } 4250 4267 /*}}}*/ 4251 /*FUNCTION ReduceVectorStokes {{{1*/4268 /*FUNCTION Penta::ReduceVectorStokes {{{1*/ 4252 4269 void Penta::ReduceVectorStokes(double* Pe_reduced, double* Ke_temp, double* Pe_temp){ 4253 4270 … … 4291 4308 } 4292 4309 /*}}}*/ 4293 /*FUNCTION SetClone {{{1*/4310 /*FUNCTION Penta::SetClone {{{1*/ 4294 4311 void Penta::SetClone(int* minranks){ 4295 4312 … … 4297 4314 } 4298 4315 /*}}}1*/ 4299 /*FUNCTION SurfaceArea {{{1*/4316 /*FUNCTION Penta::SurfaceArea {{{1*/ 4300 4317 double Penta::SurfaceArea(int analysis_type,int sub_analysis_type){ 4301 4318 … … 4342 4359 } 4343 4360 /*}}}*/ 4344 /*FUNCTION SurfaceNormal {{{1*/4361 /*FUNCTION Penta::SurfaceNormal {{{1*/ 4345 4362 void Penta::SurfaceNormal(double* surface_normal, double xyz_list[3][3]){ 4346 4363 … … 4371 4388 void Penta::UpdateInputsFromVector(double* vector, int name, int type){ 4372 4389 4390 /*Check that name is an element input*/ 4391 if (!IsInput(name)) return; 4392 4373 4393 switch(type){ 4374 4394 -
issm/trunk/src/c/objects/Elements/Penta.h
r3852 r3858 50 50 int Enum(); 51 51 int Id(); 52 bool IsInput(int name); 52 53 void Marshall(char** pmarshalled_dataset); 53 54 int MarshallSize(); -
issm/trunk/src/c/objects/Node.cpp
r3834 r3858 882 882 } 883 883 /*}}}*/ 884 /*FUNCTION Node::UpdateInputsFromVector(double* vector, int name, int type){{{2*/ 885 void Node::UpdateInputsFromVector(double* vector, int name, int type){ 886 887 /*Nothing updated yet*/ 888 } 889 /*}}}*/ 890 /*FUNCTION Node::UpdateInputsFromVector(int* vector, int name, int type){{{2*/ 891 void Node::UpdateInputsFromVector(int* vector, int name, int type){ 892 893 /*Nothing updated yet*/ 894 } 895 /*}}}*/ 896 /*FUNCTION Node::UpdateInputsFromVector(bool* vector, int name, int type){{{2*/ 897 void Node::UpdateInputsFromVector(bool* vector, int name, int type){ 898 899 /*Nothing updated yet*/ 900 } 901 /*}}}*/ 902 /*FUNCTION Node::UpdateInputsFromConstant(double constant, int name){{{2*/ 903 void Node::UpdateInputsFromConstant(double constant, int name){ 904 905 /*Nothing updated yet*/ 906 } 907 /*}}}*/ 884 908 /*FUNCTION Node::UpdateInputsFromConstant(int constant, int name){{{2*/ 885 909 void Node::UpdateInputsFromConstant(int constant, int name){ 886 /*nothing updated for now*/ 910 911 /*Nothing updated yet*/ 912 } 913 /*}}}*/ 914 /*FUNCTION Node::UpdateInputsFromConstant(bool constant, int name){{{2*/ 915 void Node::UpdateInputsFromConstant(bool constant, int name){ 916 917 /*Nothing updated yet*/ 887 918 } 888 919 /*}}}*/ -
issm/trunk/src/c/objects/Node.h
r3834 r3858 51 51 int MyRank(void); 52 52 void SetVertexDof(int in_dof); 53 void UpdateInputsFromVector(double* vector, int name, int type) {ISSMERROR("Not implemented yet!");}54 void UpdateInputsFromVector(int* vector, int name, int type) {ISSMERROR("Not implemented yet!");}55 void UpdateInputsFromVector(bool* vector, int name, int type) {ISSMERROR("Not implemented yet!");}56 void UpdateInputsFromConstant(double constant, int name) {ISSMERROR("Not implemented yet!");}53 void UpdateInputsFromVector(double* vector, int name, int type); 54 void UpdateInputsFromVector(int* vector, int name, int type); 55 void UpdateInputsFromVector(bool* vector, int name, int type); 56 void UpdateInputsFromConstant(double constant, int name); 57 57 void UpdateInputsFromConstant(int constant, int name); 58 void UpdateInputsFromConstant(bool constant, int name) {ISSMERROR("Not implemented yet!");}58 void UpdateInputsFromConstant(bool constant, int name); 59 59 60 60 void UpdateInputsFromSolution(double* solution, int analysis_type, int sub_analysis_type){ISSMERROR("Not implemented yet!");}
Note:
See TracChangeset
for help on using the changeset viewer.