fork download
copy 
  1. ; 8424432925592889329288197322308900672459420460792433
  2.  
  3. (define (f n) (gcd (+ (expt n 17) 9) (+ (expt (+ n 1) 17) 9)))
  4.  
  5. (display (f 42)) (newline)
  6. (display (f 8424432925592889329288197322308900672459420460792433)) (newline)
Runtime error #stdin #stdout #stderr 0.01s 7716KB
comments (?)
stdin
copy 
Standard input is empty
stdout
copy 
1099511627776.0
stderr
copy 
Error: (gcd) bad argument type - not an integer: +inf.0

	Call history:

	<eval>	  [f] (expt n 17)
	<eval>	  [f] (+ (expt (+ n 1) 17) 9)
	<eval>	  [f] (expt (+ n 1) 17)
	<eval>	  [f] (+ n 1)
	<syntax>	  (newline)
	<eval>	  (newline)
	<syntax>	  (display (f 8.42443292559289e+51))
	<syntax>	  (f 8.42443292559289e+51)
	<eval>	  (display (f 8.42443292559289e+51))
	<eval>	  (f 8.42443292559289e+51)
	<eval>	  [f] (gcd (+ (expt n 17) 9) (+ (expt (+ n 1) 17) 9))
	<eval>	  [f] (+ (expt n 17) 9)
	<eval>	  [f] (expt n 17)
	<eval>	  [f] (+ (expt (+ n 1) 17) 9)
	<eval>	  [f] (expt (+ n 1) 17)
	<eval>	  [f] (+ n 1)	<--
https://ideone.com/tdFHd1
language:
Scheme (chicken 4.13)
created:
3 years ago
visibility:
secret

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!