function fd_clear

% function fd_clear
%
% This function is part of FD3.  It erases all the modules, resets the
% diagram data matrices, and resets the sliders.
%
% ACP

% Last update:  July 12, 1993
% Author:       Adrian C. Penisson

global FD3AXES FD3MODULES FD3STREAMS FD3TEXT FD3BOXES FD3TITLE FD3SLIDERS

% kill everything

delete(get(FD3AXES(1),'Children')')
delete(get(FD3AXES(2),'Children')')
delete(get(FD3AXES(3),'Children')')

% wipe the data matrices clean

FD3MODULES=zeros(15,1);
FD3STREAMS=zeros(6,1);
FD3TEXT=[];
FD3BOXES=[0 0]';
FD3TITLE='';

% Move back to top quadrant.

set(FD3SLIDERS(1),'Value',22)
set(FD3SLIDERS(2),'Value',33)

adj_view(1,FD3SLIDERS(1));
adj_view(2,FD3SLIDERS(2));
