de = ry; dee = abs(de - js); Sz = sqrt(r*r + dee * dee); d0 = log(lamdpor(1)); d1 = log(lamdpor(2)); d2 = log(lamdpor(3)); d3 = log(lamdpor(4)); if (jjz == 1 && jji == 1) elseif (jjz == 1 && jji == 2) elseif (jjz == 1 && jji == 3) elseif (jjz == 1 && jji == 4) elseif (jjz == 2 && jji == 1) elseif (jjz == 2 && jji == 2) elseif (jjz == 2 && jji == 3) elseif (jjz == 2 && jji == 4) elseif (jjz == 3 && jji == 1) elseif (jjz == 3 && jji == 2) elseif (jjz == 3 && jji == 3) elseif (jjz == 3 && jji == 4) elseif (jjz == 4 && jji == 1) elseif (jjz == 4 && jji == 2) elseif (jjz == 4 && jji == 3) elseif (jjz == 4 && jji == 4) end de = ry; dee = abs(de + js); Sz = sqrt(r*r + dee * dee); d0 = log(lamdpor(1)); d1 = log(lamdpor(2)); d2 = log(lamdpor(3)); d3 = log(lamdpor(4)); if (jjz == 1 && jji == 1) elseif (jjz == 1 && jji == 2) elseif (jjz == 1 && jji == 3) elseif (jjz == 1 && jji == 4) elseif (jjz == 2 && jji == 1) elseif (jjz == 2 && jji == 2) elseif (jjz == 2 && jji == 3) elseif (jjz == 2 && jji == 4) elseif (jjz == 3 && jji == 1) elseif (jjz == 3 && jji == 2) elseif (jjz == 3 && jji == 3) elseif (jjz == 3 && jji == 4) elseif (jjz == 4 && jji == 1) elseif (jjz == 4 && jji == 2) elseif (jjz == 4 && jji == 3) elseif (jjz == 4 && jji == 4) end

这段代码中有大量的重复代码，并且if-elseif结构也非常冗长。可以将重复的代码提取为函数，将不同的参数作为函数的输入，以减少代码冗余。例如：

function [Sz, d0, d1, d2, d3] = calculateDistanceAndLog(x, y, z, ry, js, r, lamdpor, jjz, jji)
    if z >= 0
        de = ry;
        dee = abs(de - js);
    else
        de = ry;
        dee = abs(de + js);
    end
    Sz = sqrt(r*r + dee*dee);

    d = log(lamdpor);
    d0 = d(1);
    d1 = d(2);
    d2 = d(3);
    d3 = d(4);
end

然后在主函数中调用该函数即可，例如：

[Sz, d0, d1, d2, d3] = calculateDistanceAndLog(x, y, z, ry, js, r, lamdpor, jjz, jji);
if jjz == 1 && jji == 1
    % do something
elseif jjz == 1 && jji == 2
    % do something
% ... 省略部分代码
elseif jjz == 4 && jji == 3
    % do something
elseif jjz == 4 && jji == 4
    % do something
end

这样可以使代码更加简洁易读。