Fortran中二维数组切片

在Fortran中，可以使用数组切片（array slicing）操作来切取二维数组的一部分元素。二维数组是以列优先（column-major）的方式存储的，因此在切片时需要注意行和列的顺序。

假设有一个3x3的二维数组arr，可以使用以下语法来切取其中的一部分元素：

sub_arr = arr(start_row:end_row, start_col:end_col)

其中，start_row和end_row分别表示要切取的行的起始和结束位置，start_col和end_col分别表示要切取的列的起始和结束位置。注意，切片操作是左闭右开的，即包括起始位置的元素，但不包括结束位置的元素。

例如，假设有一个3x3的二维数组arr：

INTEGER :: arr(3,3) = reshape([1,2,3,4,5,6,7,8,9], [3,3])

要切取其中的第2到3行和第1到2列的元素，可以使用以下语法：

INTEGER :: sub_arr(2,2)
sub_arr = arr(2:3, 1:2)

这将得到一个2x2的二维数组sub_arr：

sub_arr = reshape([4,5,7,8], [2,2])