HP Forums / HP Software Libraries / General Software Library v / (50g) Fast Repunit Programme

Post Reply 
(50g) Fast Repunit Programme
07-03-2017, 07:26 AM
Post: #1
Gerald H Offline
Senior Member
 		Posts: 1,627
Joined: May 2014
(50g) Fast Repunit Programme
For integer input N this programme returns the Nth repunit:

Code:

::
  CK1&Dispatch
  BINT1
  ::
    COERCE
    BINT1
    #MAX
    CODE 00058 8F146608FB9760D681AF09C685A8F08B5081AF11311314C161CC8AC5F8F2D7601C4CF81AF10​141142164808C
    FPTR2 ^S>Z
  ;
;
Find all posts by this user
Quote this message in a reply
07-04-2017, 03:14 PM
Post: #2
DavidM Offline
Senior Member
 		Posts: 999
Joined: Dec 2013
RE: (50g) Fast Repunit Programme
Very nice, Gerald!
Find all posts by this user
Quote this message in a reply
Post Reply 




User(s) browsing this thread: 4 Guest(s)

Contact Us | The Museum of HP Calculators | Return to Top | Return to Content | Lite (Archive) Mode | RSS Syndication