let
make_list n ele =
let
rec
f acc n =
if
n > 0
then
f (ele :: acc) (n-1)
else
acc
in
f [] n