% mfile sfinit
% inintialize sharks and fish for game of life
     disp(' Initializing game of life.')
% 30 by 3 cell ocean is reasonable
     m=30;
     m = input('Input size of ocean (number of cells on a side)(30 is reasonable): ');
% put fish in random places
% (generate uniform [0,1] random numbers, and reset seed to 0)
     rand('seed',0)
     ofish = (rand(m,m) < .2);
% Take 30 time steps
     n=30;
     n = input('Input number of time steps to simulate(30 is reasonable): ');
     disp(['Ocean size = ',num2str(m)])
     disp(['Number of time steps = ',num2str(n)])