Lettre L 462

cJ = '{"type":"FeatureCollection","features":[{"type":"Feature","properties":{"name":"A"},"geometry":{"type":"Polygon","coordinates":[[[0,0],[4,0],[4,4],[0,4],[0,0]]]}}]}'
oW = StzGeoFeaturesFromJson(cJ)
o1 = StzGeoPoints([ 1, 1, 2, 2, 3, 3 ], oW)
? @@( o1.L([ 100, 200, 300 ]) )
#--> [ -100, 4.39, -95.61 ]

o1 = new stzParseTree("S")
? o1.Label()
#--> S

cJ = '{"type":"FeatureCollection","features":[{"type":"Feature","properties":{"name":"A"},"geometry":{"type":"Polygon","coordinates":[[[0,0],[4,0],[4,4],[0,4],[0,0]]]}}]}'
oF = StzGeoFeaturesFromJson(cJ)
o1 = StzGeoMap(new stzGeoProjection(:mercator), oF)
? o1.LabelFloor()
#--> 13

cJ = '{"type":"FeatureCollection","features":[{"type":"Feature","properties":{"name":"A"},"geometry":{"type":"Polygon","coordinates":[[[0,0],[4,0],[4,4],[0,4],[0,0]]]}}]}'
oF = StzGeoFeaturesFromJson(cJ)
o1 = StzGeoMap(new stzGeoProjection(:mercator), oF)
? o1.LabelMode()
#--> auto

cJ = '{"type":"FeatureCollection","features":[{"type":"Feature","properties":{"name":"A"},"geometry":{"type":"Polygon","coordinates":[[[0,0],[4,0],[4,4],[0,4],[0,0]]]}}]}'
oF = StzGeoFeaturesFromJson(cJ)
o1 = StzGeoMap(new stzGeoProjection(:mercator), oF)
? @@( o1.LabelReport() )
#--> [ [ "named", 0 ], [ "numbered", 0 ], [ "inset", 0 ], [ "dropped", 0 ], [ "unlisted", 0 ] ]

o1 = new stzBarPlot([ [ "A", 100 ], [ "B", 300 ] ])
? @@( o1.Labels() )
#--> [ "A", "B" ]

o1 = StzCurvedGraphStyle()
? o1.LabelsAfter()
#--> 1

o1 = new stzListOfTimeLines([
:Lanes = [ "single" ],
:From  = "2026-06-01 00:00:00",
:To    = "2026-06-30 23:59:59"
])
? @@( o1.Lanes() )
#--> [ "SINGLE" ]

o1 = new stzNaturalEngine("en", "", [], "")
? o1.LangResolvable()
#--> 1

o1 = new stzString("banana split")
? o1.LanguageAbbreviationForm()
#--> unknown

? WhatQ().TheQ().LanguageAbbreviationFormQ().Of("Softanza")
#--> unknown

o1 = new stzLocale([ :Country = :south_africa ])
? o1.LanguageLongAbbreviation()
#--> zul

o1 = new stzCountry(:american_samoa)
? o1.LanguageNativeName()
#--> English

? WhatQ().TheQ().LanguageQ().Of("Softanza")
#--> unknown

o1 = StzProgramQ("../../education/program")
? @@( o1.Languages() )
#--> [ "en", "fr", "ar", "ha" ]

o1 = new stzLocale([ :Country = :south_africa ])
? o1.LanguageShortAbbreviation()
#--> zu

o1 = new stzListOfLists([[10, 20, 30], [40, 50, 60]])
? @@( o1.LargestListsAndTheirPositions() )
#--> [ [ [ 10, 20, 30 ], 1 ], [ [ 40, 50, 60 ], 2 ] ]

o1 = new stzListOfNumbers([ 4, 8, 15, 16, 23, 42 ])
? @@( o1.LargestNAndTheirPositions(2) )
#--> [ [ 23, 5 ], [ 42, 6 ] ]

o1 = new stzListOfNumbers([ 4, 8, 15, 16, 23, 42 ])
? @@( o1.LargestNNumbersAndTheirPositions(2) )
#--> [ [ 23, 5 ], [ 42, 6 ] ]

o1 = new stzString("banana split")
? @@( o1.Last2Chars() )
#--> [ "i", "t" ]

o1 = new stzString("banana split")
? o1.Last2CharsAsString()
#--> it

o1 = new stzString("banana split")
? @@( o1.Last3Chars() )
#--> [ "l", "i", "t" ]

o1 = new stzString("banana split")
? o1.Last3CharsAsString()
#--> lit

