Last letter-first letter: Difference between revisions
m
→{{header|Mathematica}}
Line 2,906:
machamp 23 1248 machamp petilil landorus simisear relicanth haxorus starly yamask kricketune exeggcute emboar rufflet trapinch heatmor registeel loudred darmanitan nosepass seaking girafarig gabite emolga audino</pre>
=={{header|Mathematica}}/{{header|Wolfram Language}}==
<lang Mathematica>longestChain[list_] :=
NestWhileList[
|