MITgcm_contrib/tides/test_bc_grid.m

% Testing the script to generate bc grid files 
%
% XC WANG 

nx=640; 
ny=640; 
nz = 70 ; 

dir_in = '/data17/XCW_output/Grid/data/' ; 

%create_bc_grid_north(dir_in, ny, ny,nz,ny_north);  

cbdry='n' ; 
create_bc_grid(dir_in, ny, ny,nz,cbdry);  


cbdry='s' ; 
create_bc_grid(dir_in, ny, ny,nz,cbdry); 

cbdry='w' ; 
create_bc_grid(dir_in, ny, ny,nz,cbdry); 

cbdry='e' ; 
create_bc_grid(dir_in, ny, ny,nz,cbdry); 
break 
1	% Testing the script to generate bc grid files
2	%
3	% XC WANG
4
5	nx=640;
6	ny=640;
7	nz = 70 ;
8
9	dir_in = '/data17/XCW_output/Grid/data/' ;
10
11	%create_bc_grid_north(dir_in, ny, ny,nz,ny_north);
12
13	cbdry='n' ;
14	create_bc_grid(dir_in, ny, ny,nz,cbdry);
15
16
17	cbdry='s' ;
18	create_bc_grid(dir_in, ny, ny,nz,cbdry);
19
20	cbdry='w' ;
21	create_bc_grid(dir_in, ny, ny,nz,cbdry);
22
23	cbdry='e' ;
24	create_bc_grid(dir_in, ny, ny,nz,cbdry);
25	break