function DecodeMat=decRefine(DecodeMat,Rn,N,LSP_Old)
% 函數 DECREFINE()為精細解碼程序，對上一級解碼產生的重要系數列表LSP_Old，根據輸入的
% 精細位流 Rn 提高重要系數值的重構精度
% 輸入參數：DecodeMat —— 經排序掃描解碼后的重構系數矩陣
%          Rn —— 精細掃描輸出位流
%          N —— 本級解碼閾值的指數
%          LSP_Old —— 上一級解碼產生的重要系數列表
% 輸出參數：DecodeMat —— 提高重要系數精度后的重構矩陣

rlsp=size(LSP_Old,1);
if ~isempty(LSP_Old)
    for r=1:rlsp
        dMat=DecodeMat(LSP_Old(r,1),LSP_Old(r,2));
% 首先讀取重構矩陣中重要系數的值 dMat
        rMat=abs(dMat)+(-1)^(1+Rn(1))*2^(N-1);
% 對 dMat 的絕對值，如果 Rn = 1，則加上2^(N-1)，否則減去2^(N-1)，結果存入 rMat
        if dMat<=0
            rMat=-rMat;
        end
% 如果 dMat 為負數，則 rMat 也轉為負數
        Rn(1)=[];
% 消去所讀取的Rn信息
        DecodeMat(LSP_Old(r,1),LSP_Old(r,2))=rMat;
% 將提高了精度的重要系數值返回重構矩陣中
    end
end