代码语言:javascript复制
defun(ArraySort (array)
array_len=length(array)
let((sortedarray)
declare(sortedarray[8])
for(i 0 array_len-1 sortedarray[i]=array[i])
for(i 0 array_len-2
for(j i 1 array_len-1
if(sortedarray[i]>sortedarray[j] then temp=sortedarray[i] sortedarray[i]=sortedarray[j] sortedarray[j]=temp)
)
)
sortedarray=sortedarray
)
)