/[MITgcm]/MITgcm_contrib/shelfice_remeshing/CLEAN/input/gendata_vero.m
ViewVC logotype

Diff of /MITgcm_contrib/shelfice_remeshing/CLEAN/input/gendata_vero.m

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph | View Patch Patch

revision 1.2 by dgoldberg, Mon Jan 18 10:37:22 2016 UTC revision 1.3 by dgoldberg, Tue Jan 19 16:46:56 2016 UTC
# Line 257  for ix=1:nx Line 257  for ix=1:nx
257    end    end
258  end  end
259    
260    ground(1:nx,1:ny)=-990;
261   icetopo2(:,1)=-1000;   icetopo2(:,1)=-1000;
262     fid = fopen('shelftopo.ground.bin','w','b'); fwrite(fid,ground,'real*8'); fclose(fid);
263  fid = fopen('shelftopo.round.bin','w','b'); fwrite(fid,icetopo2,'real*8'); fclose(fid);  fid = fopen('shelftopo.round.bin','w','b'); fwrite(fid,icetopo2,'real*8'); fclose(fid);
264  fid = fopen('etainit.round.bin','w','b'); fwrite(fid,etainit,'real*8'); fclose(fid);  fid = fopen('etainit.round.bin','w','b'); fwrite(fid,etainit,'real*8'); fclose(fid);

Legend:
Removed from v.1.2  
changed lines
  Added in v.1.3

  ViewVC Help
Powered by ViewVC 1.1.22