function run_domain(num_grid_points,num_subdomains,size_of_subdomain)
% RUN_DOMAIN (num_grid_points,num_subdomains,size_of_subdomain)
%
% demonstrates running DOMAIN_1D for various numbers of
% iterations.  Try running run_domain(100,3,38).
%
% $Id: run_domain.m,v 1.1 2004/03/31 07:47:59 kenta Exp $

iter=0
[t,s]=domain_1d(1:num_grid_points,num_subdomains,size_of_subdomain,iter);
plot(t',s');
pause(1);

iter=1
[t,s]=domain_1d(1:num_grid_points,num_subdomains,size_of_subdomain,iter);
plot(t',s');
pause(1);

iter=2
[t,s]=domain_1d(1:num_grid_points,num_subdomains,size_of_subdomain,iter);
plot(t',s');
pause(1);

iter=5
[t,s]=domain_1d(1:num_grid_points,num_subdomains,size_of_subdomain,iter);
plot(t',s');
pause(1);

iter=10
[t,s]=domain_1d(1:num_grid_points,num_subdomains,size_of_subdomain,iter);
plot(t',s');
pause(1);

iter=20
[t,s]=domain_1d(1:num_grid_points,num_subdomains,size_of_subdomain,iter);
plot(t',s');
pause(1);

iter=50
[t,s]=domain_1d(1:num_grid_points,num_subdomains,size_of_subdomain,iter);
plot(t',s');

