common lisp 的函数 ARRAY-IN-BOUNDS-P

array-in-bounds-p.txt

语法
  array-in-bounds-p array &rest subscripts => generalized-boolean

参数和值
  array --- 一个 array
  subscripts --- 一个 整数列表, 这个列表的长度和array 的rank 一样
  generalized-boolean --- 一个 generalized-boolean

描述
  如果 subscripts 在 array 的范围内, 返回 true, 否则返回 false

代码
  * (setq a (make-array '(7 11) :element-type 'string-char))
  #2A((0 0 0 0 0 0 0 0 0 0 0)
      (0 0 0 0 0 0 0 0 0 0 0)
      (0 0 0 0 0 0 0 0 0 0 0)
      (0 0 0 0 0 0 0 0 0 0 0)
      (0 0 0 0 0 0 0 0 0 0 0)
      (0 0 0 0 0 0 0 0 0 0 0)
      (0 0 0 0 0 0 0 0 0 0 0))

  * (array-in-bounds-p a 0  0)
  T

  * (array-in-bounds-p a 6 10)
  T

  * (array-in-bounds-p a 7  0)
  NIL