Self numbers: Difference between revisions

m
→‎{{header|AppleScript}}: Fixed a bug in the fastForward() handler that caused a hang when the start index was the last in a block.
m (→‎{{header|Phix}}: restored the word fast in "fast forward")
m (→‎{{header|AppleScript}}: Fixed a bug in the fastForward() handler that caused a hang when the start index was the last in a block.)
Line 55:
repeat until ((indexDiff < 98) or (counter = startIndex))
set test to counter + indexDiff
if (test >< startIndex) then
set indexDiff to indexDiff div 10 + 1
set numericDiff to numericDiff div 10 + 1
else
set counter to test
set currentSelf to (currentSelf + numericDiff)
else
set indexDiff to indexDiff div 10 + 1
set numericDiff to numericDiff div 10 + 1
end if
end repeat
Line 113:
 
-- One hundred millionth:
selfNumbers(1000000009.777777778E+9 + 15)
--> {1.022727208E+9}</lang>
 
557

edits