Source code yang lucu

Cross posting dari blog saya yang ini.

Hari ini saya dapat sesuatu yang aneh bagi saya. Kenapa? Soalnya saat saya membuka SCeLE(situs e-learning milik Fasilkom UI) pada mata kuliah Analisis Numerik, ada source code dalam matlab(dengan file ekstensi .m) yang di-upload oleh dosen saya. Terus-terus yang lucu apa?

Lihat aja source code-nya:

function [L,U,p]=LUPivot(A)
U=A;
[n n] = size(A);
p=1:n;
for j=1:n-1
    [x k]=max(abs(U(j:n,j)));
    k=k+j-1;
    tmp1=U(k,;tmp2=p(k);
    U(k,=U(j,;p(k)=p(j);
    U(j,=tmp1;p(j)=tmp2;
    L(p(j),j)=1.0;
    for i=j+1:n
        m=U(i,j)/U(j,j);
        L(p(i),j)=m;
        U(i,j:n)=U(i,j:n)-m*U(j,j:n);
    end
end
en=zeros; en=1;
for i=1:n
    L(p(i),n)=en(i);
end

Gimana? Kalau ngga lucu buka aja link di bawah.

Note: kalau mau lihat gambar dari Firefox > di sini.