RosettaCodeData/Task/Leonardo-numbers/Maple/leonardo-numbers-2.maple

LFib := n -> 2* combinat:-fibonacci(n+1) - 1;
[seq(LFib(i),i=1..25)];