
/*
/// IMOD      int - division with remainder
/// Example: IMOD(&in, &ir, 43, 10); // returns in=4, ir=3
int IMOD (int *iNr, int *iRem, int ival, int idiv);
#define IMOD(iNr,iRem,ival,idiv){\
 *(iNr) = ival / idiv;\
 *(iRem) = ival - *(iNr) * idiv;}\


/// DMOD      double - division with remainder
/// Example: DMOD(&in, &dr, 43., 10.); // returns in=4, dr=3.
double DMOD (int *iNr, double *iRem, double dval, double ddiv);
#define DMOD(iNr,dRem,dval,ddiv){\
 *(dRem) = remquo (dval, ddiv, iNr);}
*/

// EOF
