/* * m o d f . c */ #ifdef DOCUMENTATION title modf modulus function index modulus function usage .s double x, xi, fr, modf(); .br fr = modf(x, &xi); .s description .s This is the UNIX function modf. It returns the fractional part of x as its value and the integer part of x as a double value in xi. The result has the same sign as x. .s diagnostics .s None .s internal .s The program is written in macro as modf.mac. It uses the FPU MODD instruction. This C file is included only for the documentation. .s author .s Hamish Ross. .s date .s 22-Aug-84 #endif