Changeset 121
- Timestamp:
- 04/29/09 08:50:50 (16 years ago)
- Location:
- issm/trunk/src/m/solutions/ice
- Files:
-
- 5 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk/src/m/solutions/ice/ModelProcessorDiagnosticBaseVert.m
r51 r121 56 56 [materials(end).constants]=deal(matpar); 57 57 materials(end)=SetStructureField(materials(end),'constants','g',md.g); 58 materials(end)=SetStructureField(materials(end),'constants','viscosity_overshoot',md.viscosity_overshoot);59 58 materials(end)=SetStructureField(materials(end),'constants','rho_ice',md.rho_ice); 60 59 materials(end)=SetStructureField(materials(end),'constants','rho_water',md.rho_water); -
issm/trunk/src/m/solutions/ice/ModelProcessorDiagnosticHoriz.m
r51 r121 46 46 elements(pos)=SetStructureField(elements(pos),'element','b',md.bed(md.elements(el3pos,1:3))); 47 47 elements(pos)=SetStructureField(elements(pos),'element','friction_type',md.drag_type); 48 elements(pos)=SetStructureField(elements(pos),'element','viscosity_overshoot',md.viscosity_overshoot); 48 49 elements(pos)=SetStructureField(elements(pos),'element','k',md.drag(md.elements(el3pos,1:3))); 49 50 elements(pos)=SetStructureField(elements(pos),'element','p',md.p(el3pos)); … … 78 79 elements(pos)=SetStructureField(elements(pos),'element','b',md.bed(md.elements(el6pos,1:6))); 79 80 elements(pos)=SetStructureField(elements(pos),'element','friction_type',md.drag_type); 81 elements(pos)=SetStructureField(elements(pos),'element','viscosity_overshoot',md.viscosity_overshoot); 80 82 elements(pos)=SetStructureField(elements(pos),'element','k',md.drag(md.elements(el6pos,1:6))); 81 83 elements(pos)=SetStructureField(elements(pos),'element','p',md.p(el6pos)); … … 108 110 [materials(end).constants]=deal(matpar); 109 111 materials(end)=SetStructureField(materials(end),'constants','g',md.g); 110 materials(end)=SetStructureField(materials(end),'constants','viscosity_overshoot',md.viscosity_overshoot);111 112 materials(end)=SetStructureField(materials(end),'constants','rho_ice',md.rho_ice); 112 113 materials(end)=SetStructureField(materials(end),'constants','rho_water',md.rho_water); -
issm/trunk/src/m/solutions/ice/ModelProcessorDiagnosticStokes.m
r51 r121 41 41 elements(stokesnewnumber)=SetStructureField(elements(stokesnewnumber),'element','b',md.bed(md.elements(pos,1:6))); 42 42 elements(stokesnewnumber)=SetStructureField(elements(stokesnewnumber),'element','friction_type',md.drag_type); 43 elements(stokesnewnumber)=SetStructureField(elements(stokesnewnumber),'element','viscosity_overshoot',md.viscosity_overshoot); 43 44 elements(stokesnewnumber)=SetStructureField(elements(stokesnewnumber),'element','k',md.drag(md.elements(pos,1:6))); 44 45 elements(stokesnewnumber)=SetStructureField(elements(stokesnewnumber),'element','p',md.p(pos)); … … 63 64 [materials(end).constants]=deal(matpar); 64 65 materials(end)=SetStructureField(materials(end),'constants','g',md.g); 65 materials(end)=SetStructureField(materials(end),'constants','viscosity_overshoot',md.viscosity_overshoot);66 66 materials(end)=SetStructureField(materials(end),'constants','rho_ice',md.rho_ice); 67 67 materials(end)=SetStructureField(materials(end),'constants','rho_water',md.rho_water); -
issm/trunk/src/m/solutions/ice/ModelProcessorDiagnosticVert.m
r51 r121 38 38 elements(pos)=SetStructureField(elements(pos),'element','b',md.bed(md.elements(pos,1:6))); 39 39 elements(pos)=SetStructureField(elements(pos),'element','friction_type',md.drag_type); 40 elements(pos)=SetStructureField(elements(pos),'element','viscosity_overshoot',md.viscosity_overshoot); 40 41 elements(pos)=SetStructureField(elements(pos),'element','k',md.drag(md.elements(pos,1:6))); 41 42 elements(pos)=SetStructureField(elements(pos),'element','p',md.p(pos)); … … 59 60 [materials(end).constants]=deal(matpar); 60 61 materials(end)=SetStructureField(materials(end),'constants','g',md.g); 61 materials(end)=SetStructureField(materials(end),'constants','viscosity_overshoot',md.viscosity_overshoot);62 62 materials(end)=SetStructureField(materials(end),'constants','rho_ice',md.rho_ice); 63 63 materials(end)=SetStructureField(materials(end),'constants','rho_water',md.rho_water); -
issm/trunk/src/m/solutions/ice/SetupParams.m
r1 r121 12 12 params.eps_rel=md.eps_rel; 13 13 params.eps_abs=md.eps_abs; 14 params.viscosity_overshoot=md.viscosity_overshoot;15 14 params.debug=md.debug; 16 15 params.min_thermal_constraints=md.min_thermal_constraints; 17 16 params.element_debug=md.element_debug; 18 17 params.element_debugid=md.element_debugid; 19
Note:
See TracChangeset
for help on using the changeset viewer.