[ Skill ] 如何翻转一个list

https://www.cnblogs.com/yeungchie/

• code

发现已经有内置了reverse(l_list)

unless(fboundp('reverse)
    procedure(ycFilpList(list)
        prog((length output)
            length = length(list)
            for(x 0 length - 1
                output = append1(output nth((length - 1 - x) list))
            )
            return(output)
        )
    )
)

• describe
  输入一个list，会根据索引号来翻转输出新的list。

• example

ycFilpList(list(1 2 3 4 5))
=>(5 4 3 2 1)