Nest: Difference between revisions

From APL Wiki
Jump to navigation Jump to search
m (Text replacement - "http://help.dyalog.com" to "https://help.dyalog.com")
m (Text replacement - "</source>" to "</syntaxhighlight>")
Line 1: Line 1:
{{Built-ins|Nest|⊆|⊃}}, also called '''Conditional Enclose''' or '''Enclose If Simple''' (commonly abbreviated as '''eis'''), is a [[monadic]] [[primitive function]] that applies [[Enclose]] to the given [[argument]], but only if it is [[simple]]. Nest first appeared as an extension to [[SHARP APL]]<ref>[https://www.jsoftware.com/papers/satn45.htm "Language Extensions of May 1983"]. SATN-45, 1983-05-02.</ref> using the [[glyph]] <source lang=apl inline>⊃</source>, and was added to [[Dyalog APL]] 16.0 using the glyph <source lang=apl inline>⊆</source>.
{{Built-ins|Nest|⊆|⊃}}, also called '''Conditional Enclose''' or '''Enclose If Simple''' (commonly abbreviated as '''eis'''), is a [[monadic]] [[primitive function]] that applies [[Enclose]] to the given [[argument]], but only if it is [[simple]]. Nest first appeared as an extension to [[SHARP APL]]<ref>[https://www.jsoftware.com/papers/satn45.htm "Language Extensions of May 1983"]. SATN-45, 1983-05-02.</ref> using the [[glyph]] <source lang=apl inline>⊃</syntaxhighlight>, and was added to [[Dyalog APL]] 16.0 using the glyph <source lang=apl inline>⊆</syntaxhighlight>.


== Examples ==
== Examples ==
Line 7: Line 7:
<source lang=apl>
<source lang=apl>
       EWords←{+/'E'∊¨⍵}
       EWords←{+/'E'∊¨⍵}
</source>{{Works in|[[Dyalog APL]]}}
</syntaxhighlight>{{Works in|[[Dyalog APL]]}}


If the user gives multiple words in the usual notation, it works correctly:
If the user gives multiple words in the usual notation, it works correctly:
Line 14: Line 14:
       EWords 'I' 'ATE' 'DINNER' 'AND' 'WENT' 'TO' 'SLEEP'  ⍝ ATE, DINNER, WENT, SLEEP
       EWords 'I' 'ATE' 'DINNER' 'AND' 'WENT' 'TO' 'SLEEP'  ⍝ ATE, DINNER, WENT, SLEEP
4
4
</source>{{Works in|[[Dyalog APL]]}}
</syntaxhighlight>{{Works in|[[Dyalog APL]]}}


But if the user gives only one word, <source lang=apl inline>EWords</source> will count E's in each ''letter'' instead, giving the wrong answer:
But if the user gives only one word, <source lang=apl inline>EWords</syntaxhighlight> will count E's in each ''letter'' instead, giving the wrong answer:


<source lang=apl>
<source lang=apl>
       EWords 'SLEEP'
       EWords 'SLEEP'
2
2
</source>{{Works in|[[Dyalog APL]]}}
</syntaxhighlight>{{Works in|[[Dyalog APL]]}}


In this case, the programmer can apply Nest to the argument so that the array has a consistent structure.
In this case, the programmer can apply Nest to the argument so that the array has a consistent structure.
Line 31: Line 31:
       EWords2 'SLEEP'
       EWords2 'SLEEP'
1
1
</source>{{Works in|[[Dyalog APL]]}}
</syntaxhighlight>{{Works in|[[Dyalog APL]]}}


== External links ==
== External links ==

Revision as of 22:08, 10 September 2022

Nest (, ), also called Conditional Enclose or Enclose If Simple (commonly abbreviated as eis), is a monadic primitive function that applies Enclose to the given argument, but only if it is simple. Nest first appeared as an extension to SHARP APL[1] using the glyph <source lang=apl inline>⊃</syntaxhighlight>, and was added to Dyalog APL 16.0 using the glyph <source lang=apl inline>⊆</syntaxhighlight>.

Examples

Nest is useful when a nested array is expected but the user may supply a simple array instead. For example, consider a function which expects one or more English words in uppercase and counts the words that include the letter E.

<source lang=apl>

     EWords←{+/'E'∊¨⍵}

</syntaxhighlight>

Works in: Dyalog APL

If the user gives multiple words in the usual notation, it works correctly:

<source lang=apl>

     EWords 'I' 'ATE' 'DINNER' 'AND' 'WENT' 'TO' 'SLEEP'  ⍝ ATE, DINNER, WENT, SLEEP

4

</syntaxhighlight>

Works in: Dyalog APL

But if the user gives only one word, <source lang=apl inline>EWords</syntaxhighlight> will count E's in each letter instead, giving the wrong answer:

<source lang=apl>

     EWords 'SLEEP'

2

</syntaxhighlight>

Works in: Dyalog APL

In this case, the programmer can apply Nest to the argument so that the array has a consistent structure.

<source lang=apl>

     EWords2←{+/'E'∊¨⊆⍵}
     EWords2 'I' 'ATE' 'DINNER' 'AND' 'WENT' 'TO' 'SLEEP'

4

     EWords2 'SLEEP'

1

</syntaxhighlight>

Works in: Dyalog APL

External links

Documentation

References

  1. "Language Extensions of May 1983". SATN-45, 1983-05-02.


APL built-ins [edit]
Primitive functions
Scalar
Monadic ConjugateNegateSignumReciprocalMagnitudeExponentialNatural LogarithmFloorCeilingFactorialNotPi TimesRollTypeImaginarySquare Root
Dyadic AddSubtractTimesDivideResiduePowerLogarithmMinimumMaximumBinomialComparison functionsBoolean functions (And, Or, Nand, Nor) ∙ GCDLCMCircularComplexRoot
Non-Scalar
Structural ShapeReshapeTallyDepthRavelEnlistTableCatenateReverseRotateTransposeRazeMixSplitEncloseNestCut (K)PairLinkPartitioned EnclosePartition
Selection FirstPickTakeDropUniqueIdentitySelectReplicateExpandSet functions (IntersectionUnionWithout) ∙ Bracket indexingIndex
Selector Index generatorGradeIndex OfInterval IndexIndicesDeal
Computational MatchNot MatchMembershipFindNub SieveEncodeDecodeMatrix InverseMatrix DivideFormatExecuteMaterialiseRange
Primitive operators Monadic EachCommuteConstantReplicateExpandReduceWindowed ReduceScanOuter ProductKeyI-BeamSpawnFunction axis
Dyadic BindCompositions (Compose, Reverse Compose, Beside, Withe, Atop, Over) ∙ Inner ProductPowerAtUnderRankDepthVariantStencilCut (J)
Quad names
Arrays Index originMigration levelAtomic vector
Functions Name classCase convertUnicode convert
Operators SearchReplace