Update calc.c

Simple intrusion by my part, sorry! =-D