function QJ_ZH=SOV_QJ(QA_HTL,HLL,NL,nL)
%求沖擊的最大值
for i=1:NL;
       
            LS=abs((QA_HTL(i,2)-QA_HTL(i,1))/HZDLL(i));
            for iii=2:nL-1;
                if LS<abs((QADLL(ii,iii+1,i)-QADLL(ii,iii,i))/HZDLL(i,iii))
                    LS=abs((QADLL(ii,iii+1,i)-QADLL(ii,iii,i))/HZDLL(i,iii));
                end;
          
            QJDM(i,ii)=LS;
        end;
    end;