fortran中reshape函数
时间: 2023-10-30 20:01:34 浏览: 365
Fortran中的reshape函数用于将一个数组重新构造为具有不同形状的新数组。它的语法如下:
```fortran
result_array = RESHAPE(source_array, [shape])
```
其中,`source_array`是要重新构造的原始数组,`shape`是一个整数数组,用于指定新数组的形状。`shape`数组的长度可以与原始数组的维度不同,但元素总数必须保持一致。
下面是一个示例:
```fortran
program reshape_example
implicit none
integer, dimension(6) :: array1
integer, dimension(3, 2) :: array2
! 初始化原始数组
array1 = [1, 2, 3, 4, 5, 6]
! 使用reshape函数将array1重新构造为array2
array2 = reshape(array1, [3, 2])
! 打印结果
print *, array2
end program reshape_example
```
运行上述示例代码将输出:
```
1 2
3 4
5 6
```
这里,我们将一维数组 `array1` 重新构造为了二维数组 `array2`,形状为 `[3, 2]`。请注意,reshape函数将按照列优先的方式重排原始数组的元素。
相关推荐
![pdf](https://img-home.csdnimg.cn/images/20210720083512.png)
![docx](https://img-home.csdnimg.cn/images/20210720083331.png)
![docx](https://img-home.csdnimg.cn/images/20210720083331.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)