program Determinan matrik dengan reduksi baris (MATLAB)

Berikut program untuk mencari determinan matrik dengan reduksi baris. yang hampir serupa dengan program invers pada postingan sebelumnya.
karena memakai metode yang sama, maka secara umum algoritmanya hampir sama. dan juga belum bisa untuk mendeteksi matrik singular. untuk bisa mendeteksi matrik singular perlu ditambahkan kondisi-kondisi yang menentukan matrik singular.

clear all;
clc;
disp('program determinan matrik menggunakan reduksi baris')
disp('oleh Nadzor')
awal=input('masukkan matrik :"[....]"');
s=size(awal);
disp('matrik yang Anda Masukkan adalah berikut:')
awal
determinan=1;
for h=1:s
d=awal(1,:);
if awal(1,1)==0
awal(1,:)=awal(h+1,:);
awal(h+1,:)=d;
disp('terjadi penukaran baris')
determinan=-1
else
awal=awal;
end;
end;
for k=1:s
f=awal(k,k);
a=1/f*[awal(k,:)];
determinan=determinan*f;
for n=1:s
if n>k
awal(n,:)=[awal(n,:)]-a.*awal(n,k);
else
awal(n,:)=a;
end;
end;
a
determinan
end;