Continue to Site

Welcome to EDAboard.com

Welcome to our site! EDAboard.com is an international Electronics Discussion Forum focused on EDA software, circuits, schematics, books, theory, papers, asic, pld, 8051, DSP, Network, RF, Analog Design, PCB, Service Manuals... and a whole lot more! To participate you need to register. Registration is free. Click here to register now.

Could anyone please tell me what is the comments given in this matlab code?

Status
Not open for further replies.

tojeena

Member level 3
Member level 3
Joined
Jan 24, 2013
Messages
55
Helped
1
Reputation
2
Reaction score
1
Trophy points
1,288
Visit site
Activity points
1,570
Hello,

Could anyone please tell me what is the comments given in the matlab code? or any reference material to get idea about this code?
Code:
function y=IWT(x)  
x=imread('lenna.gif'); 
subplot(2,3,1);imshow(x);title('Ô*ͼÏñ'); 
x=double(x); 
y=x;  
[hp,lp]=size(x); 
hc=hp/2;  lc=lp/2;
%----------------ÆæżÁÐÖØÅÅ 
for n=1:lc          
    j=n*2-1;          
    y(:,n)=x(:,j);         
    y(:,lc+n)=x(:,j+1); 
end 
subplot(2,3,2);imshow(uint8(y)); title('ÆæżÁÐÖØÅÅ');
%-----------------ÐÐÖØÅÅ  
for n=1:lc         
    y(:,lc+n)=y(:,lc+n)-y(:,n); 
end  
for n=1:lc         
    k=y(:,lc+n)/2-mod(y(:,lc+n)/2,1);       
    y(:,n)=y(:,n)+k; 
end 
subplot(2,3,3);imshow(uint8(y));title('ÐÐÖØÅÅ');  
%---------------ÆæżÐÐÖØÅÅ 
x=y;
for n=1:hc         
    j=n*2-1;          
    y(n,:)=x(j,:);          
    y(hc+n,:)=x(j+1,:);  
end 
subplot(2,3,4);imshow(uint8(y));title('ÆæżÐÐÖØÅÅ'); 
%---------------ÁÐÖØÅÅ 
for n=1:hc          
    y(hc+n,:)=y(hc+n,:)-y(n,:); 
end  
for n=1:hc          
    k=y(hc+n,:)/2-mod(y(hc+n,:)/2,1);          
    y(n,:)=y(n,:)+k; 
end  
subplot(2,3,5);imshow(uint8(y));title('ÁÐÖØÅÅ');
%----------------Öظ´ÉÏÊö²½Ö裬½øÐжþ´ÎѹËõ  
for n=1:lc          
    j=n*2-1;         
    y(:,n)=x(:,j);          
    y(:,lc+n)=x(:,j+1); 
end   
for n=1:lc           
    y(:,lc+n)=y(:,lc+n)-y(:,n); 
end 
for n=1:lc           
    k=y(:,lc+n)/2-mod(y(:,lc+n)/2,1);        
    y(:,n)=y(:,n)+k;
end   
x=y;  
for n=1:hc      
    j=n*2-1;      
    y(n,:)=x(j,:);       
    y(hc+n,:)=x(j+1,:); 
end  
for n=1:hc    
    y(hc+n,:)=y(hc+n,:)-y(n,:); 
end  
for n=1:hc       
    k=y(hc+n,:)/2-mod(y(hc+n,:)/2,1);     
    y(n,:)=y(n,:)+k; 
end
%----------------ÔÙ½øÐÐÆæżÐÐÖØÅźÍÁÐÖØÅÅ  
x=y;  
for n=1:hc    
    j=n*2-1;     
    y(n,:)=x(j,:);   
    y(hc+n,:)=x(j+1,:); 
end   
for n=1:hc  
    y(hc+n,:)=y(hc+n,:)-y(n,:); 
end 
for n=1:hc     
    k=y(hc+n,:)/2-mod(y(hc+n,:)/2,1);     
    y(n,:)=y(n,:)+k; 
end
subplot(2,3,6);imshow(uint8(y));title('¶þ´ÎѹËõ ');
 

Each of the cryptic expressions has an even number of characters.
Could it be in a language that uses 2 bytes per character? It is the method to create fonts for far east languages.
 

Sir,
This code i got it from net as IWT.m .I want to know whether it is integer wavelet transform and also about the steps and also the papers to refer.

Thanking You,
 

Status
Not open for further replies.

Part and Inventory Search

Welcome to EDABoard.com

Sponsor

Back
Top