** This is part of the CTSim program
** Copyright (C) 1983-2000 Kevin Rosenberg
**
-** $Id: ezsupport.cpp,v 1.3 2000/07/04 18:33:35 kevin Exp $
+** $Id: ezsupport.cpp,v 1.4 2000/07/13 07:03:21 kevin Exp $
**
** This program is free software; you can redistribute it and/or modify
** it under the terms of the GNU General Public License (version 2) as
{
double integer;
- double frac = modf (x, &integer);
+ modf (x, &integer);
return (integer);
}