with FIST;

procedure FIST_Lab is
---------------------------------------------------------------------------
-- David W. Croft, CompuServe [76600,102]
---------------------------------------------------------------------------
begin
  FIST.Demonstrate;
end FIST_Lab;