o1 = new stzList([ 5, 3, 8, 3, 1 ])
? @@( o1.LastAndFirstItems() )
#--> [ 1, 5 ]

o1 = new stzString("ABC")
# first
? o1.FirstChar()
# last
? o1.LastChar()
#--> A
#--> C

? WhatQ().TheQ().LastCharQ().Of("Softanza")
#--> a

o1 = new stzString("BATISTA1")
o1.RemoveLastChar()
# mutated in place
? o1.Content()
# or functionally
? StzStringQ("BATISTA1").LastCharRemoved()
#--> BATISTA
#--> BATISTA

? WhatQ().TheQ().LastCharRemovedQ().Of("Softanza")
#--> Softanz

o1 = new stzDate([ 2026, 5, 30 ])
? o1.LastDayOfMonth()
#--> 31/05/2026

o1 = new stzCalendar([2024, "Q3"])
? o1.LastDayOfWeek()
#--> 07/07/2024

o1 = new stzLocale([ :Country = :south_africa ])
? o1.LastDayOfWeekAbbreviation()
#--> Sat

o1 = new stzLocale([ :Country = :south_africa ])
? o1.LastDayOfWeekNativeSymbol()
#--> S

o1 = new stzLocale([ :Country = :south_africa ])
? o1.LastDayOfWeekSymbol()
#--> S

o1 = new stzListOfEntities([ [ :name = "alice", :type = "person", :age = 30 ], [ :name = "bob", :type = "person", :age = 25 ], [ :name = "ferrari", :type = "car", :brand = "ferrari" ] ])
? @@( o1.LastEntity() )
#--> [ [ "name", "ferrari" ], [ "type", "car" ], [ "brand", "ferrari" ] ]

o1 = new stzScene(1100, 660)
? o1.LastIndex()
#--> 0

o1 = new stzListRemover(["first", "second", "third"])
? @@( o1.LastItemRemoved() )
#--> [ "first", "second" ]

cDup = "aaa" + NL + "bbb" + NL + "aaa"
o1 = new stzStringLines(cDup)
? o1.LastLine()
#--> aaa

? WhatQ().TheQ().LastLineQ().Of("Softanza")
#--> Softanza

o1 = new stzListOfLists([[10, 20, 30], [40, 50, 60]])
? @@( o1.LastList() )
#--> [ 40, 50, 60 ]

o1 = new stzRegex("[a-zA-Z0-9._-]+@[a-zA-Z0-9.-]+")
? o1.LastMatchKind()
#--> 0

o1 = new stzLocale([ :Country = :south_africa ])
? o1.LastNativeDayOfWeek()
#--> Saturday

o1 = new stzLocale([ :Country = :south_africa ])
? o1.LastNativeDayOfWeekAbbreviation()
#--> Sat

o1 = new stzString("banana split")
? o1.LastNChars(2)
#--> it

o1 = new stzString("BATISTA123")
o1.RemoveNLastChars(3)
# mutated in place
? o1.Content()
# or functionally
? StzStringQ("BATISTA123").LastNCharsRemoved(3)
#--> BATISTA
#--> BATISTA

o1 = new stzString("banana split")
? o1.LastNItemsQRT(2, "an")
#--> it

o1 = new stzGraph("g")
o1.AddNode("A") o1.AddNode("B") o1.AddNode("C")
o1.AddNode("D")
o1.AddEdge("A", "B") o1.AddEdge("A", "C")
o1.AddEdge("B", "D")
? @@( o1.LastNode() )
#--> [ [ "id", "d" ], [ "label", "D" ], [ "properties", [ ] ] ]

o1 = new stzGraph("g")
o1.AddNode("A") o1.AddNode("B") o1.AddNode("C")
o1.AddNode("D")
o1.AddEdge("A", "B") o1.AddEdge("A", "C")
o1.AddEdge("B", "D")
? o1.LastNodeId()
#--> d

o1 = new stzTree(
:root = [
:node1 = [ "X", :node11 = [ "A", "B", "C", "D", "X" ] ],
:node2 = [ 1, 2, 3 ],
:node3 = [ "X", 4, 5 ]
]
)
? o1.LastNodeInBranch("a")
#--> a

o1 = new stzString("banana split")
? o1.LastNonSpaceChar()
#--> t

o1 = new stzString("banana split")
? o1.LastNonSpaceCharPosition()
#--> 12

? WhatQ().TheQ().LastNonSpaceCharPositionQ().Of("Softanza")
#--> 8

? WhatQ().TheQ().LastNonSpaceCharQ().Of("Softanza")
#--> a

