Changeset 22010
- Timestamp:
- 08/25/17 15:18:00 (8 years ago)
- Location:
- issm/trunk-jpl/src/c
- Files:
-
- 9 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk-jpl/src/c/analyses/EnthalpyAnalysis.cpp
r22004 r22010 1525 1525 /*Update Rheology only if converged (we must make sure that the temperature is below melting point 1526 1526 * otherwise the rheology could be negative*/ 1527 rheology_law=element-> material->GetRheologyLaw();1527 rheology_law=element->GetMaterialParameter(MaterialsRheologyLawEnum); 1528 1528 element->GetInputListOnNodes(&surface[0],SurfaceEnum); 1529 1529 switch(rheology_law){ -
issm/trunk-jpl/src/c/analyses/ThermalAnalysis.cpp
r22004 r22010 809 809 /*Update Rheology only if converged (we must make sure that the temperature is below melting point 810 810 * otherwise the rheology could be negative*/ 811 rheology_law=element-> material->GetRheologyLaw();811 rheology_law=element->GetMaterialParameter(MaterialsRheologyLawEnum); 812 812 element->GetInputListOnNodes(&surface[0],SurfaceEnum); 813 813 switch(rheology_law){ -
issm/trunk-jpl/src/c/classes/Materials/Material.h
r22004 r22010 42 42 virtual void GetViscosity_D(IssmDouble* pviscosity,IssmDouble epseff)=0; 43 43 virtual void GetViscosity2dDerivativeEpsSquare(IssmDouble* pmu_prime, IssmDouble* pepsilon)=0; 44 virtual int GetRheologyLaw()=0;45 44 virtual bool IsDamage()=0; 46 45 virtual bool IsEnhanced()=0; -
issm/trunk-jpl/src/c/classes/Materials/Matestar.cpp
r22004 r22010 41 41 this->mid=matestar_mid; 42 42 43 /*rheology law:*/44 iomodel->FetchData(&this->rheology_law,"md.materials.rheology_law");45 46 43 /*Hooks: */ 47 44 matestar_eid=index+1; … … 370 367 void Matestar::GetViscosity2dDerivativeEpsSquare(IssmDouble* pmu_prime, IssmDouble* epsilon){/*{{{*/ 371 368 _error_("not implemented yet"); 372 }373 /*}}}*/374 int Matestar::GetRheologyLaw(){/*{{{*/375 return this->rheology_law;376 369 } 377 370 /*}}}*/ -
issm/trunk-jpl/src/c/classes/Materials/Matestar.h
r22004 r22010 64 64 void GetViscosity_D(IssmDouble* pviscosity, IssmDouble eps_eff); 65 65 void GetViscosity2dDerivativeEpsSquare(IssmDouble* pmu_prime, IssmDouble* pepsilon); 66 int GetRheologyLaw();67 66 IssmDouble GetA(); 68 67 IssmDouble GetAbar(); -
issm/trunk-jpl/src/c/classes/Materials/Matice.cpp
r22004 r22010 40 40 int materialtype; 41 41 iomodel->FindConstant(&materialtype,"md.materials.type"); 42 iomodel->FindConstant(&this->rheology_law,"md.materials.rheology_law");43 42 this->Init(matice_mid,index,materialtype); 44 43 … … 640 639 } 641 640 /*}}}*/ 642 int Matice::GetRheologyLaw(){/*{{{*/643 return this->rheology_law;644 }645 /*}}}*/646 641 void Matice::InputUpdateFromConstant(IssmDouble constant, int name){/*{{{*/ 647 642 /*Nothing updated yet*/ -
issm/trunk-jpl/src/c/classes/Materials/Matice.h
r22004 r22010 68 68 void GetViscosity_D(IssmDouble* pviscosity, IssmDouble eps_eff); 69 69 void GetViscosity2dDerivativeEpsSquare(IssmDouble* pmu_prime, IssmDouble* pepsilon); 70 int GetRheologyLaw();71 70 IssmDouble GetA(); 72 71 IssmDouble GetAbar(); -
issm/trunk-jpl/src/c/classes/Materials/Matpar.cpp
r22004 r22010 38 38 rlapslgm = 0; 39 39 dpermil = 0; 40 rheology_law = 0; 40 41 41 42 albedo_snow = 0; … … 61 62 earth_density = 0; 62 63 63 poisson = 0;64 young_modulus = 0;65 ridging_exponent = 0;66 cohesion = 0;67 internal_friction_coef = 0;68 compression_coef = 0;69 traction_coef = 0;70 time_relaxation_stress = 0;71 time_relaxation_damage = 0;72 73 74 64 int nnat,dummy; 75 65 int* nature=NULL; … … 102 92 iomodel->FindConstant(&this->thermal_exchange_velocity,"md.materials.thermal_exchange_velocity"); 103 93 iomodel->FindConstant(&this->g,"md.constants.g"); 94 iomodel->FindConstant(&this->rheology_law,"md.materials.rheology_law"); 104 95 105 96 switch(smb_model){ … … 202 193 iomodel->FindConstant(&this->thermal_exchange_velocity,"md.materials.thermal_exchange_velocity"); 203 194 iomodel->FindConstant(&this->g,"md.constants.g"); 195 iomodel->FindConstant(&this->rheology_law,"md.materials.rheology_law"); 204 196 205 197 switch(smb_model){ //{{{ … … 328 320 matpar->rlapslgm=this->rlapslgm; 329 321 matpar->dpermil=this->dpermil; 322 matpar->rheology_law=this->rheology_law; 330 323 331 324 matpar->sediment_compressibility=this->sediment_compressibility; … … 379 372 _printf_(" rlapslgm: " << rlapslgm << "\n"); 380 373 _printf_(" dpermil: " << dpermil << "\n"); 374 _printf_(" rheology_law: " << rheology_law << "\n"); 381 375 _printf_(" albedo_ice: " << albedo_ice << "\n"); 382 376 _printf_(" albedo_snow: " << albedo_snow << "\n"); … … 396 390 _printf_(" mantle_density: " << mantle_density << "\n"); 397 391 _printf_(" earth_density: " << earth_density << "\n"); 398 _printf_(" poisson: " << poisson << "\n");399 _printf_(" young_modulus: " << young_modulus << "\n");400 _printf_(" ridging_exponent: " << ridging_exponent << "\n");401 _printf_(" cohesion: " << cohesion << "\n");402 _printf_(" internal_friction_coef: " << internal_friction_coef << "\n");403 _printf_(" compression_coef: " << compression_coef << "\n");404 _printf_(" traction_coef: " << traction_coef << "\n");405 _printf_(" time_relaxation_stress: " << time_relaxation_stress << "\n");406 _printf_(" time_relaxation_damage: " << time_relaxation_damage << "\n");407 392 return; 408 393 } … … 434 419 MARSHALLING(rlapslgm); 435 420 MARSHALLING(dpermil); 421 MARSHALLING(rheology_law); 436 422 437 423 //hydrology Dual Porous Continuum: … … 456 442 //slr: 457 443 MARSHALLING(earth_density); 458 459 //Sea ice:460 MARSHALLING(poisson);461 MARSHALLING(young_modulus);462 MARSHALLING(ridging_exponent);463 MARSHALLING(cohesion);464 MARSHALLING(internal_friction_coef);465 MARSHALLING(compression_coef);466 MARSHALLING(traction_coef);467 MARSHALLING(time_relaxation_stress);468 MARSHALLING(time_relaxation_damage);469 470 444 } 471 445 /*}}}*/ … … 668 642 case HydrologydcWaterCompressibilityEnum: return this->water_compressibility; 669 643 case ConstantsGEnum: return this->g; 670 case SmbDesfacEnum: return this->desfac; 671 case SmbRlapsEnum: return this->rlaps; 672 case SmbRlapslgmEnum: return this->rlapslgm; 673 case SmbDpermilEnum: return this->dpermil; 644 case SmbDesfacEnum: return this->desfac; 645 case SmbRlapsEnum: return this->rlaps; 646 case SmbRlapslgmEnum: return this->rlapslgm; 647 case SmbDpermilEnum: return this->dpermil; 648 case MaterialsRheologyLawEnum: return this->rheology_law; 674 649 case MaterialsLithosphereShearModulusEnum: return this->lithosphere_shear_modulus; 675 650 case MaterialsLithosphereDensityEnum: return this->lithosphere_density; -
issm/trunk-jpl/src/c/classes/Materials/Matpar.h
r22004 r22010 35 35 IssmDouble rlapslgm; 36 36 IssmDouble dpermil; 37 int rheology_law; 37 38 38 39 /*albedo: */ … … 61 62 /*slr:*/ 62 63 IssmDouble earth_density; 63 64 /*Sea ice*/65 IssmDouble poisson;66 IssmDouble young_modulus;67 IssmDouble ridging_exponent;68 IssmDouble cohesion;69 IssmDouble internal_friction_coef;70 IssmDouble compression_coef;71 IssmDouble traction_coef;72 IssmDouble time_relaxation_stress;73 IssmDouble time_relaxation_damage;74 64 75 65 public: … … 107 97 void GetViscosity_D(IssmDouble* pviscosity,IssmDouble eps_eff){_error_("not supported");}; 108 98 void GetViscosity2dDerivativeEpsSquare(IssmDouble* pmu_prime, IssmDouble* pepsilon){_error_("not supported");}; 109 int GetRheologyLaw(){_error_("not supported");};110 99 IssmDouble GetA(){_error_("not supported");}; 111 100 IssmDouble GetAbar(){_error_("not supported");};
Note:
See TracChangeset
for help on using the changeset viewer.