source:
issm/oecreview/Archive/24307-24683/ISSM-24484-24485.diff
Last change on this file was 24684, checked in by , 5 years ago | |
---|---|
File size: 1.4 KB |
-
../trunk-jpl/src/m/contrib/tsantos/mismip/writeNetCDF.m
11 11 time=[]; 12 12 13 13 %Inserting time 0. md0 must be last experiment (e.g., Ice1r for Ice1ra) 14 x = md0.results.TransientSolution(end).MeshX; 15 y = md0.results.TransientSolution(end).MeshY; 14 if(isfield(md0.results.TransientSolution,'MeshElements')) 15 x = md0.results.TransientSolution(end).MeshX; 16 y = md0.results.TransientSolution(end).MeshY; 17 else 18 x = md0.mesh.x; 19 y = md0.mesh.y; 20 end 16 21 time(1) = 0; 17 22 [xgl_step ygl_step] = gl_position(md0,length(md0.results.TransientSolution),0); 18 23 xGL{1} = xgl_step; … … 25 30 vBaseGL{1} = griddata(x,y,md0.results.TransientSolution(end).Vy,xgl_step,ygl_step); 26 31 27 32 for i=2:length(step), 28 x = md.results.TransientSolution(step(i)).MeshX; 29 y = md.results.TransientSolution(step(i)).MeshY; 33 if(isfield(md.results.TransientSolution,'MeshElements')) 34 x = md.results.TransientSolution(step(i)).MeshX; 35 y = md.results.TransientSolution(step(i)).MeshY; 36 else 37 x = md.mesh.x; 38 y = md.mesh.y; 39 end 30 40 time(i)=md.results.TransientSolution(step(i)).time; 31 41 [xgl_step ygl_step]=gl_position(md,step(i),0); 32 42 xGL{i}=xgl_step;
Note:
See TracBrowser
for help on using the repository browser.