Home > atmlab > randomize > iaaft > remove_average_profile.m

remove_average_profile

PURPOSE ^

SYNOPSIS ^

function lwc = remove_average_profile(lwc, mean_pdf_profile)

DESCRIPTION ^

CROSS-REFERENCE INFORMATION ^

This function calls: This function is called by:

DOWNLOAD ^

remove_average_profile.m

SOURCE CODE ^

0001 function lwc = remove_average_profile(lwc, mean_pdf_profile)
0002 
0003 len=length(mean_pdf_profile);
0004 
0005 a=size(lwc);
0006 no_dim = length(a);
0007 
0008 if (no_dim == 2)
0009     for i=1:len
0010         lwc(i,:)=lwc(i,:)-mean_pdf_profile(i); % indexes are for y, x
0011     end
0012 end
0013 
0014 if no_dim == 3
0015     for i=1:len
0016         lwc(:,:,i)=lwc(:,:,i)-mean_pdf_profile(i); % indeces here are x, y, z
0017     end
0018 end

Generated on Mon 15-Sep-2014 13:31:28 by m2html © 2005