Update rcalc.c