V7M/src/libF77/r_int.c
Compare this file to the similar file:
23: V7/usr/src/libF77/r_int.c
23: 32V/usr/src/libF77/r_int.c
17: V7/usr/src/libF77/d_int.c
17: 32V/usr/src/libF77/d_int.c
Show the results in this format:
double r_int(x) float *x; { return( (long int) (*x) ); }