1// +=====================================================================+ 2// | Un bug en arithmetique complexe. | 3// +---------------------------------------------------------------------+ 4// | 01/09/02 : Les tableaux de complexes ne sont pas dispos | 5// | 11/09/03, V1.34 | 6// | variable du contexte sont ecrasees c'est le cas de j | 7// | | 8// +=====================================================================+ 9 10 11 complex z1, z2, j ; 12 real ReZ, ImZ ; 13 14 j = 0 + 1i ; 15 cout << "j = " << j <<" attendu : i" << endl ; 16 17 cout << "trace 1 de j = " << j << endl ; 18 ReZ = 4.5 ; ImZ = 6.7 ; 19 cout << "ReZ = " << ReZ << " attendu : 4.5 " << endl ; 20 cout << "ImZ = " << ImZ << " attendu : 6.7 " << endl ; 21 cout << "trace 2 de j = " << j << endl ; 22 cout << "Voila, j est ecrase par 0 + (ReZ) i !" << endl ; 23 24 cout << endl ; 25 cout << "Le meme Pb pour les reels ? " << endl ; 26 27 28 real r1, r2, jR ; 29 30 jR = 2 ; 31 cout << "jR = " << jR <<" attendu : 2" << endl ; 32 33 cout << "trace 1 de jR = " << jR << endl ; 34 ReZ = 4.5 ; ImZ = 6.7 ; 35 cout << "ReZ = " << ReZ << " attendu : 4.5 " << endl ; 36 cout << "ImZ = " << ImZ << " attendu : 6.7 " << endl ; 37 cout << "trace 2 de jR = " << jR << endl ; 38 cout << "NON jR n'est pas ecrase" << endl ; 39 cout << endl ; 40