shearlet 此程序为shearlet程序

此程序为shearlet程序，用于对图像进行分解变换，有兴趣的可以下载

function f=bump（xlbub）
% function:
%        bump
% input:
%        x: （lbub）
%        [lbub]: the bound of interval
% output:
%        f: C（lbup）;
% Subfunction: （none）
%----------------------------------------
% Principle: x in [lbub]
% Application: construct a bump funciton
% Attention: 
% Example: 
% See also smooth
%----------------------------------------
% Designer: ---
% Date: 10-Sep-2009

if nargin==1lb=-1;ub=1;            % default interval
elseif nargin==0
    lb=-1;ub=1;x=linspace（lbub100）;     
end

x=2*（x-lb）/（ub-lb）-1;
L=length（x）;
f=zeros（1L）;
for i=1:L
    if lb        f（i）=exp（-1/（1-x（i）^2））;
    end
end

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件        686  2010-01-01 09:26  shearlet\bump.m

     文件       4266  2013-05-18 19:35  shearlet\exper.m

     文件        220  2009-12-22 16:29  shearlet\Fpsi1_0 - 副本.m

     文件        220  2009-12-22 16:29  shearlet\Fpsi1_0.m

     文件        451  2009-12-10 19:19  shearlet\Fpsi1_1 - 副本.m

     文件        451  2009-12-10 19:19  shearlet\Fpsi1_1.m

     文件        399  2009-12-18 15:58  shearlet\Fpsi1_2 - 副本.m

     文件        399  2009-12-18 15:58  shearlet\Fpsi1_2.m

     文件        215  2009-12-22 16:31  shearlet\Fpsi2_0.m

     文件        636  2009-12-13 12:30  shearlet\Fpsi2_1.m

     文件        371  2009-12-18 16:03  shearlet\Fpsi2_2.m

     文件        446  2009-12-24 20:29  shearlet\Fu.m

     文件        275  2010-01-01 09:26  shearlet\guide.txt

     文件        576  2009-12-27 16:12  shearlet\hfilt.m

     文件      32060  2010-11-29 10:06  shearlet\lena.jpg

     文件      26633  2012-09-24 16:18  shearlet\lena128.jpg

     文件       1347  2009-12-27 13:17  shearlet\phi.m

     文件       1861  2009-12-31 11:10  shearlet\psi.m

     文件     123581  2013-05-17 12:29  shearlet\RI0.mat

     文件        978  2010-01-01 09:26  shearlet\smooth.m

     文件       2778  2009-12-27 19:23  shearlet\wfilt.m

     目录          0  2013-07-20 16:48  shearlet

----------- ---------  ---------- -----  ----

               198849                    22