o1 = new stzStringNumbers("price is 42 and tax is 8")
? o1.LastNumber()
#--> 8

o1 = new stzItemCS("A", [ "A", "a", "B", "a" ], 0)
? o1.LastPosition()
#--> 1

o1 = new stzStringText("The quick brown fox. It jumps!")
? o1.LastSentence()
#--> It jumps!

? WhatQ().TheQ().LastSentenceQ().Of("Softanza")
#--> Softanza

o1 = new stzString("banana split")
? @@( o1.LastSTDZ("an", 2, :Forward) )
#--> [ "an", 4 ]

o1 = new stzStringList([ "tea", "rice", "fish" ])
? o1.LastString()
#--> fish

o1 = new stzString("banana split")
? @@( o1.LastStz("an", 2) )
#--> [ "an", 4 ]

o1 = new stzHashList([ :name = "Aya", :age = 30, :city = "Niamey" ])
? o1.LastValue()
#--> Niamey

o1 = new stzDate([ 2026, 5, 30 ])
? o1.LastWeekdayOfMonth()
#--> 29/05/2026

o1 = new stzString("banana split")
? o1.LastWord()
#--> split

? WhatQ().TheQ().LastWordQ().Of("Softanza")
#--> Softanza

o1 = new stzCalendar([2024, "Q3"])
? o1.LastWorkingDay()
#--> 2024-09-30

o1 = new stzString("banana split")
? @@( o1.LastZ() )
#--> [ 12, 12 ]

? @@( WhatQ().TheQ().LastZQ().Of("Softanza") )
#--> [ 8, 8 ]

o1 = new stzGeoEllipsoid(:WGS84)
? o1.LatitudeAtArcKm(2)
#--> 0.02

o1 = new stzDiagram("flow")
o1.AddNode("A") o1.AddNode("B") o1.AddNode("C")
o1.AddNode("D")
o1.AddEdge("A", "B") o1.AddEdge("A", "C")
o1.AddEdge("B", "D")
? o1.Layout()
#--> topdown

o1 = new stzString("000122.12")
# the leading char
? o1.LeadingChar()
o1.RemoveThisLeadingChar("0")
# the run is gone
? o1.Content()
#--> 0
#--> 122.12

o1 = new stzString("banana split")
? o1.LeadingCharIs("an")
#--> 0

o1 = new stzString("banana split")
? o1.LeadingCharsRemoved()
#--> anana split

? WhatQ().TheQ().LeadingCharsRemovedQ().Of("Softanza")
#--> oftanza

o1 = new stzPolynomial([1, -3, -5, 5, -6, 8])
? o1.LeadingCoefficient()
#--> 1

o1 = new stzList([ 5, 3, 8, 3, 1 ])
? @@( o1.LeadingItems() )
#--> [ 5 ]

o1 = new stzMathClaim("3^2 + 4^2 + 1 = 5^2")
? o1.LeanStatement()
#--> ((3^2 + 4^2 + 1 : ℝ) = 5^2)

o1 = new stzMathClaim("3^2 + 4^2 + 1 = 5^2")
? o1.LeanTactic()
#--> norm_num

o1 = new stzPairOfNumbers([ 2.07, 0.39 ])
? o1.LeastCommonMuliple()
#--> 807945773150267

o1 = new stzNumber(12)
? o1.LeastCommonMultiple(3)
#--> 12

o1 = new stzList([ 5, 3, 8, 3, 1 ])
? o1.LeastFrequent()
#--> 5

g1 = new stzGraph("base")
g1.AddNode("A") g1.AddNode("B")
g1.AddEdge("A", "B")
g2 = new stzGraph("other")
g2.AddNode("A") g2.AddNode("B") g2.AddNode("C")
g2.AddEdge("A", "B") g2.AddEdge("B", "C")
o1 = new stzGraphComparison(g1, [ g2 ])
? o1.LeastImpactful()
#--> V1

o1 = new stzStringFormatter("hello world")
? o1.LeftAligned(12)
#--> hello world

o1 = new stzString("banana split")
? o1.LeftBound()
#--> b

? WhatQ().TheQ().LeftBoundQ().Of("Softanza")
#--> S

? WhatQ().TheQ().LeftCharQ().Of("Softanza")
#--> S

o1 = new stzString("banana split")
? o1.LeftCharRemoved()
#--> anana split

? WhatQ().TheQ().LeftCharRemovedQ().Of("Softanza")
#--> oftanza

o1 = new stzListOfBytes("Hello, World!")
? o1.LeftNBytes(2)
#--> He

