Self-describing numbers: Difference between revisions

Content added Content deleted
(→‎{{header|Haskell}}: Added output)
(→‎{{header|Haskell}}: Extended range up to 42101000)
Line 828: Line 828:
main =
main =
(print . concat) $
(print . concat) $
map decimalize . filter isSelfDescribing . allBaseNNumsOfLength <$> [1 .. 7]</lang>
map decimalize . filter isSelfDescribing . allBaseNNumsOfLength <$> [1 .. 8]</lang>
{{Out}}
{{Out}}
<pre>[1210,2020,21200,3211000]</pre>
<pre>[1210,2020,21200,3211000,42101000]</pre>


=={{header|Icon}} and {{header|Unicon}}==
=={{header|Icon}} and {{header|Unicon}}==