64、标准内置程序详解

标准内置程序详解

1. 数组移位函数 EOSHIFT

EOSHIFT 函数用于对数组进行端值移出移位操作。它可以将数组元素向左或向右移动指定的位置，同时可以指定边界值。

示例 ：

! 定义数组 V
V = [1, 2, 3, 4, 5, 6]

! 向左移动 3 个位置
result1 = EOSHIFT(V, SHIFT = 3)  ! 结果为 [4, 5, 6, 0, 0, 0]

! 向右移动 2 个位置，边界值为 99
result2 = EOSHIFT(V, SHIFT = -2, BOUNDARY = 99)  ! 结果为 [99, 99, 1, 2, 3, 4]

对于二维数组，每一行可以以相同或不同的量进行移位，边界元素也可以相同或不同。

下面是一个二维字符数组的示例：

! 定义二维字符数组 M
M = [['A', 'B', 'C'], ['D', 'E', 'F'], ['G', 'H', 'I']]

! 每一行向右移动 1 个位置，边界值为 '*'
result3 = EOSHIFT(M, SHIFT = -1, BOUNDARY = '*', DIM = 2)

! 每一行以不同的量移动，边界值也不同
result4 = EOSHIFT(M, SHIFT = [-1, 1, 0], BOUNDARY = ['*', '/', '?'], DIM = 2)

2. 相对 1 较小的