ABC words: Difference between revisions
Content added Content deleted
Not a robot (talk | contribs) (Add BCPL) |
Not a robot (talk | contribs) (Add APL) |
||
Line 160: | Line 160: | ||
55: tablecloth |
55: tablecloth |
||
</pre> |
</pre> |
||
=={{header|APL}}== |
|||
{{works with|Dyalog APL}} |
|||
<lang apl>abcwords←{ |
|||
⍺←'abc' |
|||
words←((~∊)∘⎕TC⊆⊢) 80 ¯1⎕MAP ⍵ |
|||
match←∧/∊,2</⍳⍨ |
|||
(⍺∘match¨words)/words |
|||
}</lang> |
|||
{{out}} |
|||
<pre> 11 5 ⍴ abcwords 'unixdict.txt' |
|||
aback abacus abc abdicate abduct |
|||
abeyance abject abreact abscess abscissa |
|||
abscissae absence abstract abstracter abstractor |
|||
adiabatic aerobacter aerobic albacore alberich |
|||
albrecht algebraic alphabetic ambiance ambuscade |
|||
aminobenzoic anaerobic arabic athabascan auerbach |
|||
diabetic diabolic drawback fabric fabricate |
|||
flashback halfback iambic lampblack leatherback |
|||
metabolic nabisco paperback parabolic playback |
|||
prefabricate quarterback razorback roadblock sabbatical |
|||
snapback strabismic syllabic tabernacle tablecloth </pre> |
|||
=={{header|AWK}}== |
=={{header|AWK}}== |