comparison scripts/sparse/bicgstab.m @ 21634:96518f623c91

Backed out changeset dcf8922b724b
author Mike Miller <mtmiller@octave.org>
date Wed, 20 Apr 2016 11:06:03 -0700
parents dcf8922b724b
children ffad2baa90f7
comparison
equal deleted inserted replaced
21633:dcf8922b724b 21634:96518f623c91
178 endif 178 endif
179 endfor 179 endfor
180 180
181 if (nargout < 2) 181 if (nargout < 2)
182 if (flag == 0) 182 if (flag == 0)
183 fprintf ("bicgstab converged at iteration %i ", iter); 183 printf ("bicgstab converged at iteration %i ", iter);
184 fprintf ("to a solution with relative residual %e\n", relres); 184 printf ("to a solution with relative residual %e\n", relres);
185 elseif (flag == 3) 185 elseif (flag == 3)
186 fprintf ("bicgstab stopped at iteration %i ", iter); 186 printf ("bicgstab stopped at iteration %i ", iter);
187 fprintf ("without converging to the desired tolerance %e\n", tol); 187 printf ("without converging to the desired tolerance %e\n", tol);
188 fprintf ("because the method stagnated.\n"); 188 printf ("because the method stagnated.\n");
189 fprintf ("The iterate returned (number %i) ", iter); 189 printf ("The iterate returned (number %i) ", iter);
190 fprintf ("has relative residual %e\n", relres); 190 printf ("has relative residual %e\n", relres);
191 else 191 else
192 fprintf ("bicgstab stopped at iteration %i ", iter); 192 printf ("bicgstab stopped at iteration %i ", iter);
193 fprintf ("without converging to the desired toleranc %e\n", tol); 193 printf ("without converging to the desired toleranc %e\n", tol);
194 fprintf ("because the maximum number of iterations was reached.\n"); 194 printf ("because the maximum number of iterations was reached.\n");
195 fprintf ("The iterate returned (number %i) ", iter); 195 printf ("The iterate returned (number %i) ", iter);
196 fprintf ("has relative residual %e\n", relres); 196 printf ("has relative residual %e\n", relres);
197 endif 197 endif
198 endif 198 endif
199 199
200 else 200 else
201 print_usage (); 201 print_usage ();