|
|
1.1 ! root 1: // C = Kronecker product of A and B ! 2: <m, n> = size(A); ! 3: for i = 1:m, ... ! 4: ci = a(i,1)*B; ... ! 5: for j = 2:n, ci = <ci a(i,j)*B>; end ... ! 6: if i = 1, C = ci; else, C = <C; ci>;
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.