/[MITgcm]/MITgcm/verification/inverted_barometer/input/gendata.m
ViewVC logotype

Diff of /MITgcm/verification/inverted_barometer/input/gendata.m

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

revision 1.1 by mlosch, Wed Jul 31 16:38:31 2002 UTC revision 1.2 by jmc, Thu Mar 2 02:07:15 2006 UTC
# Line 24  phi(find(r==0))=0; Line 24  phi(find(r==0))=0;
24    
25  kr = 2*pi/r0;  kr = 2*pi/r0;
26    
27    %mask = change(h,'~=',0,1);
28  mask = change(h,'~=',0,1);  mask=ones(nx,ny); mask(find(h==0))=0;
29    
30  fid=fopen('topog.box','w',ieee); fwrite(fid,h,accuracy); fclose(fid);  fid=fopen('topog.box','w',ieee); fwrite(fid,h,accuracy); fclose(fid);
31    
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2
  ViewVC Help
Powered by ViewVC 1.1.22