Changeset 120
- Timestamp:
- 04/29/09 08:50:31 (16 years ago)
- Location:
- issm/trunk/src/m/classes
- Files:
-
- 8 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk/src/m/classes/@matpar/display.m
r1 r120 14 14 disp(sprintf(' mixed_layer_capacity: %i',matpar.mixed_layer_capacity)); 15 15 disp(sprintf(' thermal_exchange_velocity: %i',matpar.thermal_exchange_velocity)); 16 disp(sprintf(' viscosity_overshoot: %i',matpar.viscosity_overshoot));17 16 disp(sprintf(' g: %g',matpar.g)); -
issm/trunk/src/m/classes/@matpar/matpar.m
r1 r120 18 18 matpar.thermal_exchange_velocity=NaN; 19 19 matpar.g=9.81; 20 matpar.viscosity_overshoot=0.3;21 20 matpar=class(matpar,'matpar'); 22 21 -
issm/trunk/src/m/classes/@pentaelem/CreateKMatrix.m
r1 r120 142 142 %recover material parameters 143 143 gravity=matpar.g; 144 viscosity_overshoot=matpar.viscosity_overshoot;145 144 rho_ice=matpar.rho_ice; 146 145 rho_water=matpar.rho_water; … … 732 731 %recover material parameters 733 732 gravity=matpar.g; 734 viscosity_overshoot=matpar.viscosity_overshoot;735 733 rho_ice=matpar.rho_ice; 736 734 rho_water=matpar.rho_water; … … 841 839 newviscosity=GetViscosity3d(matice,epsilon); 842 840 oldviscosity=GetViscosity3d(matice,oldepsilon); 843 viscosity=newviscosity+ viscosity_overshoot*(newviscosity-oldviscosity);841 viscosity=newviscosity+pentaelem.viscosity_overshoot*(newviscosity-oldviscosity); 844 842 %disp(sprintf('Element id %i Viscosity: %g \n',pentaelem.id,viscosity)); 845 843 -
issm/trunk/src/m/classes/@pentaelem/display.m
r45 r120 13 13 disp(sprintf(' bedrock: %g %g %g %g %g %g',pentaelem.b(1),pentaelem.b(2),pentaelem.b(3),pentaelem.b(4),pentaelem.b(5),pentaelem.b(6))); 14 14 disp(sprintf(' friction type: %i',pentaelem.friction_type)); 15 disp(sprintf(' viscosity overshoot: %g',pentaelem.viscosity_overshoot)); 15 16 disp(sprintf(' p: %i',pentaelem.p)); 16 17 disp(sprintf(' q: %i',pentaelem.q)); -
issm/trunk/src/m/classes/@pentaelem/pentaelem.m
r45 r120 16 16 pentaelem.b=zeros(6,1); 17 17 pentaelem.friction_type=2; 18 pentaelem.viscosity_overshoot=0; 18 19 pentaelem.k=zeros(6,1); 19 20 pentaelem.p=1; -
issm/trunk/src/m/classes/@triaelem/CreateKMatrix.m
r77 r120 218 218 %recover material parameters 219 219 gravity=matpar.g; 220 viscosity_overshoot=matpar.viscosity_overshoot;221 220 rho_ice=matpar.rho_ice; 222 221 rho_water=matpar.rho_water; … … 243 242 temperature_average_list=zeros(numgrids,1); 244 243 245 246 244 %Get all element grid data: 247 245 xyz_list=getgriddata(triaelem,grids); 248 249 246 250 247 %Build linear indices for elementary stiffness matrix. … … 298 295 if(temperature_average_is_present)disp(sprintf(' temperature_average [%g %g %g]',temperature_average_list(1),temperature_average_list(2),temperature_average_list(3)));end; 299 296 end 300 301 302 297 303 298 alpha2_list=zeros(3,1); … … 402 397 newviscosity=GetViscosity2d(matice,epsilon); 403 398 oldviscosity=GetViscosity2d(matice,oldepsilon); 404 viscosity=newviscosity+ viscosity_overshoot*(newviscosity-oldviscosity);399 viscosity=newviscosity+triaelem.viscosity_overshoot*(newviscosity-oldviscosity); 405 400 406 401 %Get Jacobian determinant: -
issm/trunk/src/m/classes/@triaelem/display.m
r45 r120 13 13 disp(sprintf(' grids bedrock: %g %g %g',triaelem.b(1),triaelem.b(2),triaelem.b(3))); 14 14 disp(sprintf(' friction type: %i',triaelem.friction_type)); 15 disp(sprintf(' viscosity overshoot: %g',triaelem.viscosity_overshoot)); 15 16 disp(sprintf(' p: %i',triaelem.p)); 16 17 disp(sprintf(' q: %i',triaelem.q)); -
issm/trunk/src/m/classes/@triaelem/triaelem.m
r45 r120 16 16 triaelem.b=zeros(3,1); 17 17 triaelem.friction_type=2; 18 triaelem.viscosity_overshoot=0; 18 19 triaelem.k=zeros(3,1); 19 20 triaelem.p=1;
Note:
See TracChangeset
for help on using the changeset viewer.