int main()
{
int n;
TYPE x, term, sum;
for(x = 0.0; x < 100.0; x += 10.0) {
sum = 0.0; //initialization
n = 0;
term = 1;
while(fabs(term) > TRUNCATION) {
term = PHASE(n) * (TYPE) pow((TYPE) x,(TYPE) n)
/ factorial(n);
sum += term;
n++;
} // end of while() loop