Cosmetic changes.

time-shift
Stéphane Adjemian (Charybdis) 2012-07-11 16:20:44 +02:00
parent b4c60eeebf
commit a86a904823
1 changed files with 2 additions and 2 deletions

View File

@ -39,7 +39,7 @@ n = length(A0);
id = 1:n;
while crit > cvg_tol && it < max_it;
tmp = [A2_0; A0_0]/A1_0; % = [A2_0_i_A1_0; A0_0_i_A1_0]*inv(A1_0)
tmp = [A2_0; A0_0]/A1_0;
TMP = tmp*A0_0;
A2_1 = - tmp(id,:)* A2_0;
A_1 = A_0 - TMP(id,:);