fixed calc_calorie() function bug