fortran maxval语法
合集下载
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
在Fortran中，`MAXVAL`函数用于找到数组中的最大值。其语法如下：
```fortran
MAXVAL(array [ ,mask ] [ ,dimension ] )
```
* `array`：这是要搜索的数组。
* `mask`：这是一个可选参数。它是一个逻辑数组，与输入数组具有相同的形状。如果mask 中的元素为.TRUE.，则考虑array中对应的元素。如果为.FALSE.，则忽略。
* `dimension`：这是一个可选参数，用于指定要在哪个维度上搜索最大值。默认值为1。下面是一个简单的例子，演示如何使用`MAXVAL`函数：
```fortran
PROGRAM maxval_example
IMPLICIT NONE
INTEGER, DIMENSION(3,3) :: array = RESHAPE((/ 1, 2, 3, 4, 5, 6, 7, 8, 9 /), SHAPE(array)) INTEGER :: max_val
INTEGER, DIMENSION(3) :: max_idx
max_val = MAXVAL(array)
WRITE(*,*) "The maximum value is:", max_val
max_idx = MAXLOC(array)
WRITE(*,*) "The maximum value is located at:", max_idx
END PROGRAM maxval_example
```
在这个例子中，我们创建了一个3x3的数组，并使用`MAXVAL`函数找到数组中的最大值。然后，我们使用`MAXLOC`函数找到最大值的索引。