@@ -52,10 +52,6 @@ void MPMesh::calculateStrain(){
5252 v22 = v22 + MPsBasisGrads (mp, i*2 + 1 ) * velField (iVertex, 1 );
5353 uTanOverR = uTanOverR + MPsBasis (mp, i) * tanLatVertexRotatedOverRadius (iVertex, 0 ) * velField (iVertex, 0 );
5454 vTanOverR = vTanOverR + MPsBasis (mp, i) * tanLatVertexRotatedOverRadius (iVertex, 0 ) * velField (iVertex, 1 );
55- /*
56- if(MPsAppID(mp)==0)
57- printf("Strain Calc: iVertex %d vel field %.15e %.15e \n", iVertex, velField(iVertex, 0), velField(iVertex, 1));
58- */
5955 }
6056 MPsStrainRate (mp, 0 ) = v11 - vTanOverR;
6157 MPsStrainRate (mp, 1 ) = v22;
@@ -78,21 +74,19 @@ void MPMesh::calculateStress(){
7874 auto MPsArea = p_MPs->getData <polyMPO::MPF_Area>();
7975 auto MPsIcePressure = p_MPs->getData <polyMPO::MPF_IcePressure>();
8076 auto MPsRepPressure = p_MPs->getData <polyMPO::MPF_ReplacementPressure>();
77+
78+ int model_no = 2 ; // TODO get from MPAS
8179
8280 auto setMPStress = PS_LAMBDA (const int & elm, const int & mp, const int & mask){
8381 if (mask){
8482 Vec3d strain_rate (MPsStrainRate (mp, 0 ), MPsStrainRate (mp, 1 ), MPsStrainRate (mp, 2 ));
8583 Vec3d stress (MPsStress (mp, 0 ), MPsStress (mp, 1 ), MPsStress (mp, 2 ));
86- constitutive_evp (strain_rate, stress, MPsIcePressure (mp, 0 ), MPsRepPressure (mp, 0 ), MPsArea (mp, 0 ), elasticTimeStep, dampingTimescale);
87- // constitutive_linear(strain_rate, stress);
84+ if (model_no == 1 )
85+ constitutive_linear (strain_rate, stress);
86+ else if (model_no == 2 )
87+ constitutive_evp (strain_rate, stress, MPsIcePressure (mp, 0 ), MPsRepPressure (mp, 0 ), MPsArea (mp, 0 ), elasticTimeStep, dampingTimescale);
8888 for (int m=0 ; m<3 ; m++)
8989 MPsStress (mp, m) = stress[m];
90- /*
91- if(MPsAppID(mp)==0){
92- printf("Strain in GPU: %.15e %.15e %.15e\n", MPsStrainRate(mp, 0), MPsStrainRate(mp, 1), MPsStrainRate(mp, 2));
93- printf("Stress in GPU: %.15e %.15e %.15e\n", MPsStress(mp, 0), MPsStress(mp, 1), MPsStress(mp, 2));
94- }
95- */
9690 }
9791 };
9892 p_MPs->parallel_for (setMPStress, " setMPStress" );
0 commit comments