ABC words: Difference between revisions
→Added Transd solution
Not a robot (talk | contribs) (Add CLU) |
|||
Line 2,432:
tabernacle
tablecloth</pre>
=={{header|Transd}}==
<lang scheme>#lang transd
MainModule : {
_start: (lambda
(with fs FileStream()
(open-r fs "/mnt/tmp/unixdict.txt") )
(for w in (read-lines fs) do
(if (match w "^[^bc]*a[^c]*b.*c.*") (lout w))))
)
}</lang>{{out}}
<pre>
aback
abacus
abc
... 55 words in total ...
syllabic
tabernacle
tablecloth
</pre>
=={{header|Wren}}==
| |||