Date: Oct 16, 2009 7:03 AM
Author: André Hautot
Subject: WorkingPrecision and NDSolve

Why does this instruction properly work if precision =60 but not if 
precision=70  (Message : error test failure at t=0.01316... ) :


NDSolve[{x''[t] + x'[t] + Sin[x[t]] == Sin[t/3], x[0] == 0, x'[0] == 0}, 
x, {t, 0, 10}, WorkingPrecision -> 70]         ?

Thanks in advance,
A. Hautot