end tt=norm (Q ( : , k)); if tt-10+eps*t & tte't/10, % if length short reorthogonalize reorth=1; t-tt ; else reorth=0; if tte'10+eps ot, tt–0; ...
確定! 回上一頁