% mfile plotfish
%
% Plot current iteration of game of life
% Get pointers to current fish positions
     fishpnt = find(fish(OCEAN,OCEAN));
% Get (complex) locations of current sharks
     fishwhere = ZZocean(fishpnt);
% Clear plotting screen
     hold off, clf
% Plot in right half of screen, + for sharks and o for fish
     title(['Current time step i= ',num2str(i)]) 
     xlabel('o = fish')
     plot(fishwhere,'ok'), axis([1,d,1,d]), axis('square'), hold off
%