/* I think you are absolutely right about your age. I did a very accurate calculation of your age 
/* today and you are 38.81861745 years old. This differs only by .0005606321917808 days, 
/* assuming you are what you say you are: 38.8191780821917808 years old. To better 
/* understand this error, I discovered that 1 second in a day equals 0.000001157407 days. Your 
/* calculation and mine differ by about two 1000ths of a second. So, I would say you are "fairly 
/* accurate" with your age estimation today.

/* siad.tc - 2/17/9 - tct - seconds in a day (days in a second)

/* 2147483647 is the largest integer (under 32-bit Linux tiny-c interpreter)

dpf int n,d,p [
  /* display proper fraction n/d as decimal number
  /* with p digit precision 
  int w
  w=10*n/d
  if (p) [
    pnp w
    dpf(10*n%d,d,p-1) /* recursive call
    ]
  ]

pnp int n [ /* pn sans leading space
  MC n,14
  ]

siad [
  hilo '1';color '6';pl "";ps "siad.tc (seconds in a day) - tct - 2/17/9";pl "";color '7'
  int w,u
  u=60*60*24 /* seconds per day
  w=u*365 /* seconds per year
  pl "";ps "1 day equals ";pn u;ps " seconds."
  pl "";ps "1 year equals ";pn w;ps " seconds."
  pl "";ps "1 second equals .";dpf(1,u,31);ps " days."
  pl "";ps "1 second equals .";dpf(1,w,31);ps " years."
  pl ""
  int i1;i1=819178082 /* DeeDee
  int i2;i2=818617450 /* Max
  int s,t
  pl "";ps "DeeDee's (TcT's) estimate of her age is 38.819178082 years." 
  pl "";ps "Max's estimate of DeeDee's age is 38.818617450 years." 
  pl "";ps "The difference between DeeDee's and Max's estimate"
  pl "is (approx.) .000";pnp (i1-i2);ps " years."
  pl ""
  s=(i1-i2)*w/100000 
  t=(i1-i2)*w%100000 
  pl "This equals, approx.,";pn s;ps ".";dpf t,100000,2;ps " seconds."
  pl ""
  ]