for (i=0; i<=16384; i++) {
  obase=10;
  print i; print " ";
  print(s(3.14159265358979323846264338327950*i/(2*16384)));
  print "\n"
}
