% Functon-File zur Prüfung SS 2000 Aufgabe 4
%
% INPUT : m,n : integer
% OUTPUT: Det..,Anzahl.. 
%
% Aufrufen mit SS00_4f(m,n)
%
function [Determinante, AnzahlOperationen]=SS00_4f(m,n)
%
disp(' Prüfung SS 2000 Aufgabe 4 ');
%
if (nargin==1),
    n=m;
end;
if (m==0|n==0),
    error('Die Eingabeparameter muessen natuerliche Zahlen sein')
end;
%
A=rand(m,n);
B=A'*A;
tic
Determinante=det(B);
AnzahlOperationen=toc;