List Commands Library for 50g

[DavidM]

(01-18-2021 06:37 PM)John Keith Wrote:  Version 1.3 has been released: ListExt 1.3

This is a major update with many new commands.

Here's a quick rundown of the new commands. Many of the new commands operate identically to GoferLists commands with similar names, but are included in ListExt due to improved performance.

Short descriptions of the new commands are listed below, along with the general release notes. As always, complete descriptions and more examples are provided in the documentation that comes with the library.

Questions, comments, etc. are always welcome!

- David

Code:

LSCAN - returns a list of results from applying a program with each successive list element given
   { 1 2 3 4 5 } « + » LSCAN => { 1 3 6 10 15 }
   { 2 2 2 2 2 } « * » LSCAN => { 2 4 8 16 32 }
    
LMAP - maps a command or function to each list element (non-recursive)
   { 1 2 3 4 5 } « 3 * » LMAP => { 3 6 9 12 15 }
   { { 1 2 3 } { 1 2 } { 1 } } ::SIZE LMAP => { 3. 2. 1. }

LXEQ - executes a program repeatedly with each list element as its argument
   { 1 2 3 4 5 } « 3 * » LXEQ => 3 6 9 12 15
      (similar to LMAP, but results are left on the stack instead of grouped into a list)
    { "one" "two" "three" "four" } 4 { NXEQ DISP } CLLCD LXEQ 7 FREEZE => <no stack results>
      (each object is displayed on a separate line starting on line 4 of the display)

LDIFF - returns a list of the elements in list1 that aren't in list2
   { 1 2 3 4 5 } { 2 3 4 5 6 } LDIFF => { 1 }
   { 2 3 4 5 6 } { 1 2 3 4 5 } LDIFF => { 6 }

LINTR - returns a list of the elements that are in both list1 and list2
   { 1 2 3 } { 3 4 5 } LINTR => { 3 }
   { 1 2 3 } { 5 4 3 2 1 } LINTR => { 1 2 3 }

LSUBS - returns a list of all possible subgroupings of the elements in the given list
   { 1 2 } LSUBS => { { } { 1 } { 2 } { 1 2 } }
   { 1 2 3 } LSUBS => { { } { 1 } { 2 } { 1 2 } { 3 } { 1 3 } { 2 3 } { 1 2 3 } }

LFILT - returns a list containing the elements for which the supplied program is TRUE
   { 1 2 3 4 5 } « 2 > » LFILT => { 3 4 5 }
   { 1 2 3 4 5 } { 2 OVER > SWAP 4 > OR } LFILT => { 1 5 }

LWHL - executes a program while a given condition is TRUE, grouping the results into a list
   2 ::NEXTPRIME { 30 < } LWHL => { 2 3 5 7 11 13 17 19 23 29 }
   3 { DUP 2 MOD { 3 * 1 + } { 2 / } IFTE } { 1 SAME NOT } LWHL 1 + => { 3 10 5 16 8 4 2 1 }

LDWHL - removes elements from the beginning of a list that match the provided condition
   { 1 2 3 4 5 } « 4 < » LDWHL => { 4 5 }
   { 1 2 3 4 5 } { 6 < } LDWHL => { }

LTWHL - returns a list containing the first elements of a list that match the provided condition
   { 1 2 3 4 5 } « 4 < » LTWHL => { 1 2 3 }
   { 1 2 3 4 5 } { 6 < } LTWHL => { 1 2 3 4 5 }

LCPRD - returns the Cartesian Product of two or more lists
   { { 1 2 3 } { a b } } LCPRD => { { 1 a } { 1 b } { 2 a } { 2 b } { 3 a } { 3 b } }
   { { 1 } { a b } { X Y Z } } LCPRD => { { 1 a X } { 1 a Y } { 1 a Z } { 1 b X } { 1 b Y } { 1 b Z } }

LTAKE - returns a list containing the first or last elements specified by a count
   { 1 2 3 4 5 } 3 LTAKE => { 1 2 3 }
   { 1 2 3 4 5 } -3 LTAKE => { 3 4 5 }

LDROP - returns a list containing all but the first or last elements specified by a count
   { 1 2 3 4 5 } 3 LDROP => { 4 5 }
   { 1 2 3 4 5 } -3 LDROP => { 1 2 }

LCOMP - returns a list indicating matching and non-matching elements in 2 lists
   { 1 2 3 4 5 } { 5 4 3 2 1 } 1 LCOMP => { 0. 0. 1. 0. 0. }
   { 1 2 3 4 5 } { 5 4 3 2 1 } 0 LCOMP => { 1. 1. 0. 1. 1. }

LDLTA - faster ΔLIST that also accepts lists with 0 or 1 element
   { 1 } LDLTA => { 1 }
   { 5 4 3 2 1 } LDLTA => { -1 -1 -1 -1 }

NL→I2 - converts a list of numbers to an integer (faster, more specific input than NL→I)
   { 1 2 3 } NL→I2 => 123
   { 10 .00299 399 .04E-6 } NL→I2 => 1234

Here's the release notes for this version:

Version 1.3.0
January 4, 2021

- Refactored LRMOV to create a subroutine that could be used by other commands
- Added checks to the following commands for triggering garbage collection in low memory situations:
I→NL
NL→I
- Small speed improvement for SLST→
- Small speed improvement for LPICK
- Negative arguments for LDIST and LSDIV are now allowed; negative indicates quantity of sublists instead of size of each sublist
- LSHUF changes
- optimized to reduce initial list traversal
- reduced subroutine calls during shuffling
- SplitMix64 seed now incremented as per standard definition as opposed to using final output of each iteration as the new seed
- DOCOMB and DOPERM now accept lists and tagged commands for the user-supplied program to execute
- New commands added: LSCAN, LMAP, LXEQ, LDIFF, LINTR, LSUBS, LFILT, LWHL, LDWHL, LTWHL, LCPRD, LTAKE, LDROP, LCOMP, LDLTA, NL→I2
- Updated documentation for new and changed commands