*** numeric.c.orig	Mon Nov 27 18:23:21 2000
--- numeric.c	Sun Apr  1 23:26:14 2001
***************
*** 332,338 ****
  	double z;
  
  	modf(x/y, &z);
! 	mod = x - z * x;
      }
  #endif
      div = (x - mod) / y;
--- 332,338 ----
  	double z;
  
  	modf(x/y, &z);
! 	mod = x - z * y;
      }
  #endif
      div = (x - mod) / y;
---
                        ˭ʡ
                        toyofuku / juice.or.jp