HP Forums
(50G) Lah Numbers - Printable Version

+- HP Forums (https://www.hpmuseum.org/forum)
+-- Forum: HP Software Libraries (/forum-10.html)
+--- Forum: General Software Library (/forum-13.html)
+--- Thread: (50G) Lah Numbers (/thread-6875.html)



(50G) Lah Numbers - Gerald H - 09-18-2016 09:52 AM

For integer input N, K the programme below returns the corresponding Lah number.

For info on Lah numbers see

https://en.wikipedia.org/wiki/Lah_number

Code:

::
  CK2&Dispatch
  # FFFF
  ::
    2DUP
    Z1_
    FPTR2 ^RSUBext
    SWAP
    Z1_
    FPTR2 ^RSUBext
    SWAP
    PTR 2EF19
    ROT
    PTR 2EF44
    ROT
    PTR 2EF44
    FPTR2 ^ZQUOText
    FPTR2 ^RMULText
  ;
;