Skip to content

Instantly share code, notes, and snippets.

@zhouqiang-cl

zhouqiang-cl/array-rank.txt

Created December 19, 2016 07:57
Show Gist options
  • Save zhouqiang-cl/0d1b710ca77cfcac61526741bebe8375 to your computer and use it in GitHub Desktop.
Save zhouqiang-cl/0d1b710ca77cfcac61526741bebe8375 to your computer and use it in GitHub Desktop.
Download ZIP
common lisp 的函数 ARRAY-RANK
Raw
array-rank.txt
语法
array-rank array => rank
参数和值
array --- 一个 array
rank --- 一个正整数
描述
返回 array 的维度
代码
* (array-rank (make-array '()))
0
* (array-rank (make-array '(4)))
1
* (array-rank (make-array '(2 3)))
2
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment