$ perl -le 'printf "%.55f\n", cos(100_000_000.0)'
-0.3633850893556905270465051671635592356324195861816406250