common lisp 的函数 ARRAY-DIMENSION

array-dimension.txt

语法
  array-dimension array axis-number => dimension

参数和值
  array --- 一个 array
  axis-number --- 一个 number, 小于数组的维度
  dimension --- 一个正数
  
描述
  返回数组中 axis-number 该维的大小

代码
  * (array-dimension (make-array '(4 2 3) :initial-element '(2 3)) 0)
  4

  * (array-dimension (make-array '(4 2 3) :initial-element '(2 3)) 1)
  2

  *  (array-dimension (make-array '(4 2 3) :initial-element '(2 3)) 2)
  3

  * (array-dimension (make-array 4) 0)
  4