RosettaCodeData/Task/Closures-Value-capture/Maple/closures-value-capture.maple

> L := map( i -> (() -> i^2), [seq](1..10) ):
> seq( L[i](),i=1..10);
                  1, 4, 9, 16, 25, 36, 49, 64, 81, 100
> L[4]();
                                   16