comparison src/pr-output.cc @ 278:c2189d67a05c

[project @ 1994-01-08 22:43:22 by jwe]
author jwe
date Sat, 08 Jan 1994 22:43:27 +0000
parents a99f28f5e351
children 3c23b8ea9099
comparison
equal deleted inserted replaced
277:1781618ec883 278:c2189d67a05c
187 curr_imag_fmt = (char *) NULL; 187 curr_imag_fmt = (char *) NULL;
188 188
189 if (free_format) 189 if (free_format)
190 return; 190 return;
191 191
192 static char fmt_buf[32]; 192 static char fmt_buf[128];
193 193
194 int sign = (d < 0.0); 194 int sign = (d < 0.0);
195 195
196 int inf_or_nan = (xisinf (d) || xisnan (d)); 196 int inf_or_nan = (xisinf (d) || xisnan (d));
197 197
278 curr_imag_fmt = (char *) NULL; 278 curr_imag_fmt = (char *) NULL;
279 279
280 if (free_format) 280 if (free_format)
281 return; 281 return;
282 282
283 static char fmt_buf[32]; 283 static char fmt_buf[128];
284 284
285 int sign = any_element_is_negative (m); 285 int sign = any_element_is_negative (m);
286 286
287 int inf_or_nan = any_element_is_inf_or_nan (m); 287 int inf_or_nan = any_element_is_inf_or_nan (m);
288 288
392 curr_imag_fmt = (char *) NULL; 392 curr_imag_fmt = (char *) NULL;
393 393
394 if (free_format) 394 if (free_format)
395 return; 395 return;
396 396
397 static char r_fmt_buf[32]; 397 static char r_fmt_buf[128];
398 static char i_fmt_buf[32]; 398 static char i_fmt_buf[128];
399 399
400 double rp = c.real (); 400 double rp = c.real ();
401 double ip = c.imag (); 401 double ip = c.imag ();
402 402
403 int sign = (rp < 0.0); 403 int sign = (rp < 0.0);
531 curr_imag_fmt = (char *) NULL; 531 curr_imag_fmt = (char *) NULL;
532 532
533 if (free_format) 533 if (free_format)
534 return; 534 return;
535 535
536 static char r_fmt_buf[32]; 536 static char r_fmt_buf[128];
537 static char i_fmt_buf[32]; 537 static char i_fmt_buf[128];
538 538
539 Matrix rp = real (cm); 539 Matrix rp = real (cm);
540 Matrix ip = imag (cm); 540 Matrix ip = imag (cm);
541 541
542 int sign = any_element_is_negative (rp); 542 int sign = any_element_is_negative (rp);
681 curr_imag_fmt = (char *) NULL; 681 curr_imag_fmt = (char *) NULL;
682 682
683 if (free_format) 683 if (free_format)
684 return; 684 return;
685 685
686 static char fmt_buf[32]; 686 static char fmt_buf[128];
687 687
688 double r_min = r.base (); 688 double r_min = r.base ();
689 double r_max = r.limit (); 689 double r_max = r.limit ();
690 690
691 if (r_max < r_min) 691 if (r_max < r_min)