[cig-commits] r11997 - in long/3D/Gale/trunk: . src/Underworld/Rheology/src
walter at geodynamics.org
walter at geodynamics.org
Thu May 22 11:16:17 PDT 2008
Author: walter
Date: 2008-05-22 11:16:17 -0700 (Thu, 22 May 2008)
New Revision: 11997
Modified:
long/3D/Gale/trunk/
long/3D/Gale/trunk/src/Underworld/Rheology/src/MohrCoulomb.c
Log:
r2167 at earth: boo | 2008-05-22 11:10:56 -0700
Cleanup
Property changes on: long/3D/Gale/trunk
___________________________________________________________________
Name: svk:merge
- 3a629746-de10-0410-b17b-fd6ecaaa963e:/cig:2166
+ 3a629746-de10-0410-b17b-fd6ecaaa963e:/cig:2167
Modified: long/3D/Gale/trunk/src/Underworld/Rheology/src/MohrCoulomb.c
===================================================================
--- long/3D/Gale/trunk/src/Underworld/Rheology/src/MohrCoulomb.c 2008-05-22 18:16:14 UTC (rev 11996)
+++ long/3D/Gale/trunk/src/Underworld/Rheology/src/MohrCoulomb.c 2008-05-22 18:16:17 UTC (rev 11997)
@@ -335,10 +335,6 @@
(and thus the viscosity), while the yieldIndicator depends linearly
on the deviatoric stresses. */
-typedef struct {
- double effVisc;
-} StoreVisc_ParticleExt;
-
void _MohrCoulomb_HasYielded(
void* rheology,
ConstitutiveMatrix* constitutiveMatrix,
@@ -352,32 +348,6 @@
double beta=1.0-yieldCriterion/(yieldIndicator);
-/* { */
-/* StoreVisc_ParticleExt* particleExt; */
-
-/* /\* Get Parameters From Material Extension *\/ */
-/* particleExt = ExtensionManager_Get( materialPointsSwarm->particleExtensionMgr, materialPoint, 2 ); */
-
-/* /\* if((particleExt->effVisc>viscosity*(1-beta) && particleExt->effVisc/viscosity*(1-beta)<1.0e3) *\/ */
-/* /\* || (particleExt->effVisc<viscosity*(1-beta) && particleExt->effVisc/viscosity*(1-beta)>1.0e-3)) *\/ */
-/* /\* if(particleExt->effVisc!=viscosity) *\/ */
-/* /\* { *\/ */
-/* /\* double new_viscosity; *\/ */
-/* /\* new_viscosity=sqrt(particleExt->effVisc*viscosity*(1-beta)); *\/ */
-/* /\* /\\* new_viscosity=(particleExt->effVisc+(viscosity*(1-beta)))/2; *\\/ *\/ */
-/* /\* /\\* new_viscosity=pow(pow(particleExt->effVisc,1.0)*viscosity*(1-beta),1/2.0); *\\/ *\/ */
-/* /\* beta=1.0-new_viscosity/viscosity; *\/ */
-/* /\* } *\/ */
-
-/* /\* if(lElement_I==340) *\/ */
-/* /\* printf("has yielded %d %g %g %g\n",lElement_I,particleExt->effVisc,viscosity,viscosity*(1-beta)); *\/ */
-
-
-/* if(lElement_I>680 && lElement_I<710) */
-/* printf("has yielded %d %g %g %g %g\n",lElement_I,yieldCriterion, */
-/* yieldIndicator,particleExt->effVisc,viscosity*(1-beta)); */
-/* } */
-
ConstitutiveMatrix_IsotropicCorrection( constitutiveMatrix, -viscosity * beta );
}
More information about the cig-commits
mailing list