Changeset 14102 for issm/trunk-jpl/test/NightlyRun/test1304.m
- Timestamp:
- 12/05/12 14:35:11 (12 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk-jpl/test/NightlyRun/test1304.m
r13671 r14102 10 10 md=parameterize(md,'../Par/SquareThermal.par'); 11 11 md=extrude(md,11,1.); 12 md=setflowequation(md,' Pattyn','all');12 md=setflowequation(md,'pattyn','all'); 13 13 14 pos2=find(md.mesh.elementonsurface); md.thermal.spctemperature(md.mesh.elements(pos2,4:6))=0 ;14 pos2=find(md.mesh.elementonsurface); md.thermal.spctemperature(md.mesh.elements(pos2,4:6))=0.; 15 15 md.initialization.pressure=zeros(md.mesh.numberofvertices,1); 16 16 md.basalforcings.geothermalflux(:)=0.1; %100mW/m^2 … … 21 21 md.initialization.temperature=-0.1/md.materials.thermalconductivity*(md.mesh.z-md.geometry.surface); %G=0.1 W/m2 22 22 23 %modeled 23 %modeled results 24 24 md.cluster=generic('name',oshostname(),'np',2); 25 25 md=solve(md,ThermalSolutionEnum()); … … 27 27 %plot results 28 28 comp_temp=md.results.ThermalSolution.Temperature; 29 relative=abs((comp_temp-md.initialization.temperature)./md.initialization.temperature)*100 ;30 relative(find(comp_temp==md.initialization.temperature))=0 ;29 relative=abs((comp_temp-md.initialization.temperature)./md.initialization.temperature)*100.; 30 relative(find(comp_temp==md.initialization.temperature))=0.; 31 31 plotmodel(md,'data',comp_temp,'title','Modeled temperature [K]','data',md.initialization.temperature,'view',3,... 32 32 'title','Analytical temperature','view',3,'data',comp_temp-md.initialization.temperature,... 33 33 'title','Absolute error [K]','view',3,'data',relative,'title','Relative error [%]','view',3,... 34 34 'figposition','mathieu','FontSize#all',20) 35 if printingflag, 35 if printingflag, 36 36 set(gcf,'Color','w') 37 37 printmodel('thermalgeothermalflux','png','margin','on','marginsize',25,'frame','off','resolution',0.7,'hardcopy','off');
Note:
See TracChangeset
for help on using the changeset viewer.