Because I recursive call the function and the function has not export, resulting in a stack overflow .
Hi Evgeniy , how much time you spent to calculated one time ?
My computer Ram state , use (mem) returns ... Run for a few minutes and did not get the results , I interrupt it .
"; GC calls: " 1361 "; GC run time: " 664471 " ms"
"\nDynamic memory segments statistic:\n"
"PgSz Used Free FMCL Segs Type\n"
512 2006 27 25 16 lisp stacks
256 2917 1929 222 19 bytecode area
4096215129 12 5 14339 CONS memory
32 2254 1710 1354 2 ::new
4096 85 80 14 11 DM Str
512 1 126 126 1 undo strings
4096143499 12 12 9565 DMxx memory
128 4 507 506 1 bstack body
"Segment size: " 65536 ", total used: " 23954 ", free: "1