o1 = new stzGrid([ 100, 1 ])
? o1.Legend()
#--> Grid: 100x1 | Current: x | Obstacles: ■ | Path: ○ |

? WhatQ().TheQ().LemmaQ().Of("Softanza")
#--> Softanza

o1 = new stzText("Alice met Bob in Paris. The weather was fine.")
? o1.Lemmatized()
#--> Alice meet Bob in Paris. The weather be fine.

o1 = new stzText("Alice met Bob in Paris. The weather was fine.")
? o1.LemmatizedInLanguage("en")
#--> Alice meet Bob in Paris. The weather be fine.

? WhatQ().TheQ().LemmatizedQ().Of("Softanza")
#--> Softanza

o1 = new stzString("banana split")
? @@( o1.LemmatizedWords() )
#--> [ "banana", "split" ]

o1 = new stzString("banana split")
? @@( o1.LemmatizedWordsInLanguage("en") )
#--> [ "banana", "split" ]

? @@( WhatQ().TheQ().LemmatizedWordsQ().Of("Softanza") )
#--> [ "Softanza" ]

? WhatQ().TheQ().LengthQ().Of("Softanza")
#--> 8

o1 = new stzStringText("The quick brown fox. It jumps!")
? o1.LessFrequentWord()
#--> The

o1 = new stzMathClaimSet("a tampered lesson")
? o1.Lesson()
#--> a tampered lesson

o1 = new stzString("banana split")
? @@( o1.Letters() )
#--> [ "b", "a", "n", "a", "n", "a", "s", "p", "l", "i", "t" ]

? @@( WhatQ().TheQ().LettersQ().Of("Softanza") )
#--> [ "S", "o", "f", "t", "a", "n", "z", "a" ]

o1 = new stzRecursiveRegexMaker()
o1.AddLevel("outer", "[(]")
o1.AddChildLevel("outer", "inner", "[0-9]+")
? @@( o1.LevelChildren("outer") )
#--> [ "inner" ]

o1 = StzProgramQ("../../education/program")
? @@( o1.LevelIds() )
#--> [ "s0", "s1", "s2", "s3", "s4" ]

o1 = new stzRecursiveRegexMaker()
o1.AddLevel("outer", "[(]")
o1.AddChildLevel("outer", "inner", "[0-9]+")
? @@( o1.LevelNames() )
#--> [ "outer", "inner" ]

o1 = StzGeoField([ 0, 0, 1, 1, 3, 3 ], [ 1, 2, 3, 4, 5, 6, 7, 8, 9 ])
? @@( o1.LevelsEvery(2) )
#--> [ 3.67, 6.33 ]

o1 = new stzString("banana split")
? o1.LevenshteinDistanceWith("an")
#--> 10

o1 = new stzString("The cat sat on the mat in the warm sun")
# lexical diversity is distinct/total words (8 distinct / 10)
? o1.LexicalDiversity()
ac = o1.ComparedTo("The dog sat on the mat in the cold rain")
# shared content vocabulary
? @@(ac[4][2])
#--> 0.80
#--> [ "sat", "mat" ]

? WhatQ().TheQ().LexicalDiversityQ().Of("Softanza")
#--> 1

o1 = new stzMathClaim("3^2 + 4^2 + 1 = 5^2")
? o1.Lhs()
#--> 3^2 + 4^2 + 1

o1 = new stzGovernance("constellation-regime")
? o1.LineageCapacity()
#--> 512

o1 = new stzGovernance("constellation-regime")
? o1.LineageDropped()
#--> 0

o1 = new stzGovernance("constellation-regime")
? o1.LineageIsComplete()
#--> 1

cDup = "aaa" + NL + "bbb" + NL + "aaa"
o1 = new stzStringLines(cDup)
? o1.LineContaining("a")
#--> aaa

o1 = new stzString("banana split")
? @@( o1.Lines() )
#--> [ "banana split" ]

o1 = new stzString("banana split")
? @@( o1.LinesContaining("an") )
#--> [ "banana split" ]

cDup = "aaa" + NL + "bbb" + NL + "aaa"
o1 = new stzStringLines(cDup)
? o1.LinesIndented(2)
#--> aaa
#-->   bbb
#-->   aaa

o1 = new stzStringText("The quick brown fox. It jumps!")
? o1.LinesNumbered()
#--> 1: The quick brown fox. It jumps!

o1 = new stzStringCode("hello")
? o1.LinesOfCode()
#--> 1

? @@( WhatQ().TheQ().LinesQ().Of("Softanza") )
#--> [ "Softanza" ]

cDup = "aaa" + NL + "bbb" + NL + "aaa"
o1 = new stzStringLines(cDup)
? o1.LinesSorted()
#--> aaa
#--> aaa
#--> bbb

o1 = new stzItemCS("A", [ "A", "a", "B", "a" ], 0)
? @@( o1.List() )
#--> [ "A", "a", "B", "a" ]

o1 = new stzHashList([ :name = "Aya", :age = 30, :city = "Niamey" ])
? @@( o1.Listified() )
#--> [ [ "name", [ "Aya" ] ], [ "age", [ 30 ] ], [ "city", [ "Niamey" ] ] ]

g = new stzGraph("g")
g.AddNode("a")
g.AddNode("b")
g.AddEdge("a", "b")
o1 = new stzGraphex("{@Node(a)}", g)
? @@( o1.ListifyGraph(g) )
#--> [ [ "a", "", "b" ] ]

g = new stzGraph("g")
g.AddNode("a")
g.AddNode("b")
g.AddEdge("a", "b")
o1 = new stzGraphex("{@Node(a)}", g)
? @@( o1.ListifyPatternGraph() )
#--> [ [ "node(a)" ] ]

o1 = new stzListInString('[ "alpha", "beta", "gamma" ]')
? o1.ListInString()
#--> [ "alpha", "beta", "gamma" ]

o1 = new stzListOfLists([[10, 20, 30], [40, 50, 60]])
? o1.ListsHaveSameNumberOfItems()
#--> 1

o1 = new stzMathMotion(:Function, [ :f = "{a} * x", :on = [ 0, 1 ] ])
? o1.LiveSampleCount()
#--> 240

oGraph = new stzGraph("org")
oGraph.LoadFromStzRulz("../_data/bceao_banking.stzrulz")
? "Rules loaded: " + oGraph.NumberOfRules()
? @@( oGraph.RulesSummary()[:Validation] )
? @@( oGraph.RulesSummary()[:Constraint] )
#--> Rules loaded: 2
#--> [ "board_required", "audit_independence" ]
#--> [ ]

oOrg = new stzOrgChart("acme")
oOrg.LoadRuleBase(new stzSOXRuleBase())
# LoadRuleBase records the base
? len(oOrg.RuleBases()) >= 1
# ...the base kept its name
? (new stzSOXRuleBase()).Name()
#--> 1
#--> SOX

o1 = new stzCountry(:american_samoa)
? o1.LocaleAbbreviation()
#--> en-AS

o1 = new stzStringLocale("fr_FR")
? o1.LocaleCompare("an")
#--> 1

o1 = new stzStringLocale("fr_FR")
? o1.LocaleEquals("an")
#--> 0

o1 = new stzStringLocale("fr_FR")
? o1.LocaleGreaterThan("an")
#--> 1

o1 = new stzStringLocale("fr_FR")
? o1.LocaleLessThan("an")
#--> 0

o1 = new stzText("Alice met Bob in Paris. The weather was fine.")
? @@( o1.Locations() )
#--> [ "Paris" ]

o1 = new stzCorpus("seed document about cats")
? o1.LogProbability("an")
#--> 0

o1 = new stzLanguage("English")
? o1.LongAbbreviation()
#--> eng

o1 = new stzStringList([ "tea", "rice", "fish" ])
? o1.Longest()
#--> tea

cDup = "aaa" + NL + "bbb" + NL + "aaa"
o1 = new stzStringLines(cDup)
? o1.LongestLine()
#--> aaa

o1 = new stzString("banana split")
? o1.LongestSentenceInWords()
#--> 2

? WhatQ().TheQ().LongestSentenceInWordsQ().Of("Softanza")
#--> 1

o1 = new stzStringWords("hello dear world dear")
? o1.LongestWord()
#--> hello

# DER FLUSS lowers to der fluss
? Q("DER FLUSS").LowercasedInLocale("de-DE")
# the eszett round-trip stays FALSE (documented limitation)
? Q("der fluß").IsLowercaseOfXT("DER FLUSS", :InLocale = "de-DE")
#--> der fluss
#--> 0

? WhatQ().TheQ().LowercasedQ().Of("Softanza")
#--> softanza

o1 = new stzListOfNumbers([ 4, 8, 15, 16, 23, 42 ])
? @@( o1.LowestNAndTheirPositions(2) )
#--> [ [ 4, 1 ], [ 8, 2 ] ]

o1 = new stzListOfNumbers([ 4, 8, 15, 16, 23, 42 ])
? @@( o1.LowestNNumbersAndTheirPositions(2) )
#--> [ [ 4, 1 ], [ 8, 2 ] ]