ivan@155: function mmdlcn_exactRec_demo(it,k,sn,cs)
ivan@155: tic
ivan@155: IT = it;
ivan@155: K = k;
ivan@155: SN = sn;
ivan@155: if SN<10,
ivan@155:     samnum = ['0',num2str(SN)];
ivan@155: else
ivan@155:     samnum = num2str(SN);
ivan@155: end
ivan@155: load(['Param',num2str(K),'kS',samnum,'.mat'])
ivan@155: lambda = 2*.2; % 2 * Smallest coefficients (Soft Thresholding)
ivan@155: if cs == 'bn'
ivan@155:     res = 1;
ivan@155: elseif cs == 'un'
ivan@155:     res = 2;
ivan@155: else
ivan@155:     disp('Undefined dictionary admissible set.')
ivan@155: end
ivan@155: method = ['bn';'un'];
ivan@155: res = 2; % 1 for bounded-norm, 2 for unit-norm
ivan@155: %%%%%%%%%%%%%%
ivan@155: Phi = Phio;
ivan@155: M = size(Phi,1);
ivan@155: [Phi,unhat,ert] = mmdl_cn(x,Phi,lambda,IT,res);
ivan@155: 
ivan@155: save(['RDLl1',num2str(M),'t',num2str(IT),'iki',method(res,:),num2str(K),'v1d',num2str(SN),'.mat'],'Phi','Phid','x','ud','unhat','ert')
ivan@155: 
ivan@155: toc