# 0.12 Appendix: a matlab program for generating prime length fft  (Page 2/3)

 Page 2 / 3

The following programs print the program statements that carry out the operation $I\otimes {D}_{k}\otimes I$ and $I\otimes {D}_{k}^{t}\otimes I$ . They are modeled after kpi in the text.

function kpi(d,g,r,c,n,Y,X,fid) % kpi(d,g,r,c,n,Y,X,fid);% Kronecker Product : A(d(1)) kron ... kron A(d(n)) % g : permutation of 1,...,n% r : [r(1),...,r(n)] % c : [c(1),..,c(n)]% r(i) : rows of A(d(i)) % c(i) : columns of A(d(i))% n : number of terms for i = 1:na = 1; for k = 1:(g(i)-1)if i>find(g==k) a = a * r(k);else a = a * c(k);end endb = 1; for k = (g(i)+1):nif i>find(g==k) b = b * r(k);else b = b * c(k);end end% Y = (I(a) kron A(d(g(i))) kron I(b)) * X; if i == 1S1 = sprintf([Y,' = ID%dI(%d,%d,',X,'); '],d(g(i)),a,b);S2 = sprintf(['%% ',Y,' = (I(%d) kron D%d kron I(%d)) * ',X],a,d(g(i)),b);fprintf(fid,'%-35s%s\n',S1,S2); elseif d(g(i)) ~= 1S1 = sprintf([Y,' = ID%dI(%d,%d,',Y,'); '],d(g(i)),a,b);S2 = sprintf(['%% ',Y,' = (I(%d) kron D%d kron I(%d)) * ',Y],a,d(g(i)),b);fprintf(fid,'%-35s%s\n',S1,S2); endend function kpit(d,g,r,c,n,Y,X,fid) % kpit(g,r,c,n,Y,X,fid);% (transpose) % Kronecker Product : A(d(1))' kron ... kron A(d(n))'% g : permutation of 1,...,n % r : [r(1),...,r(n)]% c : [c(1),..,c(n)] % r(i) : rows of A(d(i))'% c(i) : columns of A(d(i))' % n : number of termsfor i = 1:n a = 1;for k = 1:(g(i)-1) if i>find(g==k) a = a * r(k);else a = a * c(k);end endb = 1; for k = (g(i)+1):nif i>find(g==k) b = b * r(k);else b = b * c(k);end end% x = (I(a) kron A(d(g(i)))'' kron I(b)) * x; if i == nS1 = sprintf([Y,' = ID%dtI(%d,%d,',X,'); '],d(g(i)),a,b);S2 = sprintf(['%% ',Y,' = (I(%d) kron D%d'' kron I(%d)) * ',X],a,d(g(i)),b);fprintf(fid,'%-35s%s\n',S1,S2); elseif d(g(i)) ~= 1S1 = sprintf([X,' = ID%dtI(%d,%d,',X,'); '],d(g(i)),a,b);S2 = sprintf(['%% ',X,' = (I(%d) kron D%d'' kron I(%d)) * ',X],a,d(g(i)),b);fprintf(fid,'%-35s%s\n',S1,S2); endend

## Programs for computing multiplicative constants

The following programs carry out the operation of ${F}_{{d}_{1}}\otimes \cdots \otimes {F}_{{d}_{K}}$ where $F$ is the reconstruction matrix in a linear convolution algorithm. See the appendix, Bilinear Forms for Linear Convolution.'

function u = KFt(f,r,c,u) % u = (F^t kron ... kron F^t)*u% (transpose) % f = [f(1),...,f(K)]% r : r(i) = rows of F(i) % c : c(i) = columns of F(i)% u : length(u) = prod(c); K = length(f);for i = 1:K m = prod(c(1:i-1));n = prod(r(i+1:K)); u = IFtI(f(i),r(i),c(i),m,n,u);end function y = IFtI(s,r,c,m,n,x); % y = (I(m) kron F(s)^t kron I(n))*x% (transpose) % r : rows of F(s)% c : columns of F(s) v = 0:n:n*(c-1);u = 0:n:n*(r-1); for i = 0:m-1for j = 0:n-1 y(v+i*c*n+j+1) = Ftop(s,x(u+i*r*n+j+1));end end function y = Ftop(k,x) if k == 1, y = x;elseif k == 2, y = F2t(x); elseif k == 3, y = F3t(x);elseif k == 4, y = F4t(x); elseif k == 6, y = F6t(x);elseif k == 8, y = F8t(x); elseif k == 18, y = F18t(x);end`

The following programs carry out the operation of ${G}_{{p}_{1}^{{e}_{1}}}\otimes \cdots \otimes {G}_{{p}_{K}^{{e}_{K}}}$ were $G$ is given by Equation 13 and Equation 14 from Bilinear Forms for Circular Convolution .

Preparation and Applications of Nanomaterial for Drug Delivery
Application of nanotechnology in medicine
what is variations in raman spectra for nanomaterials
I only see partial conversation and what's the question here!
what about nanotechnology for water purification
please someone correct me if I'm wrong but I think one can use nanoparticles, specially silver nanoparticles for water treatment.
Damian
yes that's correct
Professor
I think
Professor
what is the stm
is there industrial application of fullrenes. What is the method to prepare fullrene on large scale.?
Rafiq
industrial application...? mmm I think on the medical side as drug carrier, but you should go deeper on your research, I may be wrong
Damian
How we are making nano material?
what is a peer
What is meant by 'nano scale'?
What is STMs full form?
LITNING
scanning tunneling microscope
Sahil
how nano science is used for hydrophobicity
Santosh
Do u think that Graphene and Fullrene fiber can be used to make Air Plane body structure the lightest and strongest. Rafiq
Rafiq
what is differents between GO and RGO?
Mahi
what is simplest way to understand the applications of nano robots used to detect the cancer affected cell of human body.? How this robot is carried to required site of body cell.? what will be the carrier material and how can be detected that correct delivery of drug is done Rafiq
Rafiq
if virus is killing to make ARTIFICIAL DNA OF GRAPHENE FOR KILLED THE VIRUS .THIS IS OUR ASSUMPTION
Anam
analytical skills graphene is prepared to kill any type viruses .
Anam
Any one who tell me about Preparation and application of Nanomaterial for drug Delivery
Hafiz
what is Nano technology ?
write examples of Nano molecule?
Bob
The nanotechnology is as new science, to scale nanometric
brayan
nanotechnology is the study, desing, synthesis, manipulation and application of materials and functional systems through control of matter at nanoscale
Damian
Is there any normative that regulates the use of silver nanoparticles?
what king of growth are you checking .?
Renato
What fields keep nano created devices from performing or assimulating ? Magnetic fields ? Are do they assimilate ?
why we need to study biomolecules, molecular biology in nanotechnology?
?
Kyle
yes I'm doing my masters in nanotechnology, we are being studying all these domains as well..
why?
what school?
Kyle
biomolecules are e building blocks of every organics and inorganic materials.
Joe
anyone know any internet site where one can find nanotechnology papers?
research.net
kanaga
sciencedirect big data base
Ernesto
Introduction about quantum dots in nanotechnology
hi
Loga
Got questions? Join the online conversation and get instant answers!