aidyadup.m

function [beta,alfa] = AIDyadDown(afine,D,F,EF) ％ AIDyadDown -- Average-Interpolating DownSampling

function afine = AIDyadUp(beta,alfa,D,F,EF)
% AIDyadUp -- Average-Interpolating UpSampling Operator
%  Usage
%    afine = AIDyadUp(beta,alfa,D,F,EF)
%  Inputs
%    beta    coarse-scale block averages
%    alfa    detail corrections
%    D       degree of polynomial fit in average-interpolation
%    F       filter implementing average-interpolation
%    EF      edge filter of average-interpolation
%  Outputs
%    afine   fine-scale block averages
%
%  Description
%    Implements the Coarse-to-Fine phase of the average-interpolating
%    wavelet transform. Takes coarse scale block average and detail
%    corrections and synthesizes fine-scale block averages.
%
%  See Also
%    IWT_AI, AIRefine, MakeAIFilter
% 
	n = length(beta);
	ahat = AIRefine(beta,D,F,EF);
	adif =  [(-alfa) ; alfa ]; adif = adif(:)';
	afine = ahat + adif;
	afine = afine ./sqrt(2);
    
    
%   
% Part of WaveLab Version 802
% Built Sunday, October 3, 1999 8:52:27 AM
% This is Copyrighted Material
% For Copying permissions see COPYING.m
% Comments? e-mail [e-mail